Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
Delphi 12 Athens
|
Re: Delphi 9 - Eure Erwartungen
31. Aug 2004, 17:39

Zitat von MaBuSE:
Ich habe mir eine kleine Unit geschieben in der z.B. eine Funktion iif für die von mir benötigten Typen existiert.
Andere nutzen die Unit MathStrUtils und die Funtionen IfThen
Delphi-Quellcode:
function IfThen(AValue: Boolean; const ATrue: Integer; const AFalse: Integer = 0): Integer; overload;
function IfThen(AValue: Boolean; const ATrue: Int64; const AFalse: Int64 = 0): Int64; overload;
function IfThen(AValue: Boolean; const ATrue: Double; const AFalse: Double = 0.0): Double; overload;
function IfThen(AValue: Boolean; const ATrue: string; const AFalse: string = ''): string; overload;
...  ...
Daniel Lizbeth Ich bin nicht zurück, ich tue nur so
|