Программирование Com-порта

← →
edicon © (2003-01-11 01:57) [0]

Уважаемые мастера! Ликвидируйте, пожалуйста, мою безграмотность вот в каком вопросе:
Скачал в FAQ пример программирования Com-порта.
Код такой:
var
Com1:THandle;
N:Cardinal;
C:POverlapped;
D:array[0..127] of Char;
actual_bytes:Integer;
begin
Com1:=CreateFile(PChar("Com1"),GENERIC_READ or GENERIC_WRITE,0,
nil,OPEN_EXISTING,FILE_FLAG_OVERLAPPED,0);
WriteFile(Com1,s,11,N,c);
//ReadFile(Com1,D,1, actual_bytes, nil);{ Здесь приходится комментировать строку т.к. компилятор не пускает}
CloseHandle(Com1);
end;
Если можно, поясните синтксис написания процедур: CreateFile, WriteFile, ReadFile, и что за типы: Thandle, Cardinal, Poverlapped и как они используются. А то я в DelphiHelp либо ничего не нашел, либо не понял. Если можно маленький примерчик.

Всем откликнувшимся БОЛЬШОЕ спасибо!!!

← →
Rouse_ © (2003-01-11 02:13) [1]

CreateFile - открытие файла
THandle - идентификатор, в данном случае файла
Cardinal - тип данных, диапазон значений от нуля до 4294967295
Poverlapped - указатель на структуру _OVERLAPPED
WriteFile - запись данных в файл
ReadFile - чтение данных из файла

Система такова:
Открываем файл на чтение - запись функцией CreateFile, результатом функции будет идентификатор файла, с которым и будем работать. Далее либо пишем в него WriteFile либо читаем ReadFile. Примечание: файлом может быть не обязательно ФАЙЛ, в данном случае это порт COM1.

Все это конечно грубо описано, но судя по вопросу глубже Вам пока и не надо.

Желаю успехов

← →
jack128 © (2003-01-13 12:16) [2]

var actual_bytes : cardinal;

← →
Th © (2003-01-14 17:12) [3]

в DelphiHelp этого нет, потому что это не Delphi. See Win32 Developer"s Reference - он вместе с Delphi поставялется

← →
ksa3003 © (2003-01-15 09:57) [4]

Народ вот если скидываю модему команду пытаюсь прочитать ,
а в ответ тишина (модем не отвечает).Почему?

> ksa3003

команда имеет в конце <CR> ?

Спасибо!!! Уважаемые мастера!

Программирование Com-порта Найти похожие ветки