12-10-19, 06:57 PM
السلام عليكم ورحمة الله وبركاته
عندي مشكلة عند تعديل السجل رقم 22 مثلا
بعد الحفظ ينتقل المؤشر للسجل الأول في الجدول
هل من طريقة لجعلة المؤشر يقف على السجل التالي
قاعدة البيانات المستخدمة sqlite3
وشكرا جزيلا
كود :
procedure TempEdit_frm.btnSaveClick(Sender: TObject);
begin
try
if fname.Text = '' then
begin
showmessage('يجب ادخال اسم الموظف');
fname.SetFocus;
exit;
end
else if card.Text = '' then
begin
showmessage('يجب ادخال الرقم القومي');
card.SetFocus;
exit;
end ;
if dm.qry_emp.State in[dsEdit,dsInsert] then
begin
dm.qry_emp.Post;
close;
end
else
ShowMessage('لا يوجد تغييرات لحفظها !');
except on E: Exception do
ShowMessage('حدث خطأ ما !');
end;
end;