Buscar por:

Função ifthen no delphi7

Código

  A função ifthen recebe três parâmetros,

  sendo o primeiro a condição,

  o segundo o valor que retornará se for verdadeiro e

  o terceiro o valor que retornará se for falso.

  Tem como padrão três tipos de função ifthen, citadas logo abaixo:

 IfThen(AValue: Boolean; const ATrue: Integer; const AFalse: Integer = 0)   : Integer; Overload;

 IfThen(AValue: Boolean; const ATrue: Int64;   const AFalse: Int64   = 0)   : Int64;   Overload;

 IfThen(AValue: Boolean; const ATrue: Double;  const AFalse: Double  = 0.0) : Double;  Overload;

 IfThen(AValue: Boolean; const ATrue: string;  const AFalse: string  = '')  : String;

 Logo abaixo um exemplo de IfThen String:

Normalmente poderiamos fazer deste modo:

if edt1.text = EmptyStr then

  edt1.text := 'Informe valor'

else

  edt1    .Text := 'Valor valido';  

entretanto no Delphi7 temos está opção que economiza linha de código.

 edit1.text := IfThen(edt1.text = EmptyStr,'Informe valor','Valor valido');