Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
15. Jan 2009
String gibt 'nen ShortString an, welcher maximal 10 Zeichen enthalten kann ... aber ein ShortString hat noch 'nen LängenByte und das steht anfangs auf 0 (keine Zeichen enthalten)
du kannst da entweder Array of Char verwenden, oder mußt halt (z.B. per SetLength) die Länge noch definieren
ups: doch keine 0 am Anfang ... ein ShortString wird nicht initialisiert ... heißt, es kann da auch...
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
15. Jan 2009
Statt Integer lieber LongInt oder LongWord verwenden (Single ist 4 Byte ... Integer ist es nicht unbedingt)
Function BinFtoString(f: Single): String;
Var i: Integer;
b: LongInt absolute f;
Begin
SetLength(Result, 32);
For i := 32 downto 1 do Begin
Result := Char((b and 1) + Ord('0'));