RES: [delphi-br] Erro ao acessar form

Walter Alves Chagas Junior Thu, 24 Aug 2006 11:10:23 -0700

BOM,

Depende da forma e de quando voce está pegando os dados do form recem
criado. Quando eu preciso fazer alguma coisa que pegue valores em um form,
eu faço da seguinte forma:



  try
   FContrato := TFContrato.Create(self);
   FContrato.ShowModal;
   Var1 := FContrato.Var1;
   Var2 := FContrato.Var2;
   ...
  finally
     FreeAndNil(FContrato);
  end;


[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações S/A
Belo Horizonte - MG - Brasil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200

Parabens Telemont - Somos a 8ª maior empresa do Brasil no segmento de
construção!!


-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Alex Canario
Enviada em: quinta-feira, 24 de agosto de 2006 10:55
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro ao acessar form


Pessoal bom dia a todos, 

 

Estou criando um form da seguinte forma.

 

  try

     FContrato := TFContrato.Create(self,
FDM.dtContratos_ax1.FieldByName('COD_CONTRATO').AsString);

     FContrato.ShowModal;

  finally

     FreeAndNil(FContrato);

  end;

//Crio dessa forma para passar o parametro na criação para o form novo.

 

Porem ao tentar acessar qualquer objeto no form criado dessa maneira, ocorre
o excessao de Access Violation.

 

Fcontrato.btSalvar.Enabled := False;

 

Obrigado a quem puder me ajudar;

 

Alex Canário

 



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






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


 
Links do Yahoo! Grupos




 




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



-- 
<<<<< 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]
 
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

RES: [delphi-br] Erro ao acessar form

Responder a