|
Registriert seit: 10. Jun 2002
Ort: Deidesheim
2.886 Beiträge
Turbo Delphi für Win32
|
Re: Double in zwei Integer
16. Nov 2003, 00:03
Wenn du meinst...
Das sollte so gehen:
Delphi-Quellcode:
var
i1, i2: Integer;
pi: PInteger;
d: Double;
begin
d := 17.0;
pi := PInteger(@d);
i1 := pi^;
pI := PInteger(Pointer(Integer(@d)+4));
i2 := pi^;
end;
Martin Leim Egal wie dumm man selbst ist, es gibt immer andere, die noch dümmer sind 
|