consulta com duplo-click no dbgrid.
Tenho uma tela de cadastro com 3 paginas do tabsheet no pagecontrol. Não possui query nesta tela de cadastro tem: datasource dataset ibdatabase e ibtransaction. Apertando um botão vc vai pro form4 que é consulta por código de imóvel vc digita algun código e o resultado aparece no db grid.
esta consulta funciona assim.
(interbase)
Código:
procedure TForm4.Button1Click(Sender: TObject);
begin
try
Screen.Cursor:=crSQLWait;
dmimob.Qdormi.Close;
dmimob.Qdormi.ParamByName(´d11´).Asstring:=Edit1.Text;
dmimob.Qdormi.ParamByName(´d22´).Asstring:=Edit2.text;
if not (dmimob.Qdormi.Prepared) then
dmimob.Qdormi.Prepare;
dmimob.Qdormi.Open;
finally
Screen.Cursor:=crDefault;
end;
end;
e dentro do edit sql da query:
Código:
select * from IMOVEIS where DORMI BETWEEN :d11 and :d22
que modificações eu teria de fazer para que quando fosse dado um duplo click no resultado do dbgrid, os dados fossem para o form2 de cadastro dentro do tabshet (lembrando que o cadastro tem em 3 paginas de tabshet do pagecontrol.)
preciso que os 41dbedit e mais algunsdbcombobox recebam as informações da consulta
obrigado
esta consulta funciona assim.
(interbase)
Código:
procedure TForm4.Button1Click(Sender: TObject);
begin
try
Screen.Cursor:=crSQLWait;
dmimob.Qdormi.Close;
dmimob.Qdormi.ParamByName(´d11´).Asstring:=Edit1.Text;
dmimob.Qdormi.ParamByName(´d22´).Asstring:=Edit2.text;
if not (dmimob.Qdormi.Prepared) then
dmimob.Qdormi.Prepare;
dmimob.Qdormi.Open;
finally
Screen.Cursor:=crDefault;
end;
end;
e dentro do edit sql da query:
Código:
select * from IMOVEIS where DORMI BETWEEN :d11 and :d22
que modificações eu teria de fazer para que quando fosse dado um duplo click no resultado do dbgrid, os dados fossem para o form2 de cadastro dentro do tabshet (lembrando que o cadastro tem em 3 paginas de tabshet do pagecontrol.)
preciso que os 41dbedit e mais algunsdbcombobox recebam as informações da consulta
obrigado
Demetriusdgs
Curtidas 0
Respostas
Rômulo Barros
01/07/2004
Segue o Link:
http://delphiforum.icft.com.br/forum/viewtopic.php?t=39636&highlight=dgcancelonexit
http://delphiforum.icft.com.br/forum/viewtopic.php?t=39636&highlight=dgcancelonexit
GOSTEI 0