Kleine Frage zum IdIRC ..

[Die Muhkuh]

Jau:

Delphi-Quellcode:

procedure TForm1.IdIRC1Message(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel; Content: String);
var
Temp: String;
begin
  if Content[1] <> '!' then
    exit;

  if Pos('!join', Content) <> 0 then
  begin
    Temp := Copy(Content, Pos('!join', Content), Length(Content));
    IdIRC.Join(Temp);
  end;
end;