converter de boolean para string

Delphi

19/02/2003

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

Curtidas 0

Respostas

Anonymous

Anonymous

19/02/2003

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.


GOSTEI 0
Anonymous

Anonymous

19/02/2003

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


GOSTEI 0
POSTAR