Wer ruft die event-Procedure auf?

[mr47]

Hi!

Ich machs gleich ganz praktisch: Ich hab ein Array mit mehreren Irc-Clients (TIdIrc). Beim erzeugen jedes TIdIRCs setze ich OnRaw auf meine selbst geschriebene IRCOnRaw:

Delphi-Quellcode:

procedure Twindow_main.IRCRaw(Sender: TObject; AUser: TIdIRCUser;
  ACommand, AContent: String; var Suppress: Boolean);
begin
  memo1.Lines.Add(AContent);
end;


{.......}

ircConnections[i].onRaw := IrcRaw;

Das funktioniert auch wunderbar. Nur jetzt hab ich zwei fragen:

1. Wie kann ich feststellen (in IRCRaw) wer die Procedure gerade aufgerufen hat. (Also welches Element aus dem Array, welches TIdIrc).
2. Was wenn zwei TidIRCs gleichzeitig dieses OnRaw auslösen. Gibt's dann ne AV?

danke und gruß

mr47

[mkinzler]

Zitat:

1. Wie kann ich feststellen (in IRCRaw) wer die Procedure gerade aufgerufen hat. (Also welches Element aus dem Array, welches TIdIrc).

Das aufrufende Objekt erhälst du im Parameter Sender.

Zitat:

2. Was wenn zwei TidIRCs gleichzeitig dieses OnRaw auslösen. Gibt's dann ne AV?

Nein,, die Methode wird 2 Mal aufgerufen.

danke und gruß

[mr47]

Zitat von mkinzler:

Das aufrufende Objekt erhälst du im Parameter Sender.

Ja theoretisch wusste ich das auch . Aber ich kann jetzt nicht ohne weiteres die Position im Array feststellen, oder?

Zitat von mkinzler:

Nein,, die Methode wird 2 Mal aufgerufen.

Okay, gut.

gruß und danke

mr47

[mkinzler]

Zitat:

Ja theoretisch wusste ich das auch Wink . Aber ich kann jetzt nicht ohne weiteres die Position im Array feststellen, oder?

Du könntest den array durchlaufen und die Objekte vergleichen oder du verwendest zum Beispiel die Eigenschaft .Tag der Kompos um die Position im array darin abzulegen.

[mr47]

Zitat von mkinzler:

Zitat:

Ja theoretisch wusste ich das auch Wink . Aber ich kann jetzt nicht ohne weiteres die Position im Array feststellen, oder?

Du könntest den array durchlaufen und die Objekte vergleichen oder du verwendest zum Beispiel die Eigenschaft .Tag der Kompos um die Position im array darin abzulegen.

Gut danke, aber wie komme ich nachher wieder an .tag ran? Denn Sender.tag gibt es nicht.....

[3_of_8]

(Sender as TComponent).Tag

[mr47]

Und ich dachte immer ich beherrsche Delphi.

Super vielen Dank!

gruß mr47

[3_of_8]

Niemand beherrscht Delphi.

[Muetze1]

Zitat von mkinzler:

Zitat:

Ja theoretisch wusste ich das auch Wink . Aber ich kann jetzt nicht ohne weiteres die Position im Array feststellen, oder?

Du könntest den array durchlaufen und die Objekte vergleichen oder du verwendest zum Beispiel die Eigenschaft .Tag der Kompos um die Position im array darin abzulegen.

Das hat aber den Nachteil, dass er alle Tags aktualisieren muss, wenn man ein Element aus dem Array entfernt oder hinzufügt.

[mkinzler]

Zitat:

Das hat aber den Nachteil, dass er alle Tags aktualisieren muss, wenn man ein Element aus dem Array entfernt oder hinzufügt.

Ich weiß ja nicht warum die Position im array so wichtig erscheint. In diesem Fall könnte er ja nicht die Tags ändern, sondern den Array nach dem .Tag des Senders durchsuchen.