converter de boolean para string

19/02/2003

0

OLÁ PESSOAL 8) UMA RAPIDINHA PARA VCS ME AJUDAREM
COMO FAÇO PARA CONVERTER DE BOOLEAN PARA STRING

VALUE UM ABRAÇÃO :wink:


Anonymous

Anonymous

Responder

Posts

19/02/2003

Anonymous

Bom, converter mesmo acho difícil. Mas você pode usar, por exemplo, o seguinte artifício:
var
b:Bollean;
s:String;

...
if b:=false then s:=´false´
else
s:=´true´;

Abraços.


Responder

19/02/2003

Anonymous

OLÁ PESSOAL 8) UMA RAPIDINHA PARA VCS ME AJUDAREM COMO FAÇO PARA CONVERTER DE BOOLEAN PARA STRING VALUE UM ABRAÇÃO :wink:


function TForm1.BooleanToStr(Operador: Boolean): String;
begin
  if Operador then result := ´Verdadeiro´ else result := ´Falso´;
end;

procedure TForm1.ALgumEvento(Sender: TObject);
var B: Boolean;
S: String;
begin
B:= false;
  S := BooleanToStr(B);
  showmessage(s);
end;


Sugestão.

[]´s
Aroldo Zanela


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar