Property nur Lesen kann nicht zugewisen werden

[Muetze1]

Zitat von Cyberaxx:

Wenn sich die Anzahl der Verbindungen oder Benutzer verändert, will ich in den Fall meiner haupt Form das mitbekommen.

Und dazu musst du den Eventhandler zuweisen. Dies machst du hier auch:

Delphi-Quellcode:

procedure TMain_Form.FormCreate(Sender: TObject);
begin
  ServerPA := TServerPA.Create(Self, Memo1.Lines);
  ServerPA.OnUserStatus := GetUserStatus;
end;

Somit muss er schreibbar sein, wie willst du ihm sonst was zuweisen. Und warum darf das Ding nun nur lesen sein? Was willst du damit bezwecken?

[xaromz]

Hallo,

irgendwie habe ich das Gefühl, dass Du das Konzept der Ereignisse in Delphi noch nicht ganz verstanden hast. Ein Ereignis ist ja nichts anderes als eine Variable, die auf eine Methode zeigt. Diese wird dann aufgerufen, wenn das Ereignis auftritt. Wenn Du also Ereignisse nutzen willst, bleibt Dir eigentlich nichts anderes übrig, als diese beschreibbar zu machen. Wie soll sonst die Klasse wissen, welche Methode sie aufrufen soll, wenn das Ereignis eintritt? Die einzige sinnvolle Alternative hat alzaimar ja schon genannt.

Gruß
xaromz

[Cyberaxx]

Die Anzahl der Verbindungen wird ja vom Socket geliefert.

Ich darf sie also nicht verändern. Darum dachte ich eigentlich das das Read eben reicht.

[SirThornberry]

ich hab das gleiche Gefühl wie xaromz.
Wenn der Nutzer keine Event-Methode zuweisen kann bekommt er auch nie das Event augelöst. Folglich kannst du dann gleich das Event weglassen. Wenn du aber willst das dieses Event ausgelöst werden kann so musst du auch die Möglichkeit bieten das jemand auf das Event reagieren darf und somit auch eine Ereignisprocedure zuweisen kann.

Was du vor hast wäre als wölltest du verbieten das mit dem Button eine OnClick-Methode zuweisen kann. Dann würde man genau so wenig mitbekommen wenn der Button geklickt wird.

[Muetze1]

Zitat von Cyberaxx:

Die Anzahl der Verbindungen wird ja vom Socket geliefert.

Ich darf sie also nicht verändern. Darum dachte ich eigentlich das das Read eben reicht.

Du weist doch nur eine Methode zu welche aufgerufen werden soll, wenn du das machen willst in deiner Komponente. Keiner kann die Anzahl der User verändern in dem Event. Du übergibst die Anzahl der Benutzer als const Parameter (ergo, nicht veränderbar) und der Property kann nur eine Methode zugewiesen werden. Wo bitte, sollte man die Anzahl der Benutzer ändern können? Allein deine Komponente legt doch beim Aufruf der Methode fest, was du für die Anzahl der Benutzer übergibst.

Wenn du einem Button das OnClick zuweist: kannst du dort irgendwo den Click so verändern dass er nicht auftritt oder vllt. zum Tastendruck wird?

[dataspider]

...
und es macht auch keinen Sinn, mit einem Ereignis Zustandsmeldungen zu versenden.
Für dein Property OnUserStatus reicht TNotifyEvent.
Damit übergibst du deinen Server im Parameter Sender (siehe mein Beispiel).
Dann sollte dein TServerPA 2 ReadOnly Propertys ConnectedUserCount und ConnectionCount besitzen.
Damit kann ich mir in meiner Ereignisbehandlungsmethode die Infos über TServerPA(Sender).ConnectionCount etc. zur Anzeige im Form holen.

Das Ereignis sollte nur über die Zustandsänderung benachrichtigen.

Frank