Программирования LPT-порта

void __fastcall TForm1::Button1Click(TObject *Sender)
{     /*  use "ntddpar.h"   */
  HANDLE hLPT;
  DWORD  T, U;
  UCHAR buf[8] = { 0,1,2,4,8,16,32,64 }; 
  PAR_QUERY_INFORMATION * eInfo;
  PARCLASS_NEGOTIATION_MASK   RM, LM;
 
      T = 0x160018;
      RM.usReadMask  = 0x7FF;
      RM.usWriteMask = 0x7FF;
      hLPT = CreateFile("LPT1", GENERIC_WRITE, 0, NULL,
                OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0);
      if (DeviceIoControl( (hLPT, T,
         &RM, sizeof(PARCLASS_NEGOTIATION_MASK),
         &LM, sizeof(PARCLASS_NEGOTIATION_MASK), &U, NULL))
           WriteFile(hLPT, buf, 4, &U, NULL);
      else ShowMessage("DeviceControl "+FloatToStr(T));
      CloseHandle(hLPT);
}

HANDLE port;
bool IsOpen = false;
//---------------------------------------------------------------------------
void __fastcall Open_port()
{
 try
  {
   port = CreateFileW(L"\\\\.\\giveio", GENERIC_READ | GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
   IsOpen = true;
  }
 catch(...)
  {
   IsOpen = false;
   ShowMessage(L"Error open port!!!");
  }
}
//---------------------------------------------------------------------------
void __fastcall Close_port()
{
 CloseHandle(port);
 port = NULL;
 IsOpen = false;
}
//---------------------------------------------------------------------------
unsigned char __fastcall Read_port()
{
 unsigned char State=0;
 DWORD b=0;
 if(IsOpen)
  {
   ReadFile(port,&State,1,&b,NULL);
//   State=~State;
  }
 return State;
}
//--------------------------------------------------------
void __fastcall Write_port(unsigned char Signal)
{
 if(IsOpen)
  {
   unsigned char State = Read_port()&Signal;
   WriteFile(port,&State,1,NULL,NULL);
  }
}
//---------------------------------------------------------------------------

Write_port(1); // одна нога 
Write_port(2); // вторая
Write_port(4); // третяя
Write_port(8); // .....
Write_port(16);
Write_port(32);
Write_port(64);
Write_port(128); // восьмая
 
Write_port(3); //первая и вторая, короче думаю понятно

  int siz = sizeof(PARCLASS_NEGOTIATION_MASK);
  PARCLASS_NEGOTIATION_MASK   RM, LM;
  DWORD U ;
  char data=0xAA;
      RM.usReadMask  = NULL;
      RM.usWriteMask = IEEE_COMPATIBILITY;
      HANDLE hLPT = CreateFile("LPT1", GENERIC_READ | GENERIC_WRITE,
                    0, NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0);
      if (DeviceIoControl(hLPT,IOCTL_IEEE1284_NEGOTIATE,
              &RM,siz,&LM,siz,&U,NULL))
         WriteFile(hLPT,&data,(DWORD)1,&U,NULL);
      CloseHandle(hLPT);

#include <vcl.h>
#pragma hdrstop
#include "ntddpar.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
/*  use "ntddpar.h"   */
  HANDLE hLPT;
  DWORD  T, U;
  UCHAR buf[8] = { 0,1,2,4,8,16,32,64 };
  PAR_QUERY_INFORMATION * eInfo;
  PARCLASS_NEGOTIATION_MASK   RM, LM;
      T = 0x160018;
      RM.usReadMask  = 0x7FF;
      RM.usWriteMask = 0x7FF;
      hLPT = CreateFile("LPT1", GENERIC_WRITE, 0, NULL,
                OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0);
      if (DeviceIoControl( (hLPT, T,
         &RM, sizeof(PARCLASS_NEGOTIATION_MASK),
         &LM, sizeof(PARCLASS_NEGOTIATION_MASK),
         &U, NULL)))
           WriteFile(hLPT, buf, 4, &U, NULL);
      else ShowMessage("DeviceControl "+FloatToStr(T));
      CloseHandle(hLPT);
}

      if (DeviceIoControl(hLPT, T,
         &RM, sizeof(PARCLASS_NEGOTIATION_MASK),
         &LM, sizeof(PARCLASS_NEGOTIATION_MASK),
         &U, NULL))
           WriteFile(hLPT, buf, 4, &U, NULL);

BYTE  bitt = ((TSpeedButton*)Sender)->Tag;