IPB
ЛогинПароль:

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

 
 Ответить  Открыть новую тему 
> Linux, FPC: как обратиться к устройству?
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 3
Пол: Мужской

Репутация: -  0  +


Имеется исходный код на СИ, вот фрагменты:

int fd;
....
if ( ( fd = open( "/dev/ttyUSB0", O_RDWR| O_NOCTTY| O_NDELAY )) < 0 ) {и т.д.

Есть ли в FPC версии 2.0+ аналог функции open? Ни в Паскале для DOS, ни в Дельфи аналога я не знаю; попытки выучить язык СИ к успеху не привели.
Как в FPC обратиться к устройству? Учитывая что в Linux устройства - это файлы, то, если обратиться через обычные файловые функции - куда девать "O_RDWR| O_NOCTTY| O_NDELAY" ?

Заранее спасибо за любые намёки или подсказки.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Что-то типа:
tty := fdOpen('/dev/ttyUSB0',Open_RdWr or Open_NoCtty or Open_NDelay);
if (tty < 0) then ...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





Группа: Пользователи
Сообщений: 3
Пол: Мужской

Репутация: -  0  +


На fdOpen компилятор споткнулся.
Поиск по fdOpen показал, что нужно указать

uses OldLinux;


Работу не проверял, но во всяком случае, компилируется!
Спасибо smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.03.2024 18:50
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name