Salve
Voce pode fazer um função +/- assim

function IIF (bCond : Boolean; Verdade , Falso Variant ) : Variant; //
hehehe lembrando do velho Clipper!!!
begin

   if bCond then
     Result := Verdade
   else
     Result := Falso;

end;

+/- isso acho que ja ajuda


abraço

Marcos Bernardo


Em 24/03/08, Marcio <[EMAIL PROTECTED]> escreveu:
>
>   Pessoal no Delphi tem como fazer um IF compacto ??
>
> resultado := if edit1.text = '' then 0 else 20
>
> 
>


[As partes desta mensagem que não continham texto foram removidas]

Responder a