Não precisa clonar tudo. Basta clonar apenas os ClientDataSets.
Atte,
Ricardo.
1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
compreendida.
3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!
--- Em qua, 14/4/10, Dimas <dimasbr...@uol.com.br> escreveu:
De: Dimas <dimasbr...@uol.com.br>
Assunto: RES: [delphi-br] Abrir duas ou mais vezes o mesmo formulario.
Para: delphi-br@yahoogrupos.com.br
Data: Quarta-feira, 14 de Abril de 2010, 21:49
Exatamente, todos meus formulários usam um DataModule onde ficam
as procedures, tabelas, dataset etc.
Para qualquer componente faço referencia ao Datamodule.
Depois irei fazer um teste criando outro formulario e colocando as tabelas,
dataset.. etc
e ver qual sera o resultado.
“Pensei que seria mais facil resolver..mas. . fazer o que ....rs”
Obrigado.
_____
De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em
nome de Dirlei
Enviada em: sábado, 21 de novembro de 2009 15:29
Para: delphi...@yahoogrup os.com.br
Assunto: Re: [delphi-br] Abrir duas ou mais vezes o mesmo formulario.
Provavelmente o formulário que você cria mais de uma vez usa um dataset
que está em um datamodule/formulá rio geral para a aplicação. Se for
isso, você precisa que o dataset esteja dentro do formulário que será
aberto múltiplas vezes para que sejam criadas múltiplas instâncias do
dataset também.
Dirlei.
Em Qua, 2010-04-14 às 08:23 -0300, Dimas escreveu:
>
> Bom dia pessoal.
>
> Utilizo Delphi 7.
>
> Preciso abrir um formulario de Agenda duas ou tres vezes, pesquisar
>
> por Periodo e mostrar em um DbGrid o resultado.
>
> Tenho uma rotina que faz isto POREM, o que faço em um formulario
>
> reflete automaticamente no outro, ou seja, ate abre varias Agendas mas
>
> fica sempre o mesmo resultado em todas. Preciso que em cada
>
> uma tenha o seu proprio resultado.
>
> Rotina para abrir a Agenda:
>
> With TFrmAgenda.Create( Self) do
>
> begin
>
> Show ;
>
> Windows.SetParent( handle, Self.handle ) ;
>
> end ;
>
> Observação: já coloquei no formulario no evento onClose Action :=
> caFree;
>
> Obrigado.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
