Popupmenü von Nickliste - IRC-Client

Chrisssss · Hält's aus hier Beiträge: 6

Hallo,

Bei meinem IRC-Clienten möchte ich, dass wenn ich auf eine Person in der Nickliste (ListBox1) rechtsklicke, dass ich dann z.B. Begrüßen wählen kann, und er dann schreibt "'eigener_Nick' begrüßt 'Nick' höchstpersöhnlich'". Wie kann ich das machen?

Kann mir da jemand weiterhelfen?

Zum senden wird IDIRC1.Say('#chatprog', text); benutzt.
"text" ist ein String.

Harry Hunt · Beiträge: 50

Ich versteh nicht ganz, was genau du wissen möchtest.

Also normalerweise packst du ein TPopupMenu auf dein Formular und benutzt den Menü-Editor (doppelklick auf das PopupMenu) um die Einträge zu erzeugen. Dann weist du z.B. dem Eintrag für Begrüßen ein "OnClick" event zu und in dieses event Schreibst du sowas wie:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

begin
  if ListBox1.ItemIndex >= 0 then
  begin
    IDIRC1.Say('#chatprog', EigenerNick + ' begrüßt ' + ListBox1.Items[ListBox1.ItemIndex] + ' höchstpersönlich.'); 
  end
  else
    ShowMessage('Kein Kontakt ausgewählt.');
end;

Jetzt musst du nur noch der ListBox dein PopupMenu zuweisen und dann müsste das eigentlich funktionieren.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme