Einzelnen Beitrag anzeigen

paul99

Registriert seit: 5. Jan 2005
2 Beiträge
 
Delphi 3 Professional
 
#1

Mit IO.DLL Com Port schreiben und lesen

  Alt 5. Jan 2005, 20:40
Hallo,

kennt sich jemand von Euch mit der io.dll für den Comport aus.
ich könnte einen Codeschipsel zum einlesen gebrauchen, ich habe Probleme damit
mein Programm stürzt unrgelmäßig ab. Ich vermute das ich die Bits falsch abfrage.
com1 = $03F8
until GetPortBit(COM1+5, 6)=true;
hier gehe ich davon aus das die Daten versendet wurden.

GetPortBit(COM1+5, 0)=true;
ich gehe davon aus das Daten anliegen

repeat
a[i] := char(PortIn(COM1+0)); // Hier Char einlesen
i := i+1;
until GetPortBit(COM1+5, 0) = false;
und so lese ich ein.

Weiss jemand was ich falsch mache ?
MfG
  Mit Zitat antworten Zitat