Версия для печати темы

Автор: jpka 29.07.2007 20:32

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

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" ?

Заранее спасибо за любые намёки или подсказки.

Автор: volvo 29.07.2007 21:48

Что-то типа:

tty := fdOpen('/dev/ttyUSB0',Open_RdWr or Open_NoCtty or Open_NDelay);
if (tty < 0) then ...

Автор: jpka 29.07.2007 22:10

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

uses OldLinux;

Работу не проверял, но во всяком случае, компилируется!
Спасибо