一个if语句

Question

to CoolAbu
我写错了，我不知道变量i放在哪，不会写,你会怎么写呢？
var:
i:string;
begin
  with dataform.StoredProc1 do
if (parambyname('@分类号').Value:=trim(edit1.Text))=true then
   begin
   close;
   unprepare;
   parambyname('@分类号').Value:=trim(edit1.Text);
   prepare;
   open;
   end
       else
   application.MessageBox('没有这个分类号','错误',mb_ok);  end;

Answer 1

FT，这是啥？Delphi，我也不会。

Answer 2

begin
  with dataform.StoredProc1 do
   begin
   close;
   unprepare;
   parambyname('@分类号').Value:=trim(edit1.Text);
   prepare;
   open;
   endif dataform.StoredProc1.RecordCount=0 then
   showmessage('没有这个分类号');  end;

Answer 3

你的数据原用的是什么!(这应该是delphi问题)