InitComDevice

Функция InitComDevice() инициализирует указанный COM-порт. COM-порт может быть инициализирован лишь единожды.

InitComDevice(DeviceNumber, ParityIndex, StopBits, Speed): Integer
DeviceNumber: Integer	Номер COM-порта инициализируемого устройства
ParityIndex: Integer	Индекс четности принимает значения от 0 до 4, которые соответствуют значениям "No", "Odd", "Even", "Mark", "Space"
StopBits: Integer	Индекс стоповых бит принимает значения от 0 до 2, которые соответствуют значениям 1, 1.5, 2
Speed: Integer	Скорость COM-порта. Допустимые значения: 110, 300, 600, 1200, 2400, 4800, 9600, 14400, 19200, 38400, 56000, 57600, 115200
Функция возвращает число, характеризующее успешность инициализации COM-порта: 0 - добавлено новое устройство 1 - обновлены старые значения -1 - недопустимый индекс паритета -2 - недопустимый индекс стоповых бит -3 - недопустимая скорость

{Pascal Script}
Var
COM_PORT: Integer;

Begin
COM_PORT := 1;
InitComDevice(COM_PORT, 0, 0, 9600);
end.