幫我看看這dll如何改 謝謝(100分)

  • 主题发起人 主题发起人 chihotsai
  • 开始时间 开始时间
C

chihotsai

Unregistered / Unconfirmed
GUEST, unregistred user!
幫我看看這dll如何改 謝謝

library DevLink;
uses Windows, Messages;

procedure CloseDevice; stdcall; external 'Dev.dll';
procedure OpenLinkDevice(D:DWORD); stdcall; external 'Dev.dll';
procedure ReadIOData(var P1: longint;P2: longint; var P3:longint); stdcall; external 'Dev.dll';
procedure WriteIOData(var P1: longint;P2: longint; var P3:longint); stdcall; external 'Dev.dll';

procedure CloseDevice; stdcall; BEGIN CloseDevice; END;
procedure OpenLinkDevice(D:DWORD); stdcall; BEGIN OpenLinkDevice(D); END;
procedure ReadIOData(var P1: longint;P2: longint; var P3:longint); stdcall;
BEGIN
ReadIOData(P1,P2,P3);
END;
procedure WriteIOData(var P1: longint;P2: longint; var P3:longint); stdcall;
BEGIN
WriteIOData(P1,P2,P3);
END;

exports
CloseDevice;
OpenLinkDevice;
ReadIOData;
WriteIOData;

begin
end.
需要更詳細 請加chihotsai@hotmail.com
 
正常 AP-->DevLink.dll的OpenLinkDevice(0);
DevLink.dll改名為Dev.dll
自建一個DevLink.dll
AP-->DevLink.dll的OpenLinkDevice(0);-->Dev.dll的OpenLinkDevice(0);
這樣AP如何呼叫使用OpenLinkDevice(0);就可以印出來
但現在如何讓DevLink.dll去呼叫Dev.dll呢
函數名稱相同
 
簡化一點
library DevLink;
uses Windows;
procedure OpenLinkDevice(D:DWORD); stdcall; external 'Dev.dll';
procedure OpenLinkDevice(D:DWORD); stdcall; BEGIN OpenLinkDevice(D); END;
exports OpenLinkDevice;
begin
end.
 
后退
顶部