Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dataspider,
7. Dez 2005
Hi,
da du von TComponent ableiten willst, hast du ja nur den Owner und kein Parent.
Also muss du prüfen, of der Owner von TWinControl abgeleitet ist und dann von diesem ClientHight und ClientWidth abfragen:
if Owner is TWinControl then
with TWinControl(Owner) do
begin
Width := ClientWidth;
Height := ClientHeight;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dataspider,
7. Dez 2005
Hi,
erst mal eine grundsätzliche Frage. Leitest du deine Komponente von TControl ab?
Dann existiert das Property Align bereits. Kann nur sein, dass du durch Überschreiben des Properties die Sichtbarkeit auf Puplished ändern musst.
Gruß, Frank