Hilft dir das weiter?
Delphi-Quellcode:
procedure MyTest(Value: Double); overload;
begin
ShowMessage(FloatToStr(Value));
end;
procedure MyTest(Value: LongInt); overload;
begin
ShowMessage(IntToStr(Value));
end;
procedure MyTest(Value: LongWord); overload;
begin
ShowMessage(IntToStr(Value));
end;
procedure TForm1.Button1Click(Sender: TObject);
var
d: Double;
i: LongInt;
w: LongWord;
begin
d := 1.7e308;
i := -2147483647;
w := 4294967295;
MyTest(d);
MyTest(i);
MyTest(w);
end;
Und wie gesagt, ob du d oder i oder w als Variable nimmst, mußt du selbst vorher prüfen.