Code verhält sich unter Windows Falsch, unter Linux Richtig.

[corpsman]

Guten Morgen allerseits,

Ich habe hier ein kleines Beispielprogramm gebastelt, was ich unter Windows SVN Revision 40379 und unter Linux Aktuelle SVN Revision compiliere und Ausführe.

Unter Linux ist es wie es sein soll, bei jedem Klick auf den Button wird ein TTabsheet erstellt und ein TScrollbar beide sind sichtbar und man kann sie "bedienen".

Unter Windows sieht man nur die TTabsheets, die TScrollbars sind nicht sichtbar.

Kann den Fehler jemand nachstellen ? Habe ich Blödsinn programmiert, oder ist das ein Bug, denn ich dann reporten werde ?

Gruß

Corpsman

[theo]

Warum so complicirt?

{ s.Left := 5;
s.Top := t.Height - s.Height - 5;
s.Width := t.width - 10;}
s.Align:=alBottom; <---- So ist sauber

[corpsman]

Damits "hübsch" aussieht muss ich machen :

Code: Alles auswählen

 
  s.Align:=alBottom;
  s.BorderSpacing.Bottom:=5;
  s.BorderSpacing.Left := 5;
  s.BorderSpacing.Right := 5;  
 

Mein Problem ist damit gelöst, danke.

Dennoch sollte die andere Variante auch funktionieren, oder ?

[theo]

Dennoch sollte die andere Variante auch funktionieren, oder ?

Nicht unbedingt. Sowas macht man nicht OnCreate oder OnButtonClick sondern OnBoundsChanged oder OnResize, damit klar ist, dass das Elternelement fertig ist mit dem bestimmen der Grösse.

[corpsman]

*g*

OK, so weit hatte ich in meinem Lazarus Buch noch nicht gelesen.

Danke für die Ausführung.

[theo]

OK, so weit hatte ich in meinem Lazarus Buch noch nicht gelesen.

Naja, dazu muss man kein Buch lesen.
Spätestens beim verändern der Grösse des Containers siehst du ja, dass der Scrollbar nicht mitkommt.

[corpsman]

Da hättest du recht, wenn nicht die Form Constraints das verhindern würden *g*.

Sonst wäre mir das wahrscheindlich auch schon aufgefallen.