Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.644 Beiträge
Delphi 12 Athens
|
Re: Compiler Warnung
22. Okt 2008, 16:09
Ich würde es ja so machen:
Delphi-Quellcode:
function DTS(x:integer): real;
begin
Result := -1;
if (x in [0..10]) then //Wenn x zwischen 0 und 10
Result := x / 2;
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|