Thema: Delphi 2 Word zu einer Single

Einzelnen Beitrag anzeigen

Benutzerbild von chaosben
chaosben

Registriert seit: 27. Apr 2005
Ort: Görlitz
1.358 Beiträge
 
Delphi XE2 Professional
 
#2

Re: 2 Word zu einer Single

  Alt 5. Mai 2010, 13:44
Ich würde das per absolute lösen

Delphi-Quellcode:
procedure Bla;
var
  MyInt : Integer;
  MySingle : Single absolute MyInt;
begin
  MyInt := (Word1 shl 16) + Word2;
  //et voila ... MySingle hat den gewünschten Wert
end;
Hintergrund: Durch die absolute-Direktive stehen beide Variablen im Speicher an der gleichen Stelle.
Benjamin Schwarze
If I have seen further it is by standing on the shoulders of Giants. (Isaac Newton)
  Mit Zitat antworten Zitat