Registriert seit: 5. Mai 2008
Ort: Oberschwaben
1.275 Beiträge
Delphi 11 Alexandria
|
AW: TcomPort kann Com11 nicht öffnen
10. Okt 2013, 10:30
Ja, so stehts im Quelltext auch drin.
Delphi-Quellcode:
// create handle to serial port
procedure TCustomComPort.CreateHandle;
begin
FHandle := CreateFile(
PChar(' \\.\' + FPort),
GENERIC_READ or GENERIC_WRITE,
0,
nil,
OPEN_EXISTING,
FILE_FLAG_OVERLAPPED,
0);
if FHandle = INVALID_HANDLE_VALUE then
raise EComPort.Create(CError_OpenFailed, GetLastError);
end;
Hinter dir gehts abwärts und vor dir steil bergauf ! (Wolfgang Ambros)
|
|
Zitat
|