Menu Janela na Aplicação

Delphi

13/06/2004

[color=green:960c620797]Olá galera, :D :D :D :D
Estou com uma aplicação e preciso do seguinte: que no menu janela da aplicação ele exiba todos os form´s que já estiverem criados e quando eu clicar no item correspondente, ele envie o form para frente. Ex.: Item do Menu: Cadastro de Cliente (quando eu clicar nele ele envie o form de cadastro de cliente para frente). Tipo aquele do Word quando a gente abre muitos arquivos e eles ficam como item do menu janela.
Obrigado pela força.
T+ ou -.[/color:960c620797]


Dbergkamps

Dbergkamps

Curtidas 0

Respostas

Carlosmielke

Carlosmielke

13/06/2004

a cada janela que vc abrir incremente o TMenuItem responsável pela lista de telas criadas. Crie um array para controlar esses eventos.

E no clique do MenuItem coloque o seguinte:

if not assigned(nomeform) then
nomeform:=Tnomeform.create(self)
else
nomeform.bringtofront;

Para capturar as janelas criadas faça um loop no clique do menu da janela principal e grave em um array a classe de cada janela

o seguinte loop retorna as telas criadas

for x:=0 To Screen.FormCount-1 do

qualquer duvida avisa

carlos mielke


GOSTEI 0
Dbergkamps

Dbergkamps

13/06/2004

valeu pela ajuda cara, vou tentar e qualquer eu te retorno.


GOSTEI 0
POSTAR