在java和c語言中有個條件運算符:表達式1?表達式2:表達式3,用這個可以很簡單地進行判斷。 StrUtils 單元和 Math 單元 分別有一個 IfThen 函數, 舉例:
uses StrUtils, Math;
procedure TForm1.Button1Click(Sender: TObject); var a: Integer; str: string; begin a := ; str := StrUtils.IfThen(a > , , ); ShowMessage(str); a := -; str := StrUtils.IfThen(a > , , ); ShowMessage(str); a := ; str := StrUtils.IfThen(a > , ); ShowMessage(str); a := -; str := StrUtils.IfThen(a > , ); ShowMessage(str); end;
procedure TForm1.Button1Click(Sender: TObject);
var
str: string;
begin
str:= '任意值';
str:= StrUtils.IfThen(str<>'','對的情況','錯的情況');
ShowMessage(str);
str:= '';
str:= StrUtils.IfThen(str<>'','對的情況','錯的情況');
ShowMessage(str);
end;