Boa noite , estou tendo problemas com a criação de um form , pois estou 
usando ele mais de uma vez ... veja .

Unit UTDM_Dados;
.
.
.

TDM_Dados = class(TdataModule)
SQLconnection : SQLconnection;
Sds_cad : TsimpleDataSet;
Dts_cad : TdataSource;
.
.
end;
.
.
end.


-----------------------------------------------------------------------------------

Unit Utprincipal;
.
.
.


Tprimcipal = class(TForm)
.
.
Button1 : Tbutton;
.
.
DM_Dados : TDM_Dados;
.
.

End;


Procedure Tprincipal.Button1Click(sender:Tcomponent)
Var
Form : Tprincipal
Begin
Application.create(Tprincipal,Form);
Form,showModal;
Form.destroy;
End;


Procedure Tprincipal.onCreate(Sender:Tcomponent)
Begin
// inicializar o data module
DM_Dados := TDM_Dados.Create(owner);
End;

End.


Bom este é parte do meu código .. está acontecendo o seguinte :

Ao abrir meu primeiro fomulário tudo bem , faço as consultas sem 
problemas os dados são retornados e postados em Dbedits e Dbmemos sem 
problemas...

Ao clicar no button1 é criado um novo formulário (como está descrito no 
código) e após ser criado no onCreate do formulário é criado meu 
DataModule ... ótimo écriado tbm...

Porém após esta operação acontece o seguinte :

Os dados mostrados (pelos DBEdits e DBMemos) no “novo formulário” de 
alguma forma estão “ligados” ao formulário antigo ( o primeiro q foi 
criado pelo sistema ) , além de ignorar a consulta feita no novo 
formulário (pois os ddos mostrados nos DBEdits e DBMemos são os MESMO do 
formulário antigo ...) ao alterar esses componentes , os ddos 
“alterados” são enviados ao componetes do formulário antigo ....

Bom coloquei alguns callstack no programa e fui conferir oq estava 
acontecendo , ao carregar meu datamodule eu mando ele fazer uma consulta 
, p/ cada formulário ele faz uma consulta diferente , sim ..ele está 
fazendo isso mas na hora de “mostrar” os resultados o novo formulário 
ignora o resultado mostrando oq está no primeiro formulário ...

Já tentei fazer um refresh no DataSet p/ ver se os dados nos DBEdits são 
atualizados .. nada adiantou ...

Alguém pode me dar uma mão ?? oq devo fazer p/ q os dados do novo 
formulário reflitão a consulta realizada por ele .

Obrigado a todos ..

[]s





------------------------

Les mondes virtuels vous connaissez ?
Telechargez le navigateur 3D et visitez des centaines de mondes virtuels 
gratuitement !
http://www.activeworlds.fr

------------------------


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a