IdIRC - problem z argumentami

0

Chodzi o komponent IdIRC, czyli o komponent z pakietu Indy, który jest szkieletem klienta sieci IRC. Dokładniej o zdarzenia (w tym wypadku OnKicked, czyli po wykopaniu użytkownika z kanału). Próbuję wprowadzić do komendy dwa argumenty (Auser i Achannel), które spowodowały by powrót na kanał i odezwanie się do osoby, która nas wykopała, jednak pojawiają mi się błędy, że jest nieprawidłowy typ. Próbowałem już String(Achannel), Pchar(AChannel), ale powstają bzdury. Jeśli ktoś się na tym zna i rozumie o co mi chodzi proszę o pomoc. Z góry thanks.

procedure TForm1.ircKicked(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel);
begin
irc.Join(Achannel);
irc.Say(Auser,'Za co ten kick?');
end;

RAPORT DEDUGGERA:
[Error] Unit1.pas(332): Incompatible types: 'String' and 'TIdIRCChannel'
[Error] Unit1.pas(333): Incompatible types: 'String' and 'TIdIRCUser'

0

Więc zobacz, co to za typ TIdIRCChannel. Może to jakiś rekord? Sprawdź w helpie, lub ctrl+click na tym.

0

Wlaśnie o to mi chodzi. Czy ktoś nie wie jak to jest zbudowane?

0

Wlaśnie o to mi chodzi. Czy ktoś nie wie jak to jest zbudowane?

Ctrl+Klik na tym typie - i sam zobaczysz.

// omg, zmniejsz rozmiar stopki - ŁF

/dobra - teraz jest bardziej pozioma

0
procedure TForm1.ircKicked(Sender: TObject; AUser: TIdIRCUser;
  AChannel: TIdIRCChannel);
begin
irc.Join(Achannel.name);
irc.Say(Auser.nick,'Za co ten kick?');
end; 

1 użytkowników online, w tym zalogowanych: 0, gości: 1