Delphi-Quellcode:
function BoolToStrs(B: Boolean; const Falsestr, Truestr: string): string;
begin
if (FalseStr <> '') and (Truestr <> '') then begin
FalseBoolStrs := [Falsestr];
TrueBoolStrs := [Truestr];;
end;
Result := B.ToString(TUseBoolStrs.True);
FalseBoolStrs := nil; //zurück auf Defaultwerte.
TrueBoolStrs := nil;
end;
Ich will es so machen und in einer Tool-Bibliothek ablegen. Geht das in Ordnung?
Willie.