Luciano... a sua variavel está declarada errada, quando eu disse que é do tipo TForm, é do tipo TForm que é o nome do Form da sua aplicação... Exemplo: vForm : TFrmCadCredores; vForm1 : TFrmConsulta;
então...vc colocar "T" + NOME DO SEU FORM. Espero ter ajudado. Abraços ----- Mensagem original ---- De: Luciano Angelini <[EMAIL PROTECTED]> Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 6 de Agosto de 2007 9:54:24 Assunto: Re: Res: [delphi-br] Re: Duvidas com Form´s Ribamar Souza e Ricardo .... eu mudei e ficou assim: no form FrmCadCredores: Cadastro_Credor : Tform ; e no form FrmConsulta_ Credores ficou assim procedure TFrmConsulta_ Credores. DBGrid1DblClick( Sender: TObject); begin With FrmDm do if not CDSCredores. isempty then begin with Cadastro_Credor do begin edit1.text := DBGrid1.DataSource. DataSet.Fields[ 0].Text ; Edit1.setfocus ; FrmConsulta_ Credores. close ; Cadastro_Credor := nil ; show end ; end; end; só que quando os dois cliques no DBGrid para selecionar o Registro da esse erro: Access Violation At Address 0047C806 in module 'SisRecibo.exe' . Read of address 000002F4 Desde ja agreço a atenção de vcs !!!!! Ribamar Sousa escreveu: > > Boa Tarde, > > estou fazendo um aplicativo simples, e estou utilizando o mesmo > conceito que o seu Luciano, e faço da seguinte mandei: > > FormA : Cadastro de Produto > Tenho um Botão Localizar, que neste Botão eu crio uma variavel do tipo > TForm( vPesquisa : TFrmPesquisa ), onde dou o Application. CreateForm > ... e dps dou o ShowModal para chamar o meu form( FormB : Pesquisa )... > No FormB tenho um dbGrid e um Edit, que pesquiso pelo nome do produto, > ou qualquer outro tipo de pesquisa do meu sistema, no no DoubleClick > do DbGrid, eu carrego as informações da minha pesquisa para o FormA, > ou FormC ... etc... > Sendo que eu sempre dou um CLOSE, para fechar o meu FormB e também no > OnClose do FormB eu faço: Action := caFree; ... para liberar o form da > memoria.. e não tive problema algum.... > Qualquer dúvida é so perguntar... > Espero ter ajudado... > > Abraços > Ribamar Sousa Filho > > ----- Mensagem original ---- > De: Celio Ricardo <[EMAIL PROTECTED] com.br > <mailto:ricknetbr% 40yahoo.com. br>> > Para: [EMAIL PROTECTED] os.com.br <mailto:delphi- br%40yahoogrupos .com.br> > Enviadas: Sexta-feira, 3 de Agosto de 2007 13:10:57 > Assunto: [delphi-br] Re: Duvidas com Form´s > > Nao entendi bem, > mas parece que voce esta fechando, mas nao liberando a variavel > Tela_Cadastro_ Credor da memoria > > Tente: > Tela_Cadastro_ Credor := nil; //apos o close > > E, no OnClose do form, colocar: > action: caFree; > > Abraços e Sucesso! > Ricardo > > --- Em [EMAIL PROTECTED] os.com.br, "l_o_angelini" > <luciano.angelini@ ...> escreveu > > > > Boa Tarde ..... > > Estou tendo um pequeno problema ... > > Tenho no meu aplicativo dois form´s FrmCadCredores e > > FrmConsulta_ Credores, no form FrmConsulta_ Credores tenho um DBGrid, > > que nele ficam os resultaddos da busca com SQL, quando dou doism > > cliques no Registro no DBgrid... fecha o form FrmConsulta_ credores e > > traz pra o Form FrmCadCredores o Código do Credor pesquisado. No > > entanto vou precisar usar esse form FrmConsulta_ Credor em outra > parte > > do aplicativo, para não precisar toda vez criar o mesmo form. > > Tentei criar um variavel: > > Tela_Cadastro_ Credor : Tform > > Assim que clico no botão para abrir o form FrmConsulta_ credor ele > > carrega a variavel: > > Tela_Cadastro_ Credor : FrmCadCredores ; > > e mudei o DBGridDblClick do DBgrid: > > > > procedure TFrmConsulta_ Credores. DBGrid1DblClick( Sender: TObject); > > begin > > With FrmDm do > > if not CDSCredores. isempty then > > begin > > with Tela_Cadastro_ Credor.create( self) do > > begin > > Show ; > > Edit1.Text := DBGrid1.DataSource. DataSet.Fields[ 0].Text ; > > Edit1.setfocus ; > > FrmConsulta_ Credores. close ; > > end; > > end ; > > end; > > > > Acontece que da um erro dizendo que o Painel1 ja existe.. na > verdade > > o Painel1 tem nos dois form´s... troquei o nome dos dois passando > > para painel_Cadastro e painel_consulta. .. da o erro dizendo que o > > painel_Cadstro ja existe !!! > > Gostaria de saber onde possa estar acontecendo o erro e se alguem > tem > > uma outra solução !!!! > > > > > > Obrigado pela Antenção !!! > > > > Luciano > > Lupionópolis- Pr > > > > Alertas do Yahoo! Mail em seu celular. Saiba mais em > http://br.mobile. yahoo.com/ mailalertas/ > <http://br.mobile. yahoo.com/ mailalertas/> > > [As partes desta mensagem que não continham texto foram removidas] > > Alertas do Yahoo! Mail em seu celular. Saiba mais em http://br.mobile.yahoo.com/mailalertas/ [As partes desta mensagem que não continham texto foram removidas]