delphi中怎样用插件的,在线等。

xry29 2003-04-29 07:00:23
delphi中怎样用插件的,在线等。
...全文
36 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
ChinaOk 2003-04-29
  • 打赏
  • 举报
回复
http://www.chinaok.net/down/Player.zip

这个就是高人发给我的了。放这里,自己下吧。
reedseutozte 2003-04-29
  • 打赏
  • 举报
回复
插件其实就是DLL的动态调用
在transfee.dll中有一个函数FileTrans
extern "C"
int FAR PASCAL EXPORT FileTrans(char *infile,char *outfile,int tanstype)

in delphi
TFileTeans = function(infile: PChar; outfile: PChar; typetrans: Integer): integer; stdcall;
filefuntrans: TFileTeans;


hfiletrans := LoadLibrary(PChar(ExtractFileDir(Application.ExeName) + '\transfee.dll'));
@filefuntrans := GetProcAddress(hfiletrans, 'FileTrans');
if not Assigned(filefuntrans) then mntransfile.Visible := false;
if not dobackupfeeonsmp then mnftp.Visible := False;
tresa 2003-04-29
  • 打赏
  • 举报
回复
我也想要,邮箱是:tresa_chenjie@sina.com,谢谢!
ChinaOk 2003-04-29
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/TopicView1.asp?id=1707942

我前两天刚问的。
有人给我发了一个demo。
要的话我再转发给。

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