Forum: Win32/Win64 API (native code)
Delphi
by EDatabaseError,
19. Mär 2007
Hab ne weile im Inet recherchiert. Es lag am Timeout... den von 1000 auf 10 runtergeschraubt und schon läuft alle schön flüssig!
:-)
Mfg
Tobi
Forum: Win32/Win64 API (native code)
Delphi
by EDatabaseError,
18. Mär 2007
Bei deiner version schmeißt er mir:
Unit1.pas(321): E2197 Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden
in der ReadFile Zeile an den Kopf...
Das ganze läuft auf 9600,8,N,1 (standard)
Nochmal zu deiner Frage:
Ich bekomme per RS232 schnittstelle einen 0815 sting rein, welchen ich als "String" verarbeiten möchte.
Mfg
Forum: Win32/Win64 API (native code)
Delphi
by EDatabaseError,
18. Mär 2007
function ReadText: string;
var
nRead: dword;
Buffer: string;
begin
Result := 'a';
SetLength(Buffer,1);
if ReadFile( ComFile, PChar(Buffer)^, 1, nRead, nil ) then
Result := buffer;