Widestring Problem

**Seren200018**

Ich habe folgendes Problem.
Ich versuche aus einem C60 der Firma Cypher Instrumens Daten auszulesen (das Anweisungen geben funktioniert).
Die Anweisung wird über eine Funktion namens ReadString als System.Widestring zurück gegeben.
Ich habe nun versucht es über den folgenden Code auszulesen:

markieren

Delphi-Quellcode:

			procedure Tform1.Getdata(Sender: TObject);

var tempstr : widestring;

begin

  c60.DisableDataReceived;

  setlength(tempstr,67); //Die  Nachrichten sind immer 67 Zeichen lang!

  c60.ReadString(tempstr,67);

  c60.EnableDataReceived;

end;

Das Ergebniss ist aber mehr als Sonderbar
'먺먠먱먰먰먰멥먰먠먶먴먰먰멥먰먠먱먰먰먰멥먰먠먱먰먰먰멥먰먠먰먰먍'
Wenn ich das ganze aber nun erst in seine Bitfolge umwandle und dann wieder zurück in Asci kommt das gewünschte Ergebniss raus

P:0 +1.000000e+01 +6.400000e+01 +1.000000e+00 +1.000000e+00 00001 Hat irgendjemand eine Idee?

Vielen Dank schon mal für die Hilfe!

P.s.
Ich habe folgende Char to bit funktionen benutzt

http://www.delphi-treff.de/tipps/obj...iten-mit-bits/

Widestring Problem

Widestring Problem

Forumregeln