Verbindung mit COM-Schnittstelle aufbauen über TComPort

[divBy0]

Zeig doch bitte mal den Teil, wo du die Verbindung aufbaust.

Zitat von Dark Angel:

Weil wenn ich einen BUtton mir "..connected:=true" setzte stürzt das Programm ab.

Die Eigenschaft Connected kannst du nicht setzen, die kannst du abfragen, ob der Port geöffnet ist.

So kannst du den Com-Port öffnen:

Delphi-Quellcode:

 
ComPort.Port := 'COM1';  // hier der Port als String
ComPort.BaudRate := br19200;
ComPort.DataBits := dbSeven;
ComPort.StopBits := sbOneStopBit;
ComPort.Parity.Bits := prEven;
ComPort.Buffer.InputSize := 1024;  // musst du anpassen
ComPort.Buffer.OutputSize := 1024; // musst du anpassen

try
  ComPort.Open;
except
  ShowMessage('Fehler: COM-Port konnte nicht geöffnet werden...'); // Fehlermeldung
end;