Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi "Oberklasse" für alle VCL-Objekte? (https://www.delphipraxis.net/39750-oberklasse-fuer-alle-vcl-objekte.html)

malo 7. Feb 2005 13:15


"Oberklasse" für alle VCL-Objekte?
 
Gibt es eine Möglichkeit, alle (!!!) VCL-Objekte in einer Klasse zusammenzufassen? Ich hatte nämlich eine Idee von einer "Kollision"-Function, die True ausgibt, wenn zwei Komponenten sich berühren bzw. schneiden (tja, ich will auch mal die Code-Library bereichern :stupid: ).

Das Problem ist aber, dass ich als Parameter angeben will, von welchen Komponenten eine Kollision geprüft werden soll. Jetzt bin ich auf der Suche, nach einer "Oberklasse", die sowohl Buttons, als auch Labels und Edits und Images (und alles andere auch) beinhaltet. Damit man beim Aufruf der Function ein beliebiges VCL-Objekt als Parameter angeben kann (Die Function soll ja möglichst flexibel sein). Geht sowas?

Ich hab das bereits mit TObjekt und TComponent versucht. Da werden zwar alle Komponenten als Parameter akzeptiert (is ja logisch...), ich kann aber keine Positionsüberprüfung durchführen (er kennt keine propertys wie Left oder Top).

Kann mir vielleicht jemand helfen? :pale:

Tyrael Y. 7. Feb 2005 13:17

Re: "Oberklasse" für alle VCL-Objekte?
 
TWinControl ist dein Freund ;)

arbu man 7. Feb 2005 13:17

Re: "Oberklasse" für alle VCL-Objekte?
 
TControl ist die antwort

malo 7. Feb 2005 13:19

Re: "Oberklasse" für alle VCL-Objekte?
 
Ah, danke :thumb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:49 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz