TIdIRC Fehler mit der Userliste

[Koma-Code]

Klappt jetzt übrigens auch, für alle anderen die ähnliche Probleme haben:

Delphi-Quellcode:

procedure TForm3.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
 if idIRC1.Connected then
  begin
   if ExitStr = '' then
    ExitStr := InputBox ('Reason', 'Reason:', '');

   CanClose := false;
   IDIRC1.Quit(ExitStr);
   Timer3.Enabled := true;
  end;
end;

procedure TForm3.Timer3Timer(Sender: TObject);
begin
 Timer3.Enabled := false;
 Close;
end;