Thema: Delphi String To Byte ...

Einzelnen Beitrag anzeigen

Benutzerbild von cherry
cherry

Registriert seit: 14. Nov 2005
561 Beiträge
 
RAD-Studio 2009 Ent
 
#13

Re: String To Byte ...

  Alt 29. Feb 2008, 14:36
Ich hab soeben beide Funktionen getestet:

Also die Funktion von "Union" versteh ich zwar einigermassen, funktioniert aber leider nicht wirklich...
respektive ich erhalte bei fast allen Zeichen die ich umwandle "0111111"...

Die Funktion von "s-off" scheint zu funktionieren. Da habe ich aber mühe beim verstehen. Kann mir die jmd auskommentieren?
wäre echt toll.. Ich will keinen Code verwenden den ich nicht verstehe!

und

Zitat:
DeddyH hat folgendes geschrieben:
Das ist ein Typecast auf Byte, damit aus 'A' 65 wird.

Anstelle des Typecasts kann man übrigens auch die Funktion Ord nutzen, was s-off macht.
Er verwendet aber beides?! :

Delphi-Quellcode:
For i := SizeOf(_Chr) * 8 - 1 Downto 0 Do
      Result := Format('%s%d', [Result, Byte((Ord(_Chr) And (1 Shl i)) <> 0)]);
Ist das nur mein Gefühl, oder ist die ganze Welt verrückt geworden!?
  Mit Zitat antworten Zitat