Non-Visual-Komponente > Ereignisse im OI verknüpfen

[himitsu]

Moin,

irgendwie hab ich grade ein kleines Problemchen mit meiner kleinen nichtvisuellen Komponente.

Und zwar aktuell speziell mit den Ereignis-Property.

Der relevante Teil sieht so aus:

Delphi-Quellcode:

THIDDeviceEx = Class(TComponent)
Published
  Property OnRecive: THIDEOnRecive Read FOnRecive Write FOnRecive;
End;

Als Callback wurde es so deklariert:

Delphi-Quellcode:

THIDEOnRecive = Reference to Procedure(Sender: THIDDeviceEx; Const Data; Len: Integer);
.

Leider kann man so im OI keine Methode zuordnen.
Weder eine Existierende auswählen, noch wird per Doppelklick eine erstellt.

OK, da es auch schon andere Problemchen mit dem "reference to" habe, wollte ich es mal "normal" gestalten und hab es so versucht.

Delphi-Quellcode:

THIDEOnRecive = Procedure(Sender: THIDDeviceEx; Const Data; Len: Integer) of Object;
.

Problem hierbei ist, daß dieses Property so überhaupt nicht im OI angezeigt wird.



Also, wie macht man es nun richtig?

Oder hat jemand eine Lösung, wie man das mit "reference to" zum Laufen bekommen könnte?
Eigentlich wäre es ja schön, wenn man so eine recht offene Schnittstelle bieten könnte.

[Bummi]

was sollte Dir denn der OI zur Auswahl anbieten?
Ich bezweifle dass sowas machbar ist.

[mleyen]

Zitat von himitsu:

Delphi-Quellcode:

THIDEOnRecive = Procedure(Sender: THIDDeviceEx; Const Data; Len: Integer) of Object;
.

Problem hierbei ist, daß dieses Property so überhaupt nicht im OI angezeigt wird.

Altes Package deinstallieren. Relevante DCUs löschen. Pakage neu erzeugen + installieren. Evtl noch IDE neu starten.
Spätestens so hat es bei mir immer funktioniert.

[himitsu]

@mleyen: Sowas hab ich schon versucht, aber ich versuch es noch weiter.

@Bummi: Also, da "reference to" alles aufnehmen kann, und "procedure of object" somit enthalten ist, sollten mindestens die Methoden der Form auswählbar sein.

[Bummi]

meine Zweifel bezogen sich nicht auf:
THIDEOnRecive = Procedure(Sender: THIDDeviceEx; Const Data; Len: Integer) of Object;

[himitsu]

Zitat von Bummi:

meine Zweifel bezogen sich nicht auf

Ich weiß.
"reference to" kann aber auch Objekt-Methoden aufnehmen,
sowie einfache Prozeduren, Klassen-Methoden, anonyme Methoden usw.

[himitsu]

Hab hier mal beide Varianten zusammengestellt.

Wie gesagt, bei "procedure of object" zeigt der OI die Property nicht an
und bei "reference to procedure" kann man via OI nichts zuweisen.

Die Komponente selber hat keine Funktion.
(Wurde wegen eines Fehlers im HIDControler deaktivert, nicht daß die IDE nochmal verreckt)

Aktuell wäre der Code wohl unter DelphiXE, Delphi2010 und vermutlich auch noch Delphi2009 kompilierbar.

Wobei die String-Operationen inzwischen so umgestellt wurden, daß sie auch für Nicht-Unicode-Delphis geeignet wären.
Wenn alles läuft, werd' ich mal sehn, wie ich das mit den anonymen Methoden und den Generics umgehe.
Nja, und der HID-Controler hat halt noch ein kleines Problem ... bin noch nicht mit der Umstellung auf die RAWInputs fertig (hab wohl irgendwo was vergessen).
Und das Problem mit den "reference to" ist auch noch nicht gelöst.

[shmia]

Ich würde bei "procedure of Object", also intern Datentyp TMethod, bleiben.
Diese Art von Events sind deutlich schneller und schlanker als das neue "reference to procedure" (auch bekannt als Closures).

Closures wurden IHMO nie als Ersatz für Events entwickelt.
Ausserdem können mit Closures unerwarte Dinge passieren, weil der Compiler die lokalen Variablen zum Zeitpunkt der Erzeugung des Closure "reinwurstelt".
Beispiel:

Delphi-Quellcode:

procedure TMyClass.DoStuff; 
var 
  j: integer; 
  ShowCounter: TProc; // Method without parameter. 
begin 
  ShowCounter := 
    procedure 
    begin 
      // j is known here because it is wrapped in a closure 
      // and made available to us! 
      writeln(IntToStr(j)); 
    end;

  for j := 1 to 10 do 
    ShowCounter; 
end;

[himitsu]

Dafür wäre es aber praktisch, wenn der OI diese "of Object" dann auch anzeigt, was er leider nicht macht.

Obwohl er es doch eigentlich zun sollte.

[shmia]

Zitat von himitsu:

...wenn der OI diese "of Object" dann auch anzeigt, was er leider nicht macht...

"Eigentlich" sollten die Events angezeigt werden.

Delphi-Quellcode:

Property OnRecive:   THIDEOnRecive     Read FOnRecive    Write FOnRecive;
Property OnArrival:  THIDENotifyEvent  Read FOnRemoval   Write FOnRemoval;
Property OnRemoval:  THIDENotifyEvent  Read FOnRemoval   Write FOnRemoval;

FOnRemoval wurde doppelt verwendet; das ist nicht ganz richtig.

Mir fällt auch auf:
Du hast 10 Konstruktoren, wobei man bei Komponenten nur einen Konstruktor verwenden darf/sollte:
constructor Create(AOwner: TComponent);override; Nur ein Konstruktor mit dieser Signatur wird von der VCL aufgerufen.