29-06-2011, 09:46 PM
و عليكم السلام ورحمة الله وبركاته
تلك ليست مشكلة لأننا إستخدمنا الحدث BeforePost الذي ينفذ بعد الحفظ أو تحريك المؤشر
بالتوفيق
تلك ليست مشكلة لأننا إستخدمنا الحدث BeforePost الذي ينفذ بعد الحفظ أو تحريك المؤشر
إقتباس :ادخال قيمة فقط والضغط على Enterحل :
كود :
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then
if ADOTable1.State in [dsInsert,dsedit] then
ADOTable1BeforePost(ADOTable1);
end;إقتباس :في حالة الانتقال من العمود الحالي الى عمود أخرحل :
كود :
procedure TForm1.DBGrid1ColExit(Sender: TObject);
begin
if ADOTable1.State in [dsInsert,dsedit] then
ADOTable1BeforePost(ADOTable1);
end;