31-12-2013, 11:18 AM
أخي اضف الدالة QuotedStr
datamodule2.ADOTable1.Filter:='Nom like '+QuotedStr(edit1.Text+'*');
datamodule2.ADOTable1.Filtered:=true;
بالتوفيق
datamodule2.ADOTable1.Filter:='Nom like '+QuotedStr(edit1.Text+'*');
datamodule2.ADOTable1.Filtered:=true;
بالتوفيق


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)