FireMonkey Grafikfehler bei TTabControl

[AaronT]

Zitat von Darlo:

Hi,

hast Du mal folgendes ausprobiert?

Delphi-Quellcode:

  Tabcontrol1.BeginUpdate;
  tabitem1.BeginUpdate;

  //mach was

  Tabcontrol1.EndUpdate;
  tabitem1.EndUpdate;

  Tabitem1.Repaint;

Ich habe das mal in eine OnMouseDown Prcedure eines Edit Feldes geschrieben, weil ich dachte da müsste das ja wenigstens beim hineinklicken wieder funktionieren. Das editfeld ist mit mehreren Anderen Feldern in einer GroupBox und wenn ich jetzt in dieses Feld hereinklicke verschwinden sofort alle Editfelder wie in der Gif Animation von oben. Wenn ich mit der Maus über die Feld drüber fahre dann erscheinen sie wieder...

Was ist da Falsch?

Edit1: Ich habe festgestellt das eine Procedure an den Bugs schuld ist.
Diese:
[DELPHI]
procedure TFMain.OptikAnpassen(X,Y:integer);
begin

FMain.TC1.Height:=Y+20;//Anpassung der höhe von TabControl1
FMain.TC1.Width:=X;//Anpassung der Beite von TabControl1
FMain.ClientHeight:=Round(FMain.TC1.Height)+100;//Anpassung der höhe von FMain
FMain.ClientWidth:=Round(FMain.TC1.Width)+100;//Anpassung der Beite von FMain
end;
[/DELPHI

Diese Procedure bekommt als Parameter(X,Y) immer die Höhe und Breite des "Frames" auf das gewechselt werden soll, damit sich das Fenster der Größe des Frames anpasst.