Доступ к СОМ порту

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Сообщение kitenok » 07.06.2005 11:31:58

Народ кто знает как подключиться к СОМ порту ( Linux) CreateFile ругается
kitenok
новенький
 
Сообщения: 13
Зарегистрирован: 07.06.2005 11:11:11

Сообщение Bohdan » 07.06.2005 14:55:41

Используй библиотечку SynaSer.
Bohdan
новенький
 
Сообщения: 87
Зарегистрирован: 11.05.2005 11:31:46
Откуда: Ukraine, Kyiv

Сообщение kitenok » 08.06.2005 13:41:53

Скачаль но она выдает две ошибки при компиляции

SynaSer.pas(264,15) Error: Function is already declared Public/Forward "TBlockSerial.ErrorMethod(LongInt)"
SynaSer.pas(270,5) Error: The class can't have a published section, use the {$M+} switch
SynaSer.pas(291,1) Fatal: There were 2 errors compiling module, stopping
kitenok
новенький
 
Сообщения: 13
Зарегистрирован: 07.06.2005 11:11:11

Сообщение kitenok » 09.06.2005 09:59:47

Все можно решить намного проще.
достаточно продключить модуль Libc и дальше работать как в С++ только т.е.

Открыть СОМ порт :Fhandle:=THandle(Libc.open(pchar(comport), O_RDWR or O_NOCTTY));
читать из СОМ порта: FileRead(FHandle,UP,sizeof(UP));
писать в СОМ порт : FileWrite(FHandle,UP,sizeof(UP));
ну и т.д.

Структура termios доступна:
var
TermiosStruc: termios;
term:termios;

//**********************

Тему можно считать закрытой
kitenok
новенький
 
Сообщения: 13
Зарегистрирован: 07.06.2005 11:11:11

Сообщение Bohdan » 09.06.2005 11:51:34

Нужно качать Synaser для FPC.
Удобство SysnaSer в том, что у тебя прога будет работать как в винде так и в линухе. Вдобавок там есть много сервисных функций и т.д.
Bohdan
новенький
 
Сообщения: 87
Зарегистрирован: 11.05.2005 11:31:46
Откуда: Ukraine, Kyiv

Сообщение kitenok » 10.06.2005 14:19:34

Synaser для FPC тоже дает две ошибки одну можно исправит вторая связана с классом ошибок
kitenok
новенький
 
Сообщения: 13
Зарегистрирован: 07.06.2005 11:11:11

Сообщение Bohdan » 11.06.2005 16:07:36

Я тебе скажу, что у меня программа нормально работает.

Наверное ты не поставил:
ser.LinuxLock:=false;
Bohdan
новенький
 
Сообщения: 87
Зарегистрирован: 11.05.2005 11:31:46
Откуда: Ukraine, Kyiv


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: Google [Bot] и гости: 7

Рейтинг@Mail.ru