fechar um forn ao abrir outro
Pessoal eu tenho um form cadastro com um botão consulta. Eu quero que quando eu clicar no botão consulta, ele feche o form cadastro e abra o form consulta.
e no form consulta qdo eu de um duplo click em um registro no dbgrid ele fechar o form consulta e abrir o form cadastro com o registro que eu clikei
Existe a possibilidade de ser feito isso? e se sim alguém poderia me ajudar?
e no form consulta qdo eu de um duplo click em um registro no dbgrid ele fechar o form consulta e abrir o form cadastro com o registro que eu clikei
Existe a possibilidade de ser feito isso? e se sim alguém poderia me ajudar?
Antonio Santos
Curtidas 0
Respostas
Daniel Araújo
07/04/2017
Boa tarde Antônio!
1ª
No OnShow do form de consulta, tu pode fazer uma verificação se o form de cadastro está aberto e, se tiver, mandar fechá-lo.
2ª
Cria um propriedade no form de cadastro. Ao dar dois cliques no registro, tu passa o id selecionado para a propriedade do form de cadastro. No OnShow do form de cadastro tu verifica se a propriedade tem algum valor, se tiver tu carrega o registro na tela.
Se a resposta foi útil dê um like!
Daniel Araújo
daraujo-dev@hotmail.com
1ª
No OnShow do form de consulta, tu pode fazer uma verificação se o form de cadastro está aberto e, se tiver, mandar fechá-lo.
2ª
Cria um propriedade no form de cadastro. Ao dar dois cliques no registro, tu passa o id selecionado para a propriedade do form de cadastro. No OnShow do form de cadastro tu verifica se a propriedade tem algum valor, se tiver tu carrega o registro na tela.
Se a resposta foi útil dê um like!
Daniel Araújo
daraujo-dev@hotmail.com
GOSTEI 0
Alberto
07/04/2017
No botao consulta faz o seguinte
FormCadastro.hide;
formConsulta.Show;
No click do dbgrid
FormConsulta.hide
FormConsulta.Show
FormCadastro.hide;
formConsulta.Show;
No click do dbgrid
FormConsulta.hide
FormConsulta.Show
GOSTEI 0
Gxf
07/04/2017
- No OnShow do form de cadastro coloque:
formcadastro.close;
formconsulta.showmodal;
Um exemplo com ADOQuery
- No OnDblClick do grid do form coloque:
with formcadastro do
begin
editNomeCampo.Text := qrySQL.FieldByName('nome_campo').AsString;
formcadastro.showmodal;
formconsulta.Close;
end;
* declare ambos forms na Uses *
formcadastro.close;
formconsulta.showmodal;
Um exemplo com ADOQuery
- No OnDblClick do grid do form coloque:
with formcadastro do
begin
editNomeCampo.Text := qrySQL.FieldByName('nome_campo').AsString;
formcadastro.showmodal;
formconsulta.Close;
end;
* declare ambos forms na Uses *
GOSTEI 0