初学Delphi
procedure TFrmLltj.cbb_xxlkChange(Sender: TObject);begin if Trim(cbb_xxlk.Text)<>'' then begin Showmessage('没空'); end else Showmessage('空了'); end;end.
if语法:
if .. then
begin
end else
end;
弹出提示框:Showmessage('');
不等于写法:<>
黑色头发:http://heisetoufa.iteye.com/