Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by hronny,
31. Mai 2009
Ich denke ich habe es selbst herausgefunden. Man muss die protected Routine "AdjustClientRect" des eigenen Panels überschreiben. Dort kann man dann nach belieben die Ränder/Größe anpassen, die die Childs haben sollen....
protected
procedure AdjustClientRect(var Rect: TRect); override;
...
procedure TMyPanelExt.AdjustClientRect(var Rect: TRect);
begin
inherited AdjustClientRect(Rect);...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by hronny,
31. Mai 2009
Genau es geht um die Restgröße. Evtl ist es das ClientRect? Es geht einfach darum, wenn ich z.B. ein eigenes Panel zeichnen möchte, mit anderen Rahmen als "der Standard" muss ich eine Klasse erzeugen und die Paint Routine überschreiben.TMyPanelExt = class(TCustomControl)
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
protected
procedure...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by hronny,
31. Mai 2009
Hi!
Wenn man z.B. 2 Panels ineinanderlegt, und dem innenliegenden Panel die EigenschaftAlign := alClientgibt, dann passt sich das Panel automatisch IN das andere Panel ein. Die Größe wird dabei aber von 2 Faktoren zusätzlich beeinflusst: Bevel und Border. Je nachdem was und wieviel eingestellt ist, wird die Größe des innenliegenden Objektes verändert.
Worauf ich hinaus möchte: Wenn man nun...