Сайта www.spetspribor.com уже не существует, домен пропили, но работает www.spetspribor.info, один сочувствующий сделал по личной инициативе :)

Библиотекой comapi32.dll я давно уже не пользуюсь, работаю через wsp32.dll, последнюю версию можно найти здесь: http://digit-el.com/files/open/wake/wake.html

А функция тривиальна:

function TxDataCOM(const Buffer; N:DWORD;
                   var lpNDone:DWORD):boolean; stdcall;
begin
  Result:=WriteFile(hCom,Buffer,N,lpNDone,nil);
end;