Omron_HostLink.dll V3.2 HostLink通信協議串口通訊動態鏈接庫DLL(以下簡稱DLL)，是為滿足工業通信需要，

針對工業領域要求上位機對歐姆龍系列PLC通訊實時采集與控制的組態編程而設計。

本DLL是采用Delphi語言開發的標準串口通訊庫，具有以下特點：

1)、遵循歐姆龍HostLink通信協議；

2)、支持多串口并發操作，支持多線程串口通訊，將串口通訊對主程序的影響降至最低；

3)、實時性、可靠性好,通用性強；

4)、適用于多PLC(下位機)聯網和上位機通信，滿足多方面的需要；

5)、函數接口功能全，操作簡單，支持歐姆龍PLC的絕大部分地址的讀寫功能函數；

6)、支持USB、PC擴展卡等擴展串口號；

7)、支持多種操作系統win9x/win2000/winXP(標準Win32 DLL)；

8)、易于快速開發(VC等非RAD開發環境的開發)；

9)、更新原有函數調用方式采用數組調用數據發生與接收，初學者快速入門；

10)、可在多種編程環境下使用，例如VB、VC、Delphi、PB、Labview、易語言等開發環境；

11)、擴展了函數功能讀取下位機中的雙字、單精度浮點等類型數據，更加符合工業自動化領域的工控軟件的開發。

軟件版本更新及相關說明：

Omron_HostLink.dll V3.2 HostLink通信協議串口通訊鏈接庫，實現了對歐姆 龍全系列PLC的HostLink協議的支持,

(刪減了一些特權指令)wangjun于2010年在原有omron.dll V2.0版基礎上的更新版，重寫了函數結構，采用數據接收

和發送緩沖區(數組)方式傳遞，讀出和寫入單元數據使用更方便。對于16位整數和32位整數讀取寫入均按有符號整數

處理,小數的返回按單精度浮點型(2進制浮點)處理讀取方式。提供擴展功能函數，方便用戶實現混合數據讀取。

能夠同時滿足32個串口并發情況下的正常使用。

Omron_HostLink.dll V3.2 分為完美版和單機版兩個版本，本DLL于2010年最新規整優化了部分源碼，

通過DLL發送緩存區與接收緩存區數據傳遞的功能擴展，使多語言環境的使用更加便利。

全新的串口通信DLL控件，完美的VB、VC、delphi例程及工件手冊是，廣大立志利用各類高級語言進行上位機軟件開發的首先工具。

淘寶店：http://shop34821629.taobao.com

電 話：13912935690 025-84359545

騰訊QQ：157610979

郵 箱：157610979@QQ.com

wjun7610@yahoo.com.cn

chinawanglong@163.com

在VC中使用DLL一般都是采用動態聲明的方式，函數說明中給出的是Delphi的函數原型，

在VC中聲明時只要注意一下類型的對應即可,Delphi中的longint類型對應VC中的int類型

Delphi中的Pchar對應VC中的char* ，下面給出主要函數的聲明：

在使用的文件的cpp中聲明一個句柄：

HINSTANCE hinstDLL;

用來標識導入的動態鏈接庫。

1)、按下例說明聲明相關各個函數：(在cpp文件的頭處聲明)

typedef int (_stdcall *pOpen)(int nport, int BaudRate, int DataBits, char* Parity, int StopBits, char* User);
typedef int (_stdcall *pClose)(int nport);
typedef int (_stdcall *pSetDelay)(int nport);
typedef int (_stdcall *pComTrue)(int nport);
typedef int (_stdcall *pComWork)(int nport);

typedef int (_stdcall *pMS)(int nport, int node);
typedef int (_stdcall *pSC)(int nport, int node, int State);
typedef int (_stdcall *pMM)(int nport, int node);
typedef int (_stdcall *pTS)(int nport, int node);
typedef int (_stdcall *pReadInt)(int nport, int node, int address, int Count, char* Order, int* RxdBuffer);
typedef int (_stdcall *pReadTc)(int nport, int node, int address, int Count, int* RxdBuffer);
typedef int (_stdcall *pWriteInt)(int nport, int node, int address, int Count, char* Order, int* TxdBuffer);

