حمیدرضاصادقیان
سه شنبه 17 آذر 1383, 09:53 صبح
سلام دوستان.
من یک گرید روی صفحه دارم و میخوام وقتی دارم اطلاعات وارد میکنم اگه کلید ESC زده شد ردیف فعال رو بدست بیاره اگه اطلاعات کامل نبود پیغام بده و به ستون بعدی بره ولی اگه اطلاعات کامل وارد شده بود یک پیغام بیاد و بپرسه ایا اطلاعات ذخیره بشه یا نه.
من خودم از یک روش خیلی ابتدایی استفاده کردم چون چیزی به ذهنم نرسید.
if key=#27 then
begin
if IRIBMessageDlg('آیا برای خروج مطمئن هستید؟',mtWarning,[mbYes,mbNo],0)=mryes then
begin
try
ADQFrmMogh.Post
except
IRIBMessageDlg('اطلاعات وارد شده کامل نمیباشد.',mtWarning,[mbOK],0);
end;
به این صورت حالا خودم نمیدونم روش درستش به چه صورته.
ممنون میشم کمکم کنید. :oops:
من یک گرید روی صفحه دارم و میخوام وقتی دارم اطلاعات وارد میکنم اگه کلید ESC زده شد ردیف فعال رو بدست بیاره اگه اطلاعات کامل نبود پیغام بده و به ستون بعدی بره ولی اگه اطلاعات کامل وارد شده بود یک پیغام بیاد و بپرسه ایا اطلاعات ذخیره بشه یا نه.
من خودم از یک روش خیلی ابتدایی استفاده کردم چون چیزی به ذهنم نرسید.
if key=#27 then
begin
if IRIBMessageDlg('آیا برای خروج مطمئن هستید؟',mtWarning,[mbYes,mbNo],0)=mryes then
begin
try
ADQFrmMogh.Post
except
IRIBMessageDlg('اطلاعات وارد شده کامل نمیباشد.',mtWarning,[mbOK],0);
end;
به این صورت حالا خودم نمیدونم روش درستش به چه صورته.
ممنون میشم کمکم کنید. :oops: