PDA

View Full Version : اجراي رويداد OnDblClick در برنامه


RK977877
چهارشنبه 18 اردیبهشت 1387, 19:46 عصر
دستور


Var
OnEventGrid : TNotifyEvent
OnEventGrid = GridCodeDblClick
OnDblClick := OnEventGrid

اين دستور در برنامه در رويداد onclick Button نوشته شده ولي جواب نميده
ميشه راهنمائي كنيد
SYNDROME
چهارشنبه 18 اردیبهشت 1387, 22:23 عصر
می توانید برای فراخوانی رویدا DBclick مربوط به DBGrid می توایند اینجوری هم عمل کنید.


DBGrid1DblClick(Owner);

موفق باشید
RK977877
پنج شنبه 19 اردیبهشت 1387, 08:03 صبح
ببينيد من چند تا DbGrid دارم كه ميخوام يك جوري به دستور بالا پاس بدم يعني كه پروسيجري كه پارامتر آن يك متغير از نوع TNotifyEvent ميگيره كه همون OnDblClick مربوط به Dbgrid مربوطه هستش و ميخوام توسط دستور
OnEventGrid = GridCodeDblClick
OnDblClick := OnEventGrid
OnDblClick مربوط به Grid مربوطه را اجرا كنم
فكر كنم تونستم مفهوم رو برسونم اگه ميشه راهنمائي كنيد
SYNDROME
پنج شنبه 19 اردیبهشت 1387, 08:09 صبح
دوست عزیز من در رابطه با روشی که شما گفتید اطلاع کاملی ندارم ولی شما می خواهید رویداد دابل کلیک هر کدام از DBGridها را فراخوانی کنید.
خوب می توانید یک تابه به شکل زیر بنویسید


procedure TForm1.DBGridDB(DBGrid : TDBGrid);
Begin
DBGrid.OnDblClick(Owner);
End;

حالا می توانید با پاس کردن هر DBGridی به تابع بالا خاصیت فوق را فراخوانی کنید.
موفق باشید