Numeroiden.....

lisäys.......

Eli olen tekemässä edelleen tätä osoitekirjaa ja nyt ajattelin että haluaisin lisätä siine viellä puhelin numero kohdan. Kysymys kuuluu miten saan lisättyä numeron? Eli kun siinä on kohta jossa lukee ''Nimi'' ja sen vieressä tekstiboksi ''Edit1''. Sitten kun kirjotat nimen edit1 kohtaan ja pinat lisää nappia jonka jälkeen painat nimet nappia siellä pitäisi näkyä nimi jonka kirjotit edit1 kohtaan. Nyt pitäis tietää miten saan numeron samalla tavalla lisättyä. Tekstinlisäys koodi tässä:

procedure TForm1.Button2Click(Sender: TObject);
var a : integer;
begin
Canvas.Rectangle(10,200,600,500);
if (laskuri > 0) then
begin
for a := 1 to laskuri do Canvas.textout(50,200 15*a,taulu[a,1]);
end;

Mitä tosta pitäis muuttaa, että sais numeron toimimaan?

2

244

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ...

      Stringgrid tai listview olisi kätsympi taulukkomuotoisen tiedon käsittelyyn.

      • postisähkö

        Ehkäpä tämä auttaa vähän jyvälle pääsyä StringGrid:ssä


        procedure TForm1.Button1Click(Sender: TObject);
        begin
        StringGrid1.DefaultColWidth:=120;
        StringGrid1.ColWidths[0]:=30;
        StringGrid1.Cells[1,0]:='Nimi';
        StringGrid1.Cells[0,1]:='1';
        StringGrid1.Cells[1,1]:='Matti Niemi';
        end;


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa

      En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod
      Ikävä
      22
      5134
    2. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      25
      4308
    3. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      27
      2461
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      34
      2234
    5. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      1998
    6. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      15
      1908
    7. En ole koskaan kokenut

      Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka
      Ikävä
      19
      1587
    8. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      12
      1521
    9. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      21
      1247
    10. Kerranki asiat oikein

      Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa
      Haapavesi
      10
      1164
    Aihe