auf einer Form ist u.a. ein PageControl mit 12 Pages.
Beim "Form-Activate" mache ich alle Tabs unsichtbar:
Code: Alles auswählen
procedure TForm1.HideAll;
var i: integer;
begin
for i:=0 to PageControl1.PageCount-1 do
begin
PageControl1.Page[i].TabVisible:=False;
end;
end;
Code: Alles auswählen
Tab_Bla1.TabVisible:=True;
Tab_Bla2.TabVisible:=True;
Tab_Bla3.TabVisible:=True;
1) TabStob funktioniert nicht, z.B. für DBEdits
2) TLabels sind nicht sichtbar
Dies passiert manchmal sofort, wenn ich die Tabs sichtbar mache.
Manchmal sind die Tabs auch in Ordnung. Wenn ich dann zwischen den sichtbaren Tabs hin- und herschalte, kommt manchmal der Fehler.
Dieser Fehler erscheint nicht auf allen Tabs. Wenn er erscheint, dann immer auf den selben Tabs.
Übrigens: Mit TNotebook habe ich den gleichen Fehler.
Was mache ich falsch?
MfG, Peter