Zitat von
Cöster:
@ 3_of_8:
Kann es sein, dass es sign auf delphi 5 noch nicht gibt?
@ Luckie:
Ich brauch nicht ne Funktion, die mir sagt, ob die Zahl positiv ist, sondern eine, die mir das Vorzeichen zurückliefert (also 1 oder -1). Sonst könnte ich ja auch ne If-Abfrage machen.
Wenn Du mit allen Vorschlägen - vor allem der konsequenten Lösung von 3_of_8 - nicht zufrieden bist, dann schreib Dir doch Deine Funktion selbst:
Delphi-Quellcode:
function Vorzeichen( const dValue: double ): integer;
begin
if dValue >= 0 then
begin
if dValue = 0
then Result := 0
else Result := 1;
end
else Result := -1;
end;
Gruß Jürgen