Текущий архив: 2002.06.17;
Скачать: CL | DM;
Вниз
Работа с ком портами Найти похожие ветки
← →
Макшанов Максим (2002-03-21 22:58) [0]Подскажите пожалуйста как в дельфи работать с ком портами.
Как самому проинициализировать порт (скорость 50,75,100 бод; старт/стоп 1.5 бита); читать и записывать в порт
Как определить приход символа (в досовских прогах определял по прерыванию а в виндовсе:(( )
← →
SoftOne © (2002-03-22 01:47) [1]На первый вопрос:
GetCommState (не обязательно).
Изменения в DCB (или создание).
SetCommState
На второй - используй WaitCommEvent c EV_RXCHAR.
← →
gek (2002-03-22 07:21) [2]
type
BaudRate=(br50, br100, br200);
procedure TVSSComm32.SetBaudRate(Value:TBaudRate); //скорость работы порта
var
DCB:TDCB;
begin
FBaudRate:=Value;
if hCommFile <> 0 then
begin
GetCommState(hCommFile,DCB);
case Value of
br50: DCB.BaudRate:=$32;// 50 бод
br100:DCB.BaudRate:=$64; // 100
br200:DCB.Baudrate:=$C8; // 200
end;
SetCommState(hCommFile,DCB);
end;
end;
← →
Alx2 © (2002-03-22 08:03) [3]Поищи библиотеку компонент AsyncPro.
Страницы: 1 вся ветка
Текущий архив: 2002.06.17;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.015 c
