Hi Leute,
ich suche ein gutes Tutorial zur Einarbeitung in die Interface-Programmierung. Da es sein könnte, dass ein anderer Weg besser ist, möchte ich hier die Problemstellung noch einmal Skizzieren.
Ich schreibe mehrere eigene Komponenten, die nicht den Gleichen Vorfahren haben.
Bsp.:
1. Komponente mit Vorfahren TCustomControl
2. Komponente mit Vorfahren TCustomPanel
Nun möchte ich beiden neuen Komponenten Funktionen und Proceduren geben, die gleich sind. Beide Vorfahren besitzen die Proceduren DoExit und DoEnter. Hier soll zum Beispiel selektiert und deselektiert werden. Dazu wird um die Kompo ein Rahmen mit Ziehflächen gezeichnet. An diesen kann zur Laufzeit z.B. die Größe des Controls mit der Maus geändert werden.
Zusätzlich gibt es auch noch eine Eigenschaft Selected die einführen möchte. Soweit ich weis, kann man Eigenschaften aber nicht in Interfaces packen.
Die Klassendeklaration soll dann so aussehen:
Delphi-Quellcode:
MyControl = class(TCustomControl, ISelect)
MyPanel = class(TCustomPanel, Iselect)
ISelect steht hier natürlich für meine gedachte Schnittstelle.
Dank und Gruß oki