Ifthen Está Em Qual Unit?

[Renata Albergoni]

Não consigo utilizar a função IfThen...

 

Estou tentando utilizar esse codigo

 

procedure TFmPDvOutros.SpeedButton6Click(Sender: TObject);
Var
  A: Integer;
begin
  for A := 0 to FmFiscMenu.ACBrECF1.FormasPagamento.Count -1 do
  begin
     if FmFiscMenu.ACBrECF1.FormasPagamento[A].Descricao <> '' then
        mResp.Lines.Add( 'Forma Pagto: '+FmFiscMenu.ACBrECF1.FormasPagamento[A].Indice+' -> '+
           FmFiscMenu.ACBrECF1.FormasPagamento[A].Descricao+'  Permite Vinculado: '+
           IfThen( FmFiscMenu.ACBrECF1.FormasPagamento[A].PermiteVinculado,'S','N'));
  end ;
  mResp.Lines.Add('---------------------------------');
end;
 

Alguem da um help? Obrigado

[Juliomar Marchetti]

StrUtils

 

Tópico movido para área correta

[Régys Silveira]

Só complementando o que o Juliomar disse, ele também existe na unit Math, ele existe nas duas units porque um é especializado para valores numéricos e outro para valores string.

[Renata Albergoni]

Muito obrigado. O que eu precisava era a da StrUtils, valeu mesmo!

=DDDDD

 

Como Edito o topico para [Resolvido] ?

Editado 21 Janeiro, 2013 por leonamjlima

[Régys Silveira]

Basta clicar no botão resolvido, no post que lhe ajudou a fechar a idéia

[Renata Albergoni]

Basta clicar no botão resolvido, no post que lhe ajudou a fechar a idéia

Muitissimo obrigado novamente.