Lazarus, PPC, Com5 ansprechen, dahinter ist ein Sirf Star II

[Der.Kaktus]

Hallo,

ich weiss ja nicht, ob Du schon wusstest...

Delphi-Quellcode:

var 
  CommIn, CommOut : string; 
  NumberWritten : dWord; 
begin 
  CommIn := 'COM6:'; //<<--dann muesste da zuerst COM5 rein
  hCommIn := CreateFile(PWideChar(CommIn), 
                          GENERIC_WRITE, 
                          0, 
                          0, 
                          OPEN_EXISTING, 
                          0, 
                          NULL); 
  if hCommIn=INVALID_HANDLE_VALUE then begin 
      ShowMessage('Unable to open '+ CommIn); 
      end 
      else begin 

      end;

ansonsten ist da eigentlich(im Lazarus) kein Unterschied.