12-04-2015, 06:27 PM
مشكلتي هي انه في كود البحث في جدول برمجته ببرنامج MSSQL server ولكن عندما شغلت البرنامج واردت البحث ظهر لي هذا الخطأ عند كتابة اول حرف في Edit1
واليكم الكود الذي وضعته في حدث Edit1Change
begin
If (Edit1.Text='') then
DataModule4.AdoTable1.Filtered:=false
Else
Begin
DataModule4.Adotable1.Filter:='nome'+ QuotedStr(Edit1.Text+'%');
DataModule4.Adotable1.Filtered:=true;
end;
end;
صورة للكود
كود :
http://www11.0zz0.com/2015/04/12/20/241483558.jpgواليكم الكود الذي وضعته في حدث Edit1Change
begin
If (Edit1.Text='') then
DataModule4.AdoTable1.Filtered:=false
Else
Begin
DataModule4.Adotable1.Filter:='nome'+ QuotedStr(Edit1.Text+'%');
DataModule4.Adotable1.Filtered:=true;
end;
end;
صورة للكود
كود :
http://www14.0zz0.com/2015/04/12/20/470867809.jpg