Einzelnen Beitrag anzeigen

Benutzerbild von Der Jan
Der Jan

Registriert seit: 22. Dez 2005
289 Beiträge
 
Delphi XE7 Ultimate
 
#19

Re: [C] sgn-Funktion verhält sich komisch (falsche Rückgabe)

  Alt 22. Jan 2009, 18:59
Damit hast du natürlich recht. Außerdem ist IfThen AFAIR nur für Zahlen definiert, man kann sich allerdings seilbst ein paar zusätzliche Funktionen definieren, um andere Typen wie String oder Variant abzudecken, so etwa:

Delphi-Quellcode:
unit MyIfThen;
//-----------------------------------------------------------------------------
interface

function IfThen(i_bl: boolean; i_sTrue: string; i_sFalse: string = '0'): string;
//-----------------------------------------------------------------------------
//-----------------------------------------------------------------------------
implementation

function IfThen(i_bl: boolean; i_sTrue: string; i_sFalse: string = '0'): string;
begin
  if(i_bl) then
    Result := i_sTrue
  else
    Result := i_sFalse;
end;
//-----------------------------------------------------------------------------
end.
Aber langsam wirds OT
Gruß, Jan
  Mit Zitat antworten Zitat