Thema: Delphi Boolean Problem

Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#7
  Alt 19. Mär 2003, 10:41
Das es genug Situationen gibt, wo man es braucht, hier mal meine Funktionen dazu.
Delphi-Quellcode:
function BoolToStr(Value: Boolean): String;
begin
  Result := IntToStr(Integer(Value));
end;

function StrToBool(Value: String): Boolean;
begin
  Result := StrToIntDef(Value, 0) <> 0;
end;
......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat