Befehle erstellen

[fLaSh11]

Zitat von himitsu:

if copy(Msg.Text, 1, 6) = '/kick ' then begin
name := copy(Msg.Text, 7, ...)
...
end

Nicht zu empfehlen... was ist, wenn der Befehl einmal lauten sollte "/abrakadabra" dann ist nichts mehr mit Copy(Text, 1, 6). 8)

Wenn dann lieber so:

Delphi-Quellcode:

if s[1] = '/' then  // Prüfen, ob Befehl!
  begin
    befehl := Copy(s, 2, Pos(' ', s) - 1);  //dynamisch den Befehl abfragen
    if befehl = 'kick' then
      user := Copy(s, Pos(' ', s) + 1, Length(s));  //wenn Befehl "kick" dann schauen, welchen User
  end;

Das mit dem dynamischen Überprüfen solltest du dir zu Gemüte führen... versteht man nicht auf Anhieb