使用delphi与mirc客户端通信

Question

是否有组件可以让我与mirc通信连接到指定的服务器然后加入指定的通道？

提前致谢

问候

Answer 1

您可以对Delphi使用idIRC INDY组件

idIRC - 客户端组件，提供功能齐全的IRC

OR

uses
   DdeMan;

 procedure mIRCDDE(Service, Topic, Cmd: string);
 var
   DDE: TDDEClientConv;
 begin
   try
     DDE := TDDEClientConv.Create(nil);
     DDE.SetLink(Service, Topic);
     DDE.OpenLink;
     DDE.PokeData(Topic, PChar(Cmd));
   finally
     DDE.Free;
   end;
 end;

例如

mIRCDDE('mIRC', 'COMMAND', '/dde mirc connect "" stork.doc.ic.ac.uk,6667,#mIRC,1');
mIRCDDE('mIRC', 'COMMAND', '/say Hallo');