Code:
portname := '\\.\
COM' + IntToStr(Integer(FPort));
FPortHandle := CreateFile(PChar(portname), // name of
COM device to open
GENERIC_READ or GENERIC_WRITE, // read-write
access
0, nil, // not used
OPEN_EXISTING, // required for tape devices
0, 0); // not used
Ich würde aber trotzdem gerne wissen, wie du das machst. Über eine Komponente, ... ?
Denn eine Komponente kapselt normalerweise die
API Aufrufe und greift auch nicht direkt auf die Ports zu.