一、最新三菱PLC FX系列PLC編程口通信協(xié)議動(dòng)態(tài)鏈接庫(kù)DLL(以下簡(jiǎn)稱(chēng)DLL)，是為滿(mǎn)足工業(yè)通信需要，針對(duì)工業(yè)領(lǐng)域要求上位機(jī)對(duì)PLC實(shí)時(shí)采集與控制的組態(tài)編程而設(shè)計(jì)。本DLL是采用Delphi語(yǔ)言開(kāi)發(fā)的標(biāo)準(zhǔn)串口通訊庫(kù)，具有以下特點(diǎn)：
1)、實(shí)時(shí)性、可靠性好，可根據(jù)通信數(shù)據(jù)量自行調(diào)整通信時(shí)間;
2)、適用于多PLC聯(lián)網(wǎng)和上位機(jī)通信，滿(mǎn)足多方面的需要;
3)、函數(shù)接口功能全，操作簡(jiǎn)單;
4)、附加實(shí)用轉(zhuǎn)換與讀取函數(shù)，易于快速開(kāi)發(fā)(VC等非RAD開(kāi)發(fā)環(huán)境的開(kāi)發(fā))；
5)、支持USB、PC擴(kuò)展卡等擴(kuò)展串口號(hào);
6)、支持多種操作系統(tǒng)win9x/win2000/winXP;
7)、可在多種編程環(huán)境下使用，例如VB、VC、Delphi等開(kāi)發(fā)環(huán)境。
二、DLL函數(shù)說(shuō)明
1、打開(kāi)串口
Function ComOpen(nport:longint;User:Pchar):longint;stdcall;
參數(shù)：nport: 打開(kāi)串口號(hào)，取值為1～8，代表COM1～COM8;
User:DLL授權(quán)用戶(hù)名;
返回值：長(zhǎng)整型，操作成功返回1，否則返回0；打開(kāi)串口不成功即返回0時(shí)的原因：1)、串口不存在或被占用; 2)、DLL試用過(guò)期; 3)、DLL授權(quán)注冊(cè)不正確。
使用舉例：
ComOpen(1,'wjun') , 打開(kāi)COM1口。
2、關(guān)閉串口
Function ComClose(nport:longint):longint;stdcall;
參數(shù)：nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
返回值：長(zhǎng)整型，操作成功返回1，否則返回0;
使用舉例：
ComClose(1) ，關(guān)閉打開(kāi)的COM1口。
3、PLC存儲(chǔ)器的預(yù)置(D)
Function ComDWrite(nport,address:longint;sendstr:pchar):longint;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
address: 寄存器地址，取值為0～4095(此值需根據(jù)不同的PLC操作選擇合適的地址范圍);
sendstr: 給寄存器寫(xiě)入的值，該值為4個(gè)一組的16進(jìn)制字符串組其取值為0000～FFFF（整數(shù)值為0～65535），當(dāng)要寫(xiě)入多個(gè)寄存器值時(shí)依次排列即可。如給D0與D1寫(xiě)值100和1000，先將100轉(zhuǎn)成16進(jìn)制字符串0064、1000轉(zhuǎn)成16進(jìn)制字符串03E8，則sendstr=006403E8；一次最多寫(xiě)32個(gè)寄存器即字符串長(zhǎng)應(yīng)小于等于128;
－－－－－－－－－－ －－－－ ~ －－－－－－－－－
寫(xiě)字符串序列如： | 0000 | FFFF | 0010 | 0064 | ~ | 0010 | 0064 |
－－－－－－－－－－ －－－－ ~ －－－－－－－－－
返回值：長(zhǎng)整型，操作成功返回1，否則返回0;
使用舉例：
ComDwrite(1,0,‘006403E8’)，由串口1預(yù)置值D0=100，D1=1000。
4、PLC存儲(chǔ)器的讀取(C、D、T)
Function ComDRead(nport,address,Count:longint;element:Pchar):Pchar;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
address: 寄存器地址，取值為D區(qū)0～4095、C、T(定時(shí)器/計(jì)數(shù)器當(dāng)前值)區(qū)0～255;
Count: 讀取寄存器個(gè)數(shù)，最多讀取32個(gè)寄存器；DLL讀取的越界會(huì)自動(dòng)舍去
element:元件名稱(chēng)，支持D、C、T;
返回值：字符串?dāng)?shù)據(jù),字符串?dāng)?shù)據(jù)的終止符為"@";
使用舉例：
ComDRead(1,0,4,'D') ，由COM1讀取D0～D3四個(gè)寄存器的值，如返回值為“0001006403E809F0@”,則表示D0=0001, D1=0064,D2=03E8,D3=09F0;
－－－－－－－－－－ －－－－ －－－
讀字符串序列如： | 0001 | 0064 | 03E8 | 009F | | @ |
－－－－－－－－－－ －－－－ －－－
返回值為16進(jìn)制字符串,可以將返回值如上四位一組再轉(zhuǎn)換成“0～65535”的整數(shù)值。
5、PLC的多線(xiàn)圈強(qiáng)置(C、M、S、T)
Function ComEForce(nport,address:longint;element,sendstr:pchar):longint;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8, 代表COM1～COM8;
address: 位單元地址，定時(shí)器C：0～255、M：0～2047、S：0～999、T：0～255、特M: M8000～M8255;
element:元件名稱(chēng)，支持C、M、S、T;
sendstr: 給多線(xiàn)圈寫(xiě)入的值，該值為2個(gè)一組的16進(jìn)制字符串組其取值為00～FF（整數(shù)值為0～255），當(dāng)要寫(xiě)入多個(gè)值時(shí)依次排列即可。例如: 字節(jié)地址C0'(實(shí)際由位地址位C0~C7)、字節(jié)地址C1'(實(shí)際由位地址位C8~C15),如給C0'賦值80、C1'賦值CF，則sendstr=80CF；一次最多寫(xiě)64個(gè)字節(jié)，即字符串長(zhǎng)應(yīng)小于等于128;
－－－－－－－－－－ － ~ －－－－－－
寫(xiě)字符串序列如： | 00 | FF | 10 | 64 | ~ | 1F | 48 |
－－－－－－－－－－ － ~ －－－－－－
實(shí)際字符串與位地址的數(shù)值應(yīng)如下表：(將上例的字節(jié)C0'、C1'轉(zhuǎn)換為位地址C0～C15由下表對(duì)應(yīng))
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
位地址： | 7 | 6 | 5 | 4 | 3 | 2 | 1 | 0 | 15 | 14 | 13 | 12 | 11 | 10 | 9 | 8 |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
各位賦值: | 1 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 1 | 0 | 0 | 1 | 1 | 1 | 1 |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
16進(jìn)制串： | 8 | 0 | C | F |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
返回值：長(zhǎng)整型，操作成功返回1，否則返回0；
使用舉例：
ComEForce(1,0,‘C’ ,‘80CF’),DLL將按上表給相應(yīng)位強(qiáng)置值，這里地址address賦值0～7都是給C0～C15的強(qiáng)置值,因?qū)嶋H字節(jié)地址＝address div 8 (0~7 div 8 都等于0，即都是給C0'、C1'強(qiáng)置值)。
字節(jié)地址如Mx' = address div 8 ，M、S、C、T都按此公式計(jì)算如何給實(shí)際的位地址強(qiáng)置值。
6、PLC的多線(xiàn)圈讀取(C、M、S、T、X、Y)
Function ComERead(nport,address,Count:longint;element:Pchar):Pchar;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
address: 位單元地址，定時(shí)器C：0～255、M：0～2047、S：0～999、T：0～255、X：0～177(8進(jìn)制)、Y：0～177(8進(jìn)制)、特M: M8000～M8255；
Count: 讀取字節(jié)個(gè)數(shù)，最多讀取64個(gè)字節(jié);
element:元件名稱(chēng)，支持C、M、S、T、X、Y；
位單元的字節(jié)組成按8個(gè)位一組，如56（16進(jìn)制）則表示下表的位構(gòu)造值。
－－－－－－－－－－－－－－－－
位地址： | 7 | 6 | 5 | 4 | 3 | 2 | 1 | 0 |
－－－－－－－－－－－－－－－－
各位賦值: | 0 | 1 | 0 | 1 | 0 | 1 | 1 | 0 |
－－－－－－－－－－－－－－－－
16進(jìn)制串： | 5 | 6 |
－－－－－－－－－－－－－－－－
使用舉例：
ComERead(1,0,1,‘M’),如返回56（16進(jìn)制）則M0～M7的值為上表反應(yīng)的結(jié)果。0～255的位地址映射成字節(jié)地址應(yīng)為0～31。
即：實(shí)際地址＝address / 8 ,如ComERead(1,11,2,‘C’)相應(yīng)都得是C8～C15與C16～C23組合的兩個(gè)字節(jié)的值，例如返回值為“870A@”
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
位地址：| 15 | 14 | 13 | 12 | 11 | 10 | 9 | 8 | 23 | 22 | 21 | 20 | 19 | 18 | 17 | 16 | @ |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
各位賦值:| 1 | 0 | 0 | 0 | 0 | 1 | 1 | 1 | 0 | 0 | 0 | 0 | 1 | 0 | 1 | 0 | @ |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
16進(jìn)制串:| 8 | 7 | 0 | A | @ |
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
"@"為字符串?dāng)?shù)據(jù)的終止符。
DLL還提供附加函數(shù)CinBin ,可以讀出字節(jié)中相應(yīng)位的值是1還是0。
對(duì)于X、Y區(qū)線(xiàn)圈地址可以按8進(jìn)制地址轉(zhuǎn)換成10進(jìn)制后再參照上表的地址映射關(guān)系。
7、PLC的線(xiàn)圈置位(C、M、S、T)
Function ComESet(nport,address:longint;element:Pchar):longint;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
address: 位單元地址，定時(shí)器C：0～255、M：0～1023、S：0～999、T：0～255、X:0～177、Y：0～177及特M: M8000～M8255;
element:元件名稱(chēng)，支持C、M、S、T;
使用舉例：
ComESet(1,0,‘C’),由COM1給C0置位;
ComESet(1,8010,‘M’), 由COM1給M8010置位;
8、PLC的線(xiàn)圈復(fù)位(C、M、S、T)
Function ComEReset (nport,address:longint;element:Pchar):longint;stdcall;
參數(shù)：
nport: 串口號(hào)，取值為1～8，代表COM1～COM8;
address: 位單元地址，定時(shí)器C：0～255、M：0～1023、S：0～999、T：0～255、X:0～177、Y：0～177及特M: M8000～M8255;
element:元件名稱(chēng)，支持C、M、S、T;
使用舉例：
ComEReset(1,0,‘T’),給T0復(fù)位;
ComEReset (1,810,‘S’),給S810復(fù)位;
三、DLL附加函數(shù)說(shuō)明
1、串口打開(kāi)狀態(tài)的讀取
Function ComTrue(nport:longint):longint;stdcall;
參數(shù)：
noprt: 串口號(hào)，取值為1～8，代表COM1～COM8;
返回值：長(zhǎng)整型，串口打開(kāi)返回1，否則返回0;
2、整數(shù)轉(zhuǎn)換成16進(jìn)制字符串 (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CIntToHex(Cint,Digits:Longint):Pchar;stdcall;
參數(shù)：
Cint: 待轉(zhuǎn)換整數(shù)，取值為（0～65535）;
Digits: 轉(zhuǎn)換的字符串位數(shù)，指定位數(shù)小于實(shí)際位數(shù)時(shí)按實(shí)際輸出;
使用舉例：
CIntToHex(200,2),則返回字符串“C8@”;
CIntToHex(200,4),則返回字符串“00C8@”;
CIntToHex(4500,4),則返回字符串“1194@”;
CIntToHex(4500,3),則返回字符串“1194@”，因?yàn)椤?94”不足以表示4500這個(gè)數(shù)所以按實(shí)際輸出字符串“1194@”;
"@"為字符串?dāng)?shù)據(jù)的終止符。
3、16進(jìn)制字符串轉(zhuǎn)換成整數(shù) (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CHexToInt(CHex:Pchar):Longint;stdcall;
參數(shù)：
CHex: 待轉(zhuǎn)換字符串，取值為（0000～FFFF）;
使用舉例：
CHexToInt(‘03E8’),則返回整數(shù)1000;
4、抽取16進(jìn)制字符串中某個(gè)位的值
Function CinBin(CHex:Pchar;Start:longint):longint;stdcall;
參數(shù)：
CHex: 待轉(zhuǎn)換字符串，取值為（0～FFFF）;
Start: 抽取的位，取值為（0～15）;
使用舉例：
CinBin(‘0F’,3),則返回值1;
CinBin(‘0F’,4),則返回值0;
CinBin(‘03E8’,6),則返回值1;
讀取M8～M15組合成的字節(jié)值為“FC”時(shí)，要讀取M10的值時(shí)，則調(diào)用CinBin(‘FC’,3)返回值1表示M10的值為1。
5、返回字符串Text左邊的Count個(gè)字符 (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CLeftStr(Text:Pchar;Count:longint):Pchar;stdcall;
參數(shù)：
Text: 字符串原型;
Count: 指定返回左側(cè)字符串個(gè)數(shù);
使用舉例：
CleftStr('123456', 3) = '123@';
"@"為字符串?dāng)?shù)據(jù)的終止符。
6、返回字符串Text右邊的Count個(gè)字符 (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CRightStr(Text:Pchar;Count:longint):Pchar;stdcall;
參數(shù)：
Text: 字符串原型;
Count: 指定返回右側(cè)字符串個(gè)數(shù)
使用舉例：
CRightStr('123456', 3) = '456@';
"@"為字符串?dāng)?shù)據(jù)的終止符。
7、返回字符串Text從Start開(kāi)始的Count個(gè)字符 (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CMidStr(Text:Pchar;Start,Count:longint):Pchar;stdcall;
參數(shù)：
Text: 字符串原型;
Start: 指定返回字符串的起始位置;
Count: 指定返回字符串個(gè)數(shù);
使用舉例：
CMidStr('123456',2，3) = '234@';
"@"為字符串?dāng)?shù)據(jù)的終止符。
8、字符串Substr開(kāi)始于字符串S的位置 (為VC等非RAD開(kāi)發(fā)環(huán)境所增設(shè))
Function CinStr(S,Substr:Pchar):Longint;stdcall;
參數(shù)：
S: 字符串原型;
Substr: 查詢(xún)的字符串;
返回值：長(zhǎng)整型;
使用舉例：
CinStr('1Tfdg23456','2') = 6
DLL中關(guān)于傳出字符串值的函數(shù)都以"@"為字符串函數(shù)值終止符。
四、Delphi、VB、VC語(yǔ)言環(huán)境的開(kāi)發(fā)使用說(shuō)明
1、Delphi語(yǔ)言環(huán)境開(kāi)發(fā)說(shuō)明
在Delphi環(huán)境下將melsecfx.dll、serialfx.slip（許可文件）復(fù)制到應(yīng)用程序目錄下（即將上述文件與編譯后的可執(zhí)行文件方入同一文件夾內(nèi)）；
在工程文件的主程序窗體(pas)文件中聲明：
Function ComOpen(nport:longint;User:pchar):longint;stdcall;External'melsecfx.dll';
Function ComClose(nport:longint):longint;stdcall;External'melsecfx.dll';
Function ComDWrite(nport,address:longint;sendstr:pchar):longint;stdcall;External'melsecfx.dll';
Function ComDRead(nport,address,Count:longint;element:Pchar):Pchar;stdcall;External'melsecfx.dll';
Function ComEForce(nport,address:longint;element,sendstr:pchar):longint;stdcall;External'melsecfx.dll';
Function ComERead(nport,address,Count:longint;element:Pchar):Pchar;stdcall;External'melsecfx.dll';
Function ComESet(nport,address:longint;Element:Pchar):longint;stdcall;External'melsecfx.dll';
Function ComEReset(nport,address:longint;element:Pchar):longint;stdcall;External'melsecfx.dll';
Function ComTrue(nport:longint):longint;stdcall; External'melsecfx.dll';
Function CinBin(CHex:Pchar;Start:longint):longint;stdcall; External'melsecfx.dll';
其它附加函數(shù)Delphi有實(shí)用函數(shù)，建議用Delphi自帶函數(shù)，如需使用聲明參上例;
聲明后可以在程序中使用這些函數(shù)，附加函數(shù)置中除ComTrue、CinBin外Delphi系統(tǒng)自帶有類(lèi)似功能函數(shù)。通信時(shí)必須先使用ComOpen函數(shù)打開(kāi)串口，在串口打開(kāi)后可以有效操作相關(guān)函數(shù)，為確保通信可在程序運(yùn)行開(kāi)始時(shí)打開(kāi)串口，程序關(guān)閉前關(guān)閉串口。應(yīng)用程序關(guān)閉之前請(qǐng)務(wù)必將關(guān)閉所有串口，如串口未關(guān)閉前關(guān)閉系統(tǒng)將拋出異常。確保應(yīng)用程序在關(guān)閉釋放前關(guān)閉打開(kāi)的串口。解決方法，在form的OnDestroy事件中加入如下語(yǔ)句：
if ComTrue(1)=1 then ComClose（1）;
在Delphi中給中給DLL中的函數(shù)傳pchar值問(wèn)題,參考下例：
讀取多線(xiàn)圈M8～M23的值
Procedure TForm1.BitBtn1Click(Sender: TObject);
Var
elementstr,Recstr:string
Name:pchar;
address,Count:word;
begin
elementstr:=’M’;
address:=8; //地址給8～15都行，實(shí)際地址=address div 8
Count:=2;
// Recstr:= ComERead(1,address, Count,Pchar(elementstr));
//以上的用法不建議是使用，推薦用下面的用法。
try
Name:=strAlloc(8);
Name:=strPCopy(Name, elementstr); Recstr:=strpas(ComERead(1,address,Count,
Pchar(elementstr));
finally;
StrDispose(Name);
end;
end;
建議采用strPCopy()|string型轉(zhuǎn)換到Pchar型,straps()|Pchar型轉(zhuǎn)換到string型，不推薦使用直接轉(zhuǎn)換法。
上述可以詳細(xì)參照DEMO程序。
2、VB語(yǔ)言環(huán)境開(kāi)發(fā)說(shuō)明
在VB環(huán)境下將melsecfx.dll、serialfx.slip（許可文件）復(fù)制到應(yīng)用程序目錄下（即將上述文件與編譯后的可執(zhí)行文件方入同一文件夾內(nèi)）；
在工程文件中聲明：
Private Declare Function ComOpen Lib "melsecfx.dll" (ByVal nport As Long, ByVal User As String) As Long
Private Declare Function ComClose Lib "melsecfx.dll" (ByVal nport As Long) As Long
Private Declare Function ComDWrite Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal sendstr As String) As Long
Private Declare Function ComEForce Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal element As String, ByVal sendstr As String) As Long
Private Declare Function ComDRead Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal Count As Long, ByVal element As String) As String
Private Declare Function ComERead Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal Count As Long, ByVal element As String) As String
Private Declare Function ComESet Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal element As String) As Long
Private Declare Function ComEReset Lib "melsecfx.dll" (ByVal nport As Long, ByVal address As Long, ByVal element As String) As Long
Private Declare Function ComTrue Lib "melsecfx.dll" (ByVal nport As Long) As Long
Private Declare Function CinBin Lib "melsecfx.dll" (ByVal Chex As String, ByVal Start As Long) As Long
其它附加函數(shù)VB有實(shí)用函數(shù)，建議用VB自帶函數(shù)，如需使用聲明參上例;
做完上述聲明后，便可以在程序中使用相關(guān)函數(shù)了。本DLL是串口通信庫(kù)，通信時(shí)必須先使用ComOpen函數(shù)打開(kāi)串口，在串口打開(kāi)后可以有效操作相關(guān)函數(shù)，為保證通信可以在程序運(yùn)行開(kāi)始時(shí)打開(kāi)串口，程序關(guān)閉前關(guān)閉串口。在應(yīng)用程序關(guān)閉之前請(qǐng)務(wù)必將關(guān)閉所有串口，如您的程序串口未關(guān)閉前被關(guān)閉系統(tǒng)將拋出異常。當(dāng)出現(xiàn)這樣的異常請(qǐng)更改您的程序，確保應(yīng)用程序在關(guān)閉釋放前關(guān)閉打開(kāi)的串口。
解決方法，在form的Unload事件中加入如下例：
If ComTrue(1)=1 then
ComClose（1）
End if
為確保Unload事件有效執(zhí)行程序中應(yīng)使用“End”語(yǔ)句，而盡量使用“Unload”語(yǔ)句釋放所有窗體，因使用“End”語(yǔ)句系統(tǒng)不會(huì)執(zhí)行正常的窗體釋放等事件而直接退出程序，如程序中有form1，form2兩個(gè)窗體，則使用下面語(yǔ)句：
Unload form1
Unload form2
VB會(huì)在所有窗體關(guān)閉后釋放所有占用資源。
上述可以詳細(xì)參照DEMO程序。
3、VC語(yǔ)言環(huán)境開(kāi)發(fā)說(shuō)明
在VC環(huán)境下將melsecfx.dll、serialfx.slip（許可文件）復(fù)制到應(yīng)用程序目錄下（即將上述文件與編譯后的可執(zhí)行文件方入同一文件夾內(nèi)）；
在工程主文件cpp中聲明一個(gè)句柄：
HINSTANCE m_handle;
用來(lái)標(biāo)識(shí)導(dǎo)入的動(dòng)態(tài)鏈接庫(kù)。
1)、導(dǎo)入動(dòng)態(tài)鏈接庫(kù)，如例所示：
m_handle =:: LoadLibrary("melsecfx.dll");
2)、按下例說(shuō)明聲明相關(guān)各個(gè)函數(shù)：
typedef long (CALLBACK* pOpen)(long nport, char* User);
typedef long (CALLBACK* pClose)(long nport);
typedef long (CALLBACK* pDWrite)(long nport,long address, char* sendstr);
typedef long (CALLBACK* pEForce)(long nport,long address, char* element, char* sendstr);
typedef char* (CALLBACK* pDRead)(long nport,long address,long Count, char* element);
typedef char* (CALLBACK* pERead)(long nport,long address,long Count,char* element);
typedef long (CALLBACK* pSet)(long nport,long address, char* element);
typedef long (CALLBACK* pReset)(long nport,long address char* element);
typedef long (CALLBACK* pTrue)(long nport);
typedef char* (CALLBACK* pIntHex)(long Cint,long Digits);
typedef long (CALLBACK* pHexInt)( char* CHex);
typedef long (CALLBACK* pBin)( char* Chex, long Start);
typedef char* (CALLBACK* pLeft)( char* Text, long Count);
typedef char* (CALLBACK* pRight)( char* Text, long Count);
typedef char* (CALLBACK* pMid)( char* Text, long Start, long Count);
typedef long (CALLBACK* pinstr)( char* S, char* Substr);
3)、聲明并建立動(dòng)態(tài)鏈接庫(kù)中的函數(shù)與新函數(shù)名的對(duì)應(yīng)關(guān)系，如下：
pOpen cOpen = (pOpen)GetProcAddress(m_handle,"ComOpen");
pClose cClose = (pClose)GetProcAddress(m_handle,"ComClose");
pDWrite cDWrite = (pDWrite)GetProcAddress(m_handle," ComDWrite");
pDRead cDRead = (pDRead)GetProcAddress(m_handle," ComDRead");
pEForce cEForce = (pEForce)GetProcAddress(m_handle,"ComEForce");
pERead cERead = (pERead)GetProcAddress(m_handle,"ComERead");
pSet cSet = (pSet)GetProcAddress(m_handle," ComESet");
pReset cReset = (pReset)GetProcAddress(m_handle," ComEReset");
pTrue cTrue = (pTrue)GetProcAddress(m_handle," ComTrue");
pIntHex cIntHex = (pIntHex)GetProcAddress(m_handle," CIntToHex");
pHexInt cHexInt = (pHexInt)GetProcAddress(m_handle," CHexToInt");
pBin cBin = (pBin)GetProcAddress(m_handle," CinBin");
pLeft cLeft = (pLeft)GetProcAddress(m_handle," CLeftStr");
pRight cRight = (pRight)GetProcAddress(m_handle," CRightStr");
pMid cMid= (pMid)GetProcAddress(m_handle," CMidStr");
pinstr instr=(pinstr)GetProcAddress(m_handle," CinStr");
注：雙引號(hào)中為動(dòng)態(tài)鏈接庫(kù)中的函數(shù)名。
4)、接下來(lái)就可以自由使用動(dòng)態(tài)鏈接庫(kù)中的函數(shù)了，如：
cOpen(參數(shù)略);
cClose(參數(shù)略);
cDWrite(參數(shù)略);
cDRead(參數(shù)略);
cEForce(參數(shù)略);
cERead(參數(shù)略);
cSet(參數(shù)略);
cReset(參數(shù)略);
cTrue(參數(shù)略);
cIntHex(參數(shù)略);
cHexInt(參數(shù)略);
cBin(參數(shù)略);
cLeft(參數(shù)略);
cRight(參數(shù)略);
cMid(參數(shù)略);
instr(參數(shù)略);
注：函數(shù)中用到了char*型參數(shù)，這里介紹下char*與Cstring的相互轉(zhuǎn)換的函數(shù)：
(1)char*->CString
char* sz;
CString str;
str.Format("%s",sz); //可以用此函數(shù)將讀取的值轉(zhuǎn)成字符串
(2) CString -> char*
CString str;
char* sz = str.GetBuffer(0);//可將字符串轉(zhuǎn)成char*給函數(shù)賦值
5)、當(dāng)不再需要使用DLL時(shí)記得關(guān)閉串口及釋放動(dòng)態(tài)鏈接庫(kù)，如:
關(guān)閉串口
if cTrue(1)==1 then
{
cClose(1);
}
6）、釋放DLL
FreeLibrary(m_handle);
注：對(duì)于各位使用VC及其他開(kāi)發(fā)環(huán)境的朋友，我表示歉意因?yàn)槲也惶褂眠@類(lèi)軟件所以就不再寫(xiě)DEMO程序了，VC的參照上述聲明我做過(guò)測(cè)試是可以使用的，其他開(kāi)發(fā)環(huán)境我沒(méi)有測(cè)試不能保證您可以使用。
作者： wjun7610
QQ： 157610979
Email：
wjun7610@yahoo.com.cn淘寶店：
http://shop34821629.taobao.com
滬公網(wǎng)安備31010802001143號(hào)
