Miten kutsun Toistuvaa proceduurista Homma, kun niiden esittely on seuraava:
TForm1 = class(TForm)
. . .
procedure Toistuva(Sender: TObject);
procedure Homma(Sender: TObject);
. . .
private
{ Private declarations }
public
{ Public declarations }
end;
Kutsumisongelma
2
486
Vastaukset
- buudda
procedure TForm1.Toistuva(Sender: TObject);
begin
showmessage('Täällä toistuva');
end;
procedure TForm1.Homma(Sender: Tobject);
begin
toistuva(sender);
end; - 20+6
Toisenlainen ratkaisu voisi olla että
toistuva työ tehdään omassa aliohjelmassa
joka on esitelty private-osiossa
mutta tämä on vain joissakin tapauksissa parempi kuin tuo
aiemmin esitetty.
TForm1 = class(TForm)
. . .
procedure Toistuva(Sender: TObject);
procedure Homma(Sender: TObject);
. . .
private
{ Private declarations }
procedure TeeToistuva;
public
{ Public declarations }
end;
procedure TForm1.Toistuva(Sender: TObject);
..
begin
...
TeeToistuva;
...
procedure TForm1.Homma(Sender: TObject);
..
begin
...
TeeToistuva;
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Miehille kysymys
Onko näin, että jos miestä kiinnostaa tarpeeksi niin hän kyllä ottaa vaikka riskin pakeista ja osoittaa sen kiinnostukse1323807- 851895
Olen tosi outo....
Päättelen palstajuttujen perusteella mitä mieltä minun kaipauksen kohde minusta on. Joskus kuvittelen tänne selkeitä tap151741Haluaisin jo
Myöntää nämä tunteet sinulle face to face. En uskalla vain nolata itseäni enää. Enkä pysty elämäänkin näiden kanssa jos541402Ylen uutiset Haapaveden yt:stä.
Olipas kamalaa luettavaa kaupungin irtisanomisista. Työttömiä lisää 10 tai enempikin( Mieluskylän opettajat). Muuttavat1231284VENÄJÄ muuttanut tänään ydinasetroktiinia
Venäjän presidentti Vladimir Putin hyväksyi tiistaina päivitetyn ydinasedoktriinin, kertoo uutistoimisto Reuters. Sen mu961258Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornosta
https://www.kymensanomat.fi/paikalliset/8081054 Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornon hallussapi371229- 701146
- 691023
Hommaatko kinkkua jouluksi?
Itse tein pakastimeen n. 3Kg:n murekkeen sienillä ja juustokuorrutuksella. Voihan se olla, että jonkun pienen, valmiin k102985