Announcement

Collapse
No announcement yet.

Bitzerlegung einer Gleitkommazahl

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Bitzerlegung einer Gleitkommazahl

    Hallo.

    Folgendes Problem:

    Ich möchte über die serielle Schnittstelle Daten an einen Mikrocontroller übertragen. Hierfür brauche ich Byte-Muster. Da ich allerdings Gleitkommazahlen übertragen muss, müssen diese vor der Übertragung in ein Byte-Muster zerlegt werden.

    Auf der Mikrocontrollerseite wird das genauso gemacht. Hier wird das Problem mit Pointern gelöst.

    Gibt es in Delphi eine Möglichkeit dieses Problem zu lösen?

    Gruß
    Rasmus

  • #2
    Hallo.

    Habs selbst gelöst. Geht wie in C.

    type
    PInteger= ^Integer;

    function Single_in_Bitmuster (Wert: Single):integer;
    var
    Rueckgabewert :integer;
    p_Pointer :Pointer;
    PI :PInteger;
    begin
    p_Pointer:= @Wert;
    PI:= PInteger(p_Pointer);
    Rueckgabewert:= PI^;

    result:= Rueckgabewert;

    end

    Comment

    Working...
    X