InitComDevice

Инициализация COM-порта из скрипта. COM-порт может быть инициализирован лишь единожды.

Синтаксис
InitComDevice (DeviceNumber: Integer; ParityIndex: Integer; StopBits: Integer; Speed: Integer): 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
Выходные параметры
Тип параметра		Описание
Integer		Число, характеризующее успешность инициализации COM-порта: 0 - добавлено новое устройство; 1 - обновлены старые значения, -1 - недопустимый индекс паритета, -2 - недопустимый индекс стоповых бит, -3 - недопустимая скорость

Var
      COM_PORT: Integer;

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