Nach Hause

Forum: "Haupt";
Durchsuchen Sie die gesamte Website: delphimaster.net;
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];



Nach unten

Leute, eine ganz einfache Frage! Link zur Prozedur in einem Wort.


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

Prozedur TForm1.Button1Click (Sender: TObject);
war
a, b: ganze Zahl;
beginnen
a: = 3;
b: = 0;
b: = a * StrToInt (Edit4.Text) * StrToInt (Edit3.Text);
Label7.Caption: = IntToStr (b);
end;

Prozedur TForm1.Button2Click (Sender: TObject);
beginnen
Button1Click (); <<<< was gibt es, um ihr zu schreiben ???
end;

Vielen Dank!



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

Sie können dem OnClick-Ereignis im Objektinspektor einen Button1Click zuweisen, wenn Sie Ereignisse nicht zur Rune-Time überschreiben müssen.



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

Sender und schreiben, aber einfacher als tovSuhov geschrieben oder gesetzt (zumindest in TForm1.Create)
Button2.Onclick: = Button1Click;



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

Write Button1Click (Selbst);



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

In diesem Fall schreiben Sie einfach Button1Click (nil);






Forum: "Haupt";
Durchsuchen Sie die gesamte Website: delphimaster.net;
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];



nach oben

Nach Hause

Top.Mail.Ru Yandeks.Metrika













Speicher: 0.75 MB
Zeit: 0.026 c
1-22106
Andrey196
2001-12-19 18:24
2002.01.08
Sorry für die Lamer-Frage, wie das Bild gedruckt werden soll


1-22019
Hex_for_delphi
2001-12-17 20:21
2002.01.08
Wie schreibe ich einen Trainer?


14-22355
Frostbeulen
2001-11-06 12:39
2002.01.08
Übersetzung


6-22289
Kirill
2001-10-03 18:33
2002.01.08
IE Kontextmenü


3-21934
Alexsyy
2001-12-04 08:52
2002.01.08
Bitte helfen Sie mir





Afrikanisch albanisch Arabic Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarian katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Dutch Englisch estnisch Philippinisch Finnish Französisch
Galicisch Georgisch Deutsch griechisch haitian Creole hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegian
persisch Polnisch Portugiesisch rumänisch Russisch serbisch Slovak Slowenisch Spanisch swahili Swedish Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch