Tente criar no Form2 uma variável pública do tipo TClientDataSet e sete-a na
abretura do Form2 pelo Form1...

 

Ex: (No chamada do Form2 pelo Form1)

 

  Form2 := Tform2.Create(Application);

  Form2.Client := SeuClientDataSet;

  Form2.ShowModal;

  FreeAndNil(Form2);

 

No momento de utilizá-lo, tente um typecast como exemplificado abaixo...

 

Ex.: (No botão do Form2, que mandará informações para o Client do Form1)

 

  TClientDataSet(Client).EmptyDataSet;

  TClientDataSet(Client).Append;

  ... passa-se as informações ...

  TClientDataSet(Client).Post;

 

  OBS.: Onde “Client” é a variável pública que vc criou...

 

Dessa forma acho que funfa... mas não tentei... é um exemplo de cabeça...
testa aí e nos diz o resultado...

 

Rodrigo Madureira Barbosa

 

  _____  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Tavares
Enviada em: segunda-feira, 5 de fevereiro de 2007 09:21
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Fazer referencia ao DataSource do form chamador
Prioridade: Alta

 

Bom dia a todos,

Trabalho com 2 forms dessa forma: O primeiro possui o dbgrid e o TDataSource
que faz a ligacao do banco. A partir desse formulario tenho funções (botoes)
que chama um outro formulario que permite fazer manutenção (inclusao, etc.)
na referida tabela. Este form de manutenção atende a diversos cadastros, ou
seja, o mesmo é criado para diversas tabelas do mesmo banco.
Minha duvida esta em como fazer referencia, de forma dinamica, ao Form 1 que
chamou o form 2, pois o form1 muda de acordo com a tabela chamada.
Tenho como fazer essa referencia no form2, sem que eu informe no USES do
form2 a unit do form1?

Um abraço.

Tavares
"Tudo que nos acontece nos favorece se a gente não se aborrece e agradece."
(Frei Pascoal)

 



[As partes desta mensagem que não continham texto foram removidas]

Responder a