casa
Top.Mail.Ru Yandeks.Metrika
Forum: "Principale";
Archivio attuale: 2002.01.08;
Scarica: [xml.tar.bz2];

giù

La gente, una domanda abbastanza facile! Collegamento alla procedura in una parola. Trova rami simili


Serg5   (2001-12-19 15:14) [0]

procedura TForm1.Button1Click (Sender: TObject);
var
a, b: intero;
iniziare
a: = 3;
b: = 0;
b: = a * StrToInt (Edit4.Text) * StrToInt (Edit3.Text);
Label7.Caption: = IntToStr (b);
fine;

procedura TForm1.Button2Click (Sender: TObject);
iniziare
Button1Click (); <<<< cosa c'è da scrivere a lei ???
fine;

Grazie!



tovSuhov   (2001-12-19 15:20) [1]

Puoi assegnare Button1Fai clic all'evento OnClick in Object Inspector, se non hai bisogno di sovrascrivere gli eventi in rune-time.



MBo   (2001-12-19 15:25) [2]

Mittente e scrittura, ma più semplice come scritto o impostato da tovSuhov (almeno in TForm1.Create)
Button2.Onclick: = Button1Click;



Alexander   (2001-12-19 15:51) [3]

Scrivi Button1Click (Self);



Mick   (2001-12-19 15:59) [4]

In questo caso particolare, basta scrivere Button1Click (nil);



Pagine: 1 tutto il ramo

Forum: "Principale";
Archivio attuale: 2002.01.08;
Scarica: [xml.tar.bz2];

al piano di sopra









Memoria: 0.56 MB
Ora: 0.025 c
3-21951
Olban
2001-12-05 11:07
2002.01.08
Usa QuantumGrid


3-21947
DieHard
2001-12-05 13:18
2002.01.08
Recupero di un elenco di indici da una tabella Oracle


7-22434
tomas2001
2001-09-24 14:04
2002.01.08
Trasferimento file tramite modem


1-22148
Delphimun
2001-12-20 12:10
2002.01.08
Come inviare un messaggio al sistema che viene premuto un tasto?


1-22201
T2
2001-12-16 07:13
2002.01.08
Sound Spectr





afrikaans albanese Arabic armeno Azero basco bielorusso Bulgarian catalano Cinese (semplificato) Cinese (tradizionale) croato Ceco danese Dutch Inglese estone filippina Finnish Francese
galiziano georgiano Tedesco greco Creolo haitiano ebraico hindi ungherese islandese Indonesian irlandese Italiano Giapponese Korean lettone lituano macedone Malay maltese Norwegian
persiano polacco Portoghese rumeno Russian serbo Slovak sloveno Spagnolo swahili Swedish Thai turco ucraino Urdu vietnamita gallese yiddish bengalese bosniaco
Cebuano esperanto Gujarati Hausa Hmong Igbo giavanese kannada khmer lao latino maori marathi mongolo nepali punjabi somalo tamil telugu Yoruba
zulù
Inglese Francese tedesco italiano portoghese russo spagnolo