在C语言中有个条件运算符：表达式1？表达式2：表达式3，用这个可以很简单地进行判断。
在Delphi中也有一个相似的函数：StrUtils单元中的ifthen。
procedure TForm1.Button1Click(Sender: TObject);
var
    str: string;
begin
    str:= '任意值';
    str:= StrUtils.IfThen(str<>'','对的情况','错的情况');
    ShowMessage(str);

    str:= '';
    str:= StrUtils.IfThen(str<>'','对的情况','错的情况');
    ShowMessage(str);
end;