SOLUÇÃO: TabSheet contendo Form

Delphi

28/01/2004

Tentei achar uma solução simples e a encontrei.
Se alguém encontrar outra, por favor, poste-a.

Um abraço,
Brian, SC.

--------------------------------------------
1. É preciso definir a propriedade Parent do Form q se quer colocar dentro do TabSheet como no exemplo abaixo:
[b:bbb1d12c46]Form.Parent:=TabSheet;[/b:bbb1d12c46]

2. Para exibi-lo:
[b:bbb1d12c46]Form.Show;[/b:bbb1d12c46]

3. Se quiser incrementar o trabalho, defina a propriedade WindowState desse mesmo Form como [b:bbb1d12c46]wsMaximized[/b:bbb1d12c46] e a BorderStyle como [b:bbb1d12c46]bsNone[/b:bbb1d12c46].

--------------------------------------------
[b:bbb1d12c46]Para melhorar o exemplo:[/b:bbb1d12c46]

a. Crie dois Forms e coloque no primeiro um componente TPageControl e um Botão qualquer

b. Adicione um TabSheet ao PageControl

c. No evento OnClick do Botão insira o seguinte código:
Form1.Parent:=TabSheet1;
Form1.Show;

d. Defina as propriedades do Form2 como descrito no tópico 3.

Está feito.


Cesarfk

Cesarfk

Curtidas 0
POSTAR