neue ListBox abgeleiten (OOP)

[Christian Seehase]

Moin Alex,

ich hab' das jetzt nicht in allen Einzelheiten analysiert, aber da das HeaderControl die ListBox als Parent erhält, muss Du die Positionierung auch entsprechend wählen.

Hierdurch:

Delphi-Quellcode:

Self.Left    := 248;
Self.Top     := 36;

FHeaderControl.Left   := 248;
FHeaderControl.Top    := 15; 
FHeaderControl.Parent := Self;

wird die Komponente auf Position (248,36) relativ zum Parent der Komponente angezeigt, und das HeaderControl auf (496,51), relativ zum Parent der Komponente.
Ich vermute mal, dass das ausserhalb des sichbaren Bereiches liegt.
Probier's mal mit

FHeaderControl.Left := 0; Ein Control wird immer relativ zum Parent angezeigt.