چندتا سوال

[ali3d]

مدیر جان من از فیلتر و چنین کدی استفاده میکنم.
کد:

var s:string;
begin
if Edit1.text<>&quot; &quot; then
 * begin

if combobox1.itemindex=0 then s:=&quot;kdparvande=&quot;&quot;&quot;+edit1.text+&quot;&quot;&quot;&quot;;
if combobox1.itemindex=3 then s:=&quot;shshnasname=&quot;&quot;&quot;+edit1.text+&quot;&quot;&quot;&quot;;


adotable1.filter:=s;
 * * adotable1.filtered:=true;
 * * * *
 * * if adotable1.isempty=true then
 * * * *begin
 * * * * * *showmessage(&quot;چنين چيزي وجود ندارد&quot;);
 * * * * * *ActiveControl:=edit1;
 * * * * end;
 end
else
 *begin
 * * showmessage(&quot;لطفا مقداري را وارد کنيد&quot;);
 * * ActiveControl:=edit1;
 * end;
 * end;

در صورتی که اشتباهی در کد میبینید خواهشا یادآوری کنید.

و اینکه در اکسس گفته های بالایی شما وجود ندارند!!
ببینید :