參考WINIO對LTP PORT 的輸出控制我參考了站上的許多先進的文章與程式,我也嘗試自己去寫 但是始終無法控制led,修改許多先進的程式是可以達到控制輸出的目的也測試成功,參考lcsboy的作品,新增下列程式碼即可達到我想要的LTP控制    

void __fastcall TForm1::SetLTPPotr(int Value)
{
    r.type=IOACCESS_WRITE_BYTE;
    r.m_dx=0x0378;
    r.m_al=Value;
    Label2->Caption=IntToStr(Value);
    WinIO();
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  Timer1->Enabled=!Timer1->Enabled;
}    void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
 if (flag)
   SetLTPPotr(0x0);
 else
   SetLTPPotr(0xff);
 flag=!flag;
}

但是我重新寫的程式卻無法正常控制,可以請各問先進告訴小弟我哪裡沒有設定嗎?,除了起始的程序外...因為我覺得很好奇... 我有將有問題的code放在求助區,請各問先進解答小弟我的疑惑... http://delphi.ktop.com.tw/topic.php?TOPIC_ID=71600 發表人 - Mileswamg 於 2005/05/22 17:56:21

目前已經還是使用站上的資源改寫,發現應該是WINIO.dll,WINIO.SYS等檔案缺了 將這些資料整理一下,我將實作的LTP步進馬達資料消化一下實作,將參考的電路 http://usuarios.lycos.es/mgavin/astronomia/connect4.gif 實作並測試,發現是可行的,如果需要這個做法的可以參考