vcadanos

Boa Tarde, Estou fazendo alguns testes com unigui usando um exemplo do Afonso(// Só que uma coisa que não consegui foi que ao adicionar por exemplo um grid dentro do frame ao carregar o tabsheet que é criado dinamicamente não fica alclient .. Ja aquelas tabsheet que eu crio fixo funciona legal, preenchendo a tela toda., Alguém tem alguma dica ou um exemplo segue o código que uso para criar a tabsheet dinamicamente. procedure TMainForm.NovaAba(nomeFormFrame: TFrame; descFormFrame: string; Fechar: Boolean); var TabSheet :TUniTabSheet; FCurrentFrame :TUniFrame; I :Integer; begin pagePrincipal.Visible := True; {Verificando se a tela já está aberto e redireciona a ela} for I := 0 to pagePrincipal.PageCount - 1 do with pagePrincipal do if Pages.Caption = descFormFrame then begin pagePrincipal.ActivePageIndex := I; Exit; end; TabSheet := TUniTabSheet.Create(Self); TabSheet.PageControl := pagePrincipal; TabSheet.Caption := descFormFrame; TabSheet.Closable := Fechar; FCurrentFrame:= TUniFrameClass(nomeFormFrame).Create(Self); with FCurrentFrame do begin Align := alClient; Parent := TabSheet; end; Refresh; pagePrincipal.ActivePage := TabSheet; end;