[an error occurred while processing this directive]
|
т.к. много объектов ПО сопровождать старое надо, но нафиг в Дельфях объект для COM - через API типа
Cid:=OpenComm(tos,1000{inputbufersize},1000);{откроем порт}
if Cid<0
then
begin
MessageDlg(
'Error0210! Ошибка открытия порта...',
mtError, [mbOK], 0);
EXIT;
end;
i:=GetCommState(Cid,DCB);{возьмем его настройки} и пошло... и пошло... и поехало...
E-mail: info@telesys.ru