IF语名的写法?

Question

当EDIT1.TEXT=''时热行后面的语句,不等于空时执行TABLE的APPEND.
请问要用IF语句如何写呀.

Answer 1

if trim(edit1.text)<>'' then table1.append;

Answer 2

是不是应该是这样呀?
if edit34.text='' then
begin
 exit;
 end
 else
  begin
  with table2 do
  begin
  open;
  append;
  fieldbyname('员工编号').AsInteger:=strtoint(edit2.text);
  fieldbyname('员工姓名').AsString:=edit3.text;
  fieldbyname('学校名称').AsString:=edit34.Text;
  fieldbyname('科系').asstring:=edit37.Text;
  fieldbyname('起止日期').AsString:=edit40.text;
  fieldbyname('年制').AsString:=edit43.text;
  fieldbyname('证书').AsString:=edit46.text;
  post;
  close;
  end;
  end;

Answer 3

if text1.text='' then Exit;
ShowMessage('晕，我也想哭');
tbl_楼主.Append;

Answer 4

if edit34.text='' then
begin
 exit;
 end
 else
  begin
  with table2 do
  begin
  open;
  append;
  fieldbyname('员工编号').AsInteger:=strtoint(edit2.text);
  fieldbyname('员工姓名').AsString:=edit3.text;
  fieldbyname('学校名称').AsString:=edit34.Text;
  fieldbyname('科系').asstring:=edit37.Text;
  fieldbyname('起止日期').AsString:=edit40.text;
  fieldbyname('年制').AsString:=edit43.text;
  fieldbyname('证书').AsString:=edit46.text;
  post;
  close;
  end;
  end;