02-02-2015, 10:35 PM
مرحبا لي مشكلة انني صادفة نقص في فهم متطرقات التي تتادي بي للحصول على الفلترة
وهو بعد ان كتبت هذا الكود وان لم تخني الذاكرة هو هذه هي الطريقة الانسب
ان كان به خطا انتظر التصحيح .... تحياتي.
وهو بعد ان كتبت هذا الكود وان لم تخني الذاكرة هو هذه هي الطريقة الانسب
كود :
if edit1.Text<>'' then
begin
ADOTable1.Filter := 'Nam'+ quotedstr (edit1.Text +'*');
ADOTable1.Filtered := true;
end else
ADOTable1.Filtered := false;