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:
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/