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?
Numeroiden.....
lisäys.......
2
217
Vastaukset
- ...
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
Kuuluuko ehkäisy parisuhteessa molemmille
Mieheni pelkää kovasti sitä, että minun käyttämä ehkäisy (pillerit) pettävät ja että tulisin raskaaksi. Hänellä on jo en621214Suhun ihastuminen oli liikaa mulle ...
Se meni jo sairauden ja sekavuuden puolelle. Oisin tehnyt melkein mitä vain, että saisin sut ja se ei ole tervettä. Vars341020- 631010
Tänään valtuustossa
Striimi rikki. Mennään saliin ja otetaan pussillinen mätiä omenoita mukaan. Popcornit valmiiksi kun Savola alkaa puhumaa261007- 69955
- 46941
- 73892
- 17870
- 56852
Minkälaiset hiukset
kaivatullasi on? Miehellä Kenties ananas, puolikalju jne jne Naisella kenties vaaleat kiharat jne jne27836