Hallöchen ...
if (pos('!beenden',Content) <> 0) AND (AUser.Nick='chef') then IdIRC1.Disconnect;
geht wunderbar TXH! dafür
.
nun is meine Frage wie kann ich FormClose mit "!beenden" erreichen?
Delphi-Quellcode:
procedure TForm1.IdIRC1Message(Sender: TObject; AUser: TIdIRCUser;
AChannel: TIdIRCChannel; Content: String);
begin
if (pos('!quit',Content) <> 0) AND (AUser.Nick='chef') then TForm1.FormClose;
end;
???? .. Vielen Dank im Vorraus
M.