BinToHex Probleme

[DeddyH]

Wäre es nicht generell angesagt, nicht mit 2, sondern mit SizeOf(Char) zu multiplizieren? Dann muss man sich um die Ansi-/Unicode-Problematik keinen Kopf machen.

[Blup]

Sollte "Text" nicht um ein Zeichen länger sein, um mit einem abschließenden #0-Zeichen das Ende der Zeichenkette zu markieren?

[DeddyH]

Laut Hilfe nicht (Unicode-Version):

Zitat:

BufSize legt die Größe von Buffer fest. Text muss auf eine Zeichenfolge zeigen, die mindestens 2*BufSize-Byte groß ist, da jedes Hexadezimalzeichen zwei Bytes darstellt.

[Blup]

Hier wird mit PAnsiChar gearbeitet:

Zitat:

Text gibt einen nullterminierten String zurück, der den in Buffer übergebenen Wert als Hexadezimalzahl darstellt.

BufSize legt die Größe von Buffer fest. Text muss auf eine Zeichenfolge zeigen, die mindestens 2*BufSize-Byte groß ist, da jedes Hexadezimalzeichen zwei Bytes darstellt.

Für die Funktion BinToHex mag das Nullzeichen am Ende egal sein (BuffSize wird ja übergeben).
Aber ShowMessage möchte sicher auch wissen, wie lang der übergebene Text ist.

[DeddyH]

Bei solchen Dingen gehe ich persönlich immer auf Nummer Sicher und schreibe noch
SetLength(StringVar, StrLen(PChar(StringVar))); dahinter, bevor ich auf den ermittelten String zugreife.

[delphinia]

habe nun drei stunden rumgespielt - versteh zwar nur die Hälfte; aber auch ein blinde Huhn findet mal ein Korn!


Das hier funktioniert, zumindest bis jetzt...

Delphi-Quellcode:

var
  Len: Integer;
  Buffer: array[0..4095] of Byte;
  txt: string;

begin
[....]
            Len := Reg.GetDataSize('Typename');
            if Len > 0 then
            begin
              Reg.ReadBinaryData('Typename', Buffer, SizeOf(Buffer));
              SetLength(txt, Min(Len, SizeOf(Buffer)) * 2);
              BinToHex(@Buffer, PChar(txt), Len);
            end;
            ShowMessage(txt);

ShowMessage enthält nun genau den richtigen String!

Mag das jemand mir mal jemand gegenprüfen ob das auch nicht nur in meinem hier vorliegendem Beispiel standhält?





EDIT:
Was bedeutet das @ in Delphi?
Was bedeutet das ^ in Delphi?

Frage nur da man danach schlecht hier oder bei Google suchen kann...

[DeddyH]

@Var = Speicheradresse von Var
^Var = Zeiger auf Var
Var^ = Inhalt, der hinter dem Zeiger Var steckt

[Namenloser]

Zitat von delphinia:

EDIT:
Was bedeutet das @ in Delphi?
Was bedeutet das ^ in Delphi?

Das sind Pointer-Operatoren:

@Foobar bedeutet „Die Adresse von Foobar im Speicher“ (Referenzierungsoperator)
Adresse^ bedeutet „Ding, das an dieser Adresse im Speicher steht“ (Dereferenzierungsoperator)
Achja, und ^Datentyp bedeutet „Zeiger auf einen Datentyp“. ^Integer wäre z.B. ein Zeiger auf einen Integer. Das braucht man zum dereferenzieren, damit der Compiler weiß, was für ein Typ sich überhaupt hinter einer Adresse verbirgt.

Für eine genauere Erklärung kannst du dir dieses Pointer-Tutorial aus der DP durchlesen.