使用delphi与mirc客户端进行通信

Question

是否有组件允许我与mirc通信连接到指定的服务器，然后连接到指定的通道？

在此先感谢

问候

Answer 1

您可以使用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');