Dicas - Função IIF no Delphi

Veja nessa dica como criar a função IIF do VB em Delphi.

A função apresentada no código a seguir é muito útil para pequenos e rápidos testes com os mais variados tipos da linguagem Object Pascal. A mesma deve ser declarada na seção private da unit:

function IIf(Expressao: Variant; ParteTRUE, ParteFALSE: Variant): Variant; begin if Expressao then Result := ParteTRUE else Result := ParteFALSE; end;

Artigos relacionados