小弟想用BCB..PRINTER 8255卡和STP5步進馬達控制器..控制兩個六線馬達..但是BCB程式跑到一半出現一個錯誤..小弟不知道是不是OBJ檔案問題..但是有在資料夾內..懇請大大幫忙..謝謝..以下是程式碼和錯誤..還有再請教一個問題..因為小弟有參考一本書的內容..在第六航位什麼還要在定義PPI_PA...位什麼不能括號裡面輸入位址就好呢??小弟因初學什麼都不懂..還請高手指教

//---------------------------------------------------------------------------
#include
#pragma hdrstop
#include "Unit1.h"
#include "ioport.hpp" //載入 ioport.hpp
#define PPI_PA 0x10
#define PPI_CW 0x13
int i=0;
char step[4]={0x0c,0x09,0x03,0x06}; //步進馬達兩相激磁信號
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
outportb( PPI_CW, 0x80 );
outportb( PPI_PA, 0x0f ); //經 A 埠送出可令線圈消磁的信號 0FH
Timer1->Enabled = false; }
//---------------------------------------------------------------------------
void __fastcall TForm1::StartClick(TObject *Sender)
{
Timer1->Enabled = true; //啟動計時器
Timer1->Interval = 500; //設定延遲時間為 500ms = 0.5 秒
Start->Enabled = false; //禁能開始鈕
End->Enabled = false; //禁能結束鈕
}
//---------------------------------------------------------------------------
void __fastcall TForm1::StopClick(TObject *Sender)
{
Start->Enabled = true; //致能開始鈕
End->Enabled = true; //致能結束鈕
Timer1->Enabled = false; //令計時器無法啟動
}
//---------------------------------------------------------------------------
void __fastcall TForm1::EndClick(TObject *Sender)
{
outportb( PPI_PA, 0x0f ); //經 A 埠送出可令線圈消磁的信號 0FH
Close(); //關閉程式
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
outportb(PPI_PA,step[i]); //經由 A 埠送出可令步進馬達正轉的激磁信號
i ; //i = i 1 指向下一激磁信號
if (i > 3) //若為最後一個激磁信號, 則
{
i = 0; //令 i = 0 指向第一個激磁信號
}
}
//---------------------------------------------------------------------------



錯誤:
[Linker Error] Unresolved external '__fastcall Ioport::outportb(int, unsigned char)' referenced from C:\DOCUMENTS AND SETTINGS\1\桌面\新資料夾 (4)\UNIT1.OBJ

你好:

我是根據你的錯誤訊息，在KTop站上搜尋"outportb"

參考這一篇關於 LPT port

------


The first step toward proving things for yourself is to understand how others have done it before!

大大:
請參詳:
http://delphi.ktop.com.tw/board.php?cid=168&fid=917&tid=85440

感激兩位大大幫忙..我會再試試看..小弟真的是非常感激.