IRC - Channeltopic

[hibbert]

Hi,
ich benutze die Indy - IRC Komponente.

Nun möchte ich gerne das Topic eines beliebigen Channels auslesen, aber möglichst ohne diesem Channel zu joinen.

thx hibbert

[Speedmaster]

Probier mal /Info #Channelname weiss aber ned obs geht!

[ste_ett]

Per RAW den Befehl "topic #name" senden, dann Event abfangen.

Klappt nicht bei allen Channeln, bei Einige kannst du nur auslesen, wenn du drin bist.

[hibbert]

mhh ich habe das jetzt zb so gemacht:

Delphi-Quellcode:

irc1.Say('#meinChannel','topic #name');

doch es kommt keine antwort zurück.

habe ich da evtl. etwas falsch verstanden ?

thx hibbert

[Waldteufel]

Hi.

Zitat:

Zitat von hibbert

mhh ich habe das jetzt zb so gemacht:

Delphi-Quellcode:

irc1.Say('#meinChannel','topic #name');

doch es kommt keine antwort zurück.

habe ich da evtl. etwas falsch verstanden ?

Ja... ;-)

Delphi-Quellcode:

irc1.Say('#meinChannel','topic #meinChannel');

Für #name musst du den Channelnamen einsetzen...

[hibbert]

mhh habe ich auch gemacht, funzt trotzdem nicht :cry:

[hibbert]

so ich habe die sache jetzt folgendermaßen gelöst:

Delphi-Quellcode:

const channel : '#meinChannel';
{...}
procedure TForm1.Button3Click(Sender: TObject);
begin
irc1.GetTopic(channel);
end;

und

Delphi-Quellcode:

procedure TForm1.IRC1Raw(Sender: TObject; AUser: TIdIRCUser; ACommand,
  AContent: String; var Suppress: Boolean);
  var langeU, langeC:integer;
begin
langeu := length(irc1.Nick);
langec:=length(channel);

if copy(acontent,1,langeu+langec+3) = irc1.Nick+' '+channel+' :' then
 begin
 delete(acontent,1,langeu+langec+3);
 memo1.Lines.Add(acontent)
 end;
 
end;

so erhalte ich das topic, umständlich, funktioniert aber :wink: