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

解决方案 »

  1.   

    http://expert.csdn.net/Expert/TopicView1.asp?id=1707942我前两天刚问的。
    有人给我发了一个demo。
    要的话我再转发给。
      

  2.   

    我也想要,邮箱是:[email protected],谢谢!
      

  3.   

    插件其实就是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;
      

  4.   

    http://www.chinaok.net/down/Player.zip这个就是高人发给我的了。放这里,自己下吧。