The IfThen function checks the expression passed as AValue, and returns the value of ATrue if the expression is True, or returns the value of AFalse if the expression is False.

  • AValue is the expression that will be determined to be either True or False.

  • ATrue is the string to return if the expression evaluates as True.

  • AFalse is the string to return if the expression evaluates as False.

AValue can check anything - but the function is case-sensitive and the match must be exact to return True.

Declaration: Function IfThen( AValue : Boolean; const ATrue : string; AFalse : string) : string;

A simple example as below.

procedure ScriptEvent (var Value : variant);
var
aStr, aName : string;
aCount : integer;
begin
aCount := 1; //As a numeric function
aStr := ifthen(aCount=1,'aCount is 1', 'aCount is not 1');
LogInfo(aStr); //True
aCount := 57;
aStr := ifthen(aCount=1,'aCount is 1', 'aCount is not 1');
LogInfo(aStr); //False
 
aName := 'Susan'; //As a string function
aStr := ifthen(aName='Susan','Susan is in the house!', 'Susan has gotten lost!');
LogInfo(aStr); //True
aName := 'Fred';
aStr := ifthen(aName='Susan','Susan is in the house!', 'Susan has gotten lost!');
LogInfo(aStr); //False
aName := 'SUSAN';
aStr := ifthen(aName='Susan','Susan is in the house!', 'Susan has gotten lost!');
LogInfo(aStr); //False
LogInfo('');
end;