Poo - Formulario não conhece Objeto Executor
11/05/2008
0
Olá!
Bom dia!
Sou Programador Delphi-7 + IB/FB + DBExpress + Poo (Iniciante)
Tenho o seguinte problema:
TEnho um Formulario que nao conhece o OBJ executor.
-----Estrutura-----------------------------
Programa Parcelas
Unit_Parcelas - Form_Parcelas
Unit_Dinheiro
Unit_Cartao - From _cartao
Unit_Cheque - Form_cheque
Unit_Carteira - Form_carteira
--------------------------------------------
1-Prog_Parcelas:
==============
1.1-Unit_Parcelas:
--------------
Cria_Instacia();
Cria um CDs_Parcelas...;
Zera Variaveis/Inicia...;
Destrua_se;
Pede_Dados();
Recebe_Dados(Valor);
Tabela_Recebe_Dados(Codreg, Valor); //...Cds_Parcela
1.1.1- Form_Parcelas:
--------------
Ds_Parcela.Datset := Cds_Parcela;
Cds_Parcelas--> Codreg, Descr_Forma_Pgto, Vltotal;
DBGrid
Dentro do Form_Parcelas, acesso vários outro formularios,
como: Se Unit_Carteira - Carteira - Form_Carteira,
Unit_cheque - Cheque - Form_cheque, ...
1.2.0-Unit_Dinheiro - Dinheiro (Heranca de Unit_Parcels)
1.2.1-Unit_Carteira - Carteira - Form_Carteira (Heranca de Unit_Parcels)
1.2.2-Unit_cheque - Cheque - Form_cheque (Heranca de Unit_Parcels)
1.2.3-Unit_Cartao...
O Form_Carteira, q está dentro da Unit_Carteira, não conhece
o Objeto executor;
Acontece q estando dentro do form_Carteira, preciso envia
Msg para a Unit_Carteira, Unit_Parcelas, para atualizar dados.
:?: 1-Como fazer o form conhecer o objeto executor ?
--------------------------------------------------------
Pois se declaro no Uses a Unit_Carteira é enviado um erro
ao compilar, erro de declaracao Circular, pq já foi declarado
na unit_carteira o Form_Carteira, poi o mesmo o cria executa o form e destroi.
Sei q o form_Cateira, não tem como conhecer o objeto executor.
Preciso de uma solução de passar o endereco do objeto executo
para ser Executado.
Não sei se ficou bem claro, pois é muito complicado
explicar. :roll:
Desde já meus agradecimento, a quem puder responder.
100+
ANT.CARLOS/SP
Bom dia!
Sou Programador Delphi-7 + IB/FB + DBExpress + Poo (Iniciante)
Tenho o seguinte problema:
TEnho um Formulario que nao conhece o OBJ executor.
-----Estrutura-----------------------------
Programa Parcelas
Unit_Parcelas - Form_Parcelas
Unit_Dinheiro
Unit_Cartao - From _cartao
Unit_Cheque - Form_cheque
Unit_Carteira - Form_carteira
--------------------------------------------
1-Prog_Parcelas:
==============
1.1-Unit_Parcelas:
--------------
Cria_Instacia();
Cria um CDs_Parcelas...;
Zera Variaveis/Inicia...;
Destrua_se;
Pede_Dados();
Recebe_Dados(Valor);
Tabela_Recebe_Dados(Codreg, Valor); //...Cds_Parcela
1.1.1- Form_Parcelas:
--------------
Ds_Parcela.Datset := Cds_Parcela;
Cds_Parcelas--> Codreg, Descr_Forma_Pgto, Vltotal;
DBGrid
Dentro do Form_Parcelas, acesso vários outro formularios,
como: Se Unit_Carteira - Carteira - Form_Carteira,
Unit_cheque - Cheque - Form_cheque, ...
1.2.0-Unit_Dinheiro - Dinheiro (Heranca de Unit_Parcels)
1.2.1-Unit_Carteira - Carteira - Form_Carteira (Heranca de Unit_Parcels)
1.2.2-Unit_cheque - Cheque - Form_cheque (Heranca de Unit_Parcels)
1.2.3-Unit_Cartao...
O Form_Carteira, q está dentro da Unit_Carteira, não conhece
o Objeto executor;
Acontece q estando dentro do form_Carteira, preciso envia
Msg para a Unit_Carteira, Unit_Parcelas, para atualizar dados.
:?: 1-Como fazer o form conhecer o objeto executor ?
--------------------------------------------------------
Pois se declaro no Uses a Unit_Carteira é enviado um erro
ao compilar, erro de declaracao Circular, pq já foi declarado
na unit_carteira o Form_Carteira, poi o mesmo o cria executa o form e destroi.
Sei q o form_Cateira, não tem como conhecer o objeto executor.
Preciso de uma solução de passar o endereco do objeto executo
para ser Executado.
Não sei se ficou bem claro, pois é muito complicado
explicar. :roll:
Desde já meus agradecimento, a quem puder responder.
100+
ANT.CARLOS/SP
Ant.carlos/sp
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)