Komponente verschieben, die keine Ereignisse besitzt

[Die Muhkuh]

Hi,

ich hab eine Komponente die keine Ereignisse besitzt. Wie kann ich eine solche Komponente verschieben? Wenn die Ereignisse OnMouseDown und OnMouseMove da wären, wäre es kein Problem, aber wie geht es ohne?

*MFG*

[shmia]

Zitat von Spider:

ich hab eine Komponente die keine Ereignisse besitzt. Wie kann ich eine solche Komponente verschieben? Wenn die Ereignisse OnMouseDown und OnMouseMove da wären, wäre es kein Problem, aber wie geht es ohne?

Ist die Komponente von TControl abgeleitet ?
Falls ja, ist es kein Problem die fehlenden Events im Objektinspektor sichtbar zu machen.

Delphi-Quellcode:

TDeineKompo = class(TWinControl)
...
published
   property OnMouseDown;  // Events im OE sichtbar machen
   property OnMouseUp;
   property OnMouseMove;
end;

Falls nein, ist die Komponente kein Steuerelement und dürfte zur Laufzeit gar nicht sichtbar sein.
Hast du keinen Sourcecode für die Komponente ? Dann ab in die Tonne damit !

[ripper8472]

was ist das für eine kompo?
vielleicht diese kompo selber nochmal von einem vorfahren ableiten und dann die onmouse* events public machen... ist nur ne idee

[Die Muhkuh]

Ok, die kompo ist abgeleitet von TControl. Den Rest bekomm ich glaub ich selbst hin