const

// speed
spd_2400 = 0;
spd_4800 = 1;
spd_9600 = 2;
spd_14400 = 3;
spd_19200 = 4;
spd_28800 = 5;
spd_38800 = 6;
spd_57600 = 7;
spd_115200 = 8;

// parity
prty_NONE = 0;
prty_EVEN = 1;
prty_ODD = 2;

// data bits
databits_7 = 0;
databits_8 = 1;

// stop bit
stopbit_1 = 0;
stopbit_2 = 2;

// Тип преобразователя интерфейса
RS485CONV_MANUAL = 0;
RS485CONV_AUTO = 1;
RS485CONV_MANUAL_DTR = 2;

таким образом имеем следующий вызов

if OpenPort( 10, spd_9600, prty_NONE, databits_8, stopbit_1, RS485CONV_AUTO ) <> 0 then begin
// обработка ошибки

end else begin
// успешное открытие порта

end;