01-12-2013, 11:29 PM
للتحقق من اختفاء رسالة الخطا فقط ...
طيب الان اضف العلامة %
طيب الان اضف العلامة %
كود :
if edit4.Text<>'' then
begin
abstable1.Filter:='article like ' + quotedstr(edit4.text[color=Red]+'%'[/color]);
abstable1.Filtered:= true
end else
abstable1.Filtered:=false;