"Subformulario"

[noseDeep 0]

Olá, gostaria de saber se alguem sabe como faz para criar um formulario dentro de outro formulario assim como quase todos programas granddes como photoshop etc ( voce cria um arquivo por exemplo e ele fica como um formulario filho )eu tentei colocando o parent do form pra o form pai mas Nao fica bom ..... eu queria mais ou menos o mesmo efeito do photoshop sabe

[bdexterholland 0]

crie dois forms,

o form principal deve ter a propriedade formstyle=fsMDIForm;

o form secundário deve ter a propriedade formstyle=fsMDIChild;

 

para restaurar, eu criei um botão com o código:

form2.windowstate:=wsnormal;

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif Se não for isso, seja mais claro :P

[noseDeep 0]

po cara exatamente isso vlw em ....... agora so tem um probleminha qnd eu maximiso ele redimensiona o form 'pai' como faz pra ele fica do tamanho do form pai

[bdexterholland 0]

???você dever estar clicando no maximar do form errado. no meu ficou normal, se eu quero maximizar só o form interno, eu clico no maximizar do form interno....

[noseDeep 0]

bom, claro que eu nao to fazeno um vacilo desse neh..... :P

[bdexterholland 0]

ah cara, então é o seu delphi...

[noseDeep 0]

axo q era por causa do dbgrid al client qnd tirei paro ah dexa isso pra la to agarrado com otra coisa maisi mportante hehe

[noseDeep 0]

bom, ta aconteceno o seguinte aki estou usando o segunte codigo para chamar o formulario// Abre o formulário de animais frmCadastroAnimal := TfrmCadastroAnimal.Create(self); frmCadastroAnimal.Parent := frmPrincipal; frmCadastroAnimal.show;mas ele da um erro saka soh....."Cannot focus a disabled or invisble window"o q isso significa? ta errado meu codigo ?

[bdexterholland 0]

Bom, preciso testar seu código e agora não vai ser possível, meu pc está sendo formatado agora (neste instante) e este pc que eu tô usando não tem o delphi mas esse erro ocorre quando a aplicação tenta ativar algum componente ainda não exibido...

frmCadastroAnimal := TfrmCadastroAnimal.Create(self);frmCadastroAnimal.Parent := frmPrincipal;frmCadastroAnimal.show;

Não tenho certeza do resultado, mas tenta isso:

frmCadastroAnimal := TfrmCadastroAnimal.Create(frmPrincipal);frmCadastroAnimal.show;

[noseDeep 0]

funciono! vlw em brother abraçao!

[evertondelphi 0]

tenta esse:aqui sempre deu certo tbfrmCadastroAnimal := TfrmCadastroAnimal.Create(application);frmCadastroAnimal.show;

[noseDeep 0]

hey outro rpobleminha com esse codigo, qnd eu do um right click mesmo q seja no form aberto ( o subform ) ele aciona o pop up meno do debaixo tem como arrumar isso?