typedef int (_stdcall *pSetF)(int nport, int node, int address, int Bit, char* Order);
typedef int (_stdcall *pReSetF)(int nport, int node, int address, int Bit, char* Order);
typedef int (_stdcall *pCancelF)(int nport, int node, int address, int Bit, char* Order);
typedef int (_stdcall *pCancelAllF)(int nport, int node);

typedef int (_stdcall *pSet)(int nport, int node, int address, int Bit, char* Order);
typedef int (_stdcall *pReSet)(int nport, int node, int address, int Bit, char* Order);
typedef int (_stdcall *pReadBit)(int nport, int node, int address, int Bit, int Count, char* Order, int* RxdBuffer);
typedef int (_stdcall *pReadDInt)(int nport, int node, int address, int Count,int* RxdBuffer);
typedef int (_stdcall *pReadFloat)(int nport, int node, int address, int Count, float* RxdBuffer);
typedef int (_stdcall *pWriteDInt)(int nport, int node, int address, int Count, int* TxdBuffer);
typedef int (_stdcall *pWriteFloat)(int nport, int node, int address, int Count, float* TxdBuffer);

typedef int (_stdcall *pBitBin)(int value, int Bitaddress);
typedef int (_stdcall *p32I_16h)(int value);
typedef int (_stdcall *p32I_16l)(int value);
typedef int (_stdcall *p16I_32I)(int valueH, int valueL);
typedef int (_stdcall *p32f_16h)(float value);
typedef int (_stdcall *p32f_16l)(float value);
typedef float (_stdcall *p16I_32f)(int valueH, int valueL);

2)、建立動態鏈接庫的新函數名：(在cpp文件的頭處聲明)

pOpen mOpen;
pClose mClose;
pSetDelay mSetDelay;
pComTrue mComTrue;
pComWork mComWork;

pMS mMS;
pSC mSC;
pMM mMM;
pTS mTS;
pReadInt mReadInt;
pReadTc mReadTc;
pWriteInt mWriteInt;

pSetF mSetF;
pReSetF mReSetF;
pCancelF mCancelF;
pCancelAllF mCancelAllF;

pSet mSet;
pReSet mReSet;
pReadBit mReadBit;
pReadDInt mReadDInt;
pReadFloat mReadFloat;
pWriteDInt mWriteDInt;
pWriteFloat mWriteFloat;

pBitBin mBitBin;
p32I_16h m32I_16h;
p32I_16l m32I_16l;
p16I_32I m16I_32I;
p32f_16h m32f_16h;
p32f_16l m32f_16l;
p16I_32f m16I_32f;

3)、導入動態鏈接庫，如例所示：(在cpp文件的OnInitDialog過程建立)：

hinstDLL = LoadLibrary("Omron_HostLink.dll");

4)、判斷dll文件是否存在并聲明并建立動態鏈接庫中的函數與新函數名的對應關系，

如下：(在cpp文件的OnInitDialog過程建立)：

if (hinstDLL)
{
mOpen = (pOpen)GetProcAddress (hinstDLL,"OmronComOpen");
mClose = (pClose)GetProcAddress (hinstDLL,"OmronComClose");
mSetDelay = (pSetDelay)GetProcAddress (hinstDLL,"OmronSetDelay");
mComTrue = (pComTrue)GetProcAddress (hinstDLL,"OmronComTrue");
mComWork = (pComWork)GetProcAddress (hinstDLL,"OmronComWork");

mMS = (pMS)GetProcAddress (hinstDLL,"OmronMS");
mSC = (pSC)GetProcAddress (hinstDLL,"OmronSC");
mMM = (pMM)GetProcAddress (hinstDLL,"OmronMM");
mTS= (pTS)GetProcAddress (hinstDLL,"OmronTS");
mReadInt = (pReadInt)GetProcAddress (hinstDLL,"OmronReadInt");
mReadTc = (pReadTc)GetProcAddress (hinstDLL,"OmronReadTc");
mWriteInt = (pWriteInt)GetProcAddress (hinstDLL,"OmronWriteInt");

mSetF = (pSetF)GetProcAddress (hinstDLL,"OmronSetF");
mReSetF = (pReSetF)GetProcAddress (hinstDLL,"OmronReSetF");
mCancelF = (pCancelF)GetProcAddress (hinstDLL,"OmronCancelF");
mCancelAllF = (pCancelAllF)GetProcAddress (hinstDLL,"OmronCancelAllF");

mSet = (pSet)GetProcAddress (hinstDLL,"OmronSet");
mReSet = (pReSet)GetProcAddress (hinstDLL,"OmronReSet");
mReadBit = (pReadBit)GetProcAddress (hinstDLL,"OmronReadBit");
mReadDInt = (pReadDInt)GetProcAddress (hinstDLL,"OmronReadDInt");
mReadFloat = (pReadFloat)GetProcAddress (hinstDLL,"OmronReadFloat");
mWriteDInt = (pWriteDInt)GetProcAddress (hinstDLL,"OmronWriteDInt");
mWriteFloat = (pWriteFloat)GetProcAddress (hinstDLL,"OmronWriteFloat");

mBitBin = (pBitBin)GetProcAddress (hinstDLL,"DecBitBin");
m32I_16h = (p32I_16h)GetProcAddress (hinstDLL,"Int32ToInt_16h");
m32I_16l = (p32I_16l)GetProcAddress (hinstDLL,"Int32ToInt_16l");
m16I_32I= (p16I_32I)GetProcAddress (hinstDLL,"Int16ToInt32");
m32f_16h = (p32f_16h)GetProcAddress (hinstDLL,"Float32ToInt_16h");
m32f_16l = (p32f_16l)GetProcAddress (hinstDLL,"Float32ToInt_16l");
m16I_32f= (p16I_32f)GetProcAddress (hinstDLL,"Int16ToFloat32");

AfxMessageBox("Omron_HostLink.dll已成功載入！");
}
else
{
AfxMessageBox("沒找到Omron_HostLink.dll！");
SendMessage(WM_CLOSE);
}

注：雙引號中為動態鏈接庫中的原有函數名。


函數中用到了char*型參數，這里介紹下char*與Cstring的相互轉換的函數：

(1)char*->CString

char* sz;
CString str;
str.Format("%s",sz); //可以用此函數將讀取的值轉成字符串

(2) CString -> char*

CString str;
char* sz = str.GetBuffer(0);//可將字符串轉成char*給函數賦值


5）、當不再需要使用DLL時記得關閉串口及釋放動態鏈接庫，(在OnDestroy事件中釋放)

if(hinstDLL)
{
int k = mComTrue(mnport);
if (k==1)
{
mClose(mnport);
}
FreeLibrary(hinstDLL);
}

上面的DLL使用要點也適用于其他各種windows標準DLL的VC調用。

呵呵，謝謝你的指教，不錯Fins協議是歐姆龍新版的協議對于新版的支持更好，而且支持串口、以太網等，特別是他支持CP1H、CP1L、CP1E等新出型號的W區的讀寫。數據的讀取數量也更大，本人正在仿現在的hostlink串口動態庫開發相關串口庫，以太網的等我購買了歐姆龍以太網硬件測試成功再吧。
我的目的是提高一些工控人員進行開發上位機軟件的速度，提供完整的函數接口，比開發人員自行使用協議開發要快速，特別是對于新手來說完善的使用例程更加方便了他們的使用。多語言的支持比目前很多只支持VB或VC的一些網絡流行源代碼來說適用性更好，無論使用VC、VB、delphi、CB、PB、易語言、Labview等等都可以得到完美的解決方案。不使用其他控件，完全可以制作綠色版上位機軟件，至于收費嘛，我用了時間做這個軟件自然希望得到認可，愿意不愿意用全憑各位自己，我僅提供一種便捷的方法而已。