Скачать: CL | DM;

WinIO   Найти похожие ветки 

← →
Vlad25 ©   (2004-03-04 17:46) [0]

Уважаемые Мастера! Кто знает, как программировать LPT порт посредством WinIO.dll под XP? Подкиньте пример, плиз!

---

← →
pavel_guzhanov ©   (2004-03-10 16:04) [1]

в WinIO есть и исходники и готовые dll, vxd и sys. Исходники на
с++. dll, vxd и sys файлы клади в директорию к своей программе В исходниках есть заголовочный файл WinIO.h. Его надо конвертировать в WinIO.pas вручную или при помощи HeadConv (Правда его надо потом подредактировать вручную).
В WinIO есть и help по использованию. А в общем делай так:

Глобальная переменная
var idWinIO:Boolean;
При загрузке формы:
// Запуск  InitializeWinIo для инициализации библиотеки WinIo
idWinIO:=InitializeWinIo; //Делается один раз в начале программы
if not idWinIO then
  ShowMessage("Не установлен WinIO")
else
  SetPortVal($378, 3, 1); //"1" на D0 и D1 выход. или
//сделать SetPortVal($378,0,1) - нули на все ноги порта

далее в программе:
if idWinIO then
 begin
     SetPortVal($378, 2, 1); //"1" на D1 выход "0" на D0 выход
// или SetPortVal($378, 1, 1); //"0" на D1 выход "1" на D0 выход
     Sleep(2000);
     SetPortVal($378, 0, 1); //"0" на все  выходы
end;

И в конце программы:
if idWinIO then
begin
 SetPortVal($378, 0,1);// нули на все выходы
 ShutdownWinIo;//Выгрузка один раз в конце программы
end;
Второй параметр SetPortVal - это то, что пишется в порт, в двоичном виде.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c