PDA

نسخه کامل مشاهده نسخه کامل : چگونه مي توانم براي رويداد OnClick آن يك تابع بنويسم.


hghb
03-09-2006, 00:13
من با كد زير و با استفاده از متود Create يك Button ساخته ام. چگونه مي توانم براي رويداد OnClick آن يك تابع بنويسم.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Mahmood_N
03-09-2006, 01:11
سلام
يكي از راههای ساده و بی دردسرش اينه كه شما يه Action بسازید ( با استفاده از کامپوننت ActionList ) و خاصیت Action مربوط به دکمه رو به اون ارتباط بدید ...
اگه با این کامپوننت زیاد کار نکردید بگید تا کمکتون کنم ...
موفق باشید ...
NoneForce
03-09-2006, 09:27
من با كد زير و با استفاده از متود Create يك Button ساخته ام. چگونه مي توانم براي رويداد OnClick آن يك تابع بنويسم.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید


سلام
اينو ببينيد :


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
soldier
03-09-2006, 09:34
سلام عزيز
اول بايد يك پروسيجر بنويسي!
به اين صورت توي قسمت private
procedure nameprocedure(sender:TObject);
بعد باید این رو اضافه کنی به جایی که این باتن رو ساختی
MyBtn.OnClick:=nameprocedure;
خوب تموم شد! حالا باید دستورات پروسیجر رو بنویسی!
به این صورت :
procedure TForm1.nameprocedure(Sender: TObject);
begin
Close;
end;

اگر هم می خواستی بگو
یه نمونه کامل بهت بدم!
موفق باشی