O galera blz ou to com um problema com o meu formulario venda tenho do formulario venda e o itens venda e salvo a venda porem eu não edito ela como faço isso
estou utilizando o ado query os itens da venda eles vão para a dbgride eu gostaria que quando eu apertase no botão editar apareceria a venda selecionado na gride e pudece alterala
eu fis um exibe dados porem não deu certo olha o codigo ai
procedure Tfrmitensvenda.exibedados;
var ssql:string;
begin
ssql:='select* from vw_ItemVenda';
//EXECUÇÃO DA CONSULTA
dm.qryConsulta.Active:= false; //Desliga a Query
dm.qryConsulta.SQL.Clear; //Limpa o SQL Atual
dm.qryConsulta.SQL.Add(sSQL); //Adiciona Novo SQL
dm.qryConsulta.Active:= true; //Liga a Query
//PREENCHIMENTO DOS CAMPOS DO FOMULÁRIO
cboProduto.KeyValue:= dm.qryConsulta.FieldByName('nome').AsString;
edtqtd.Text:= dm.qryConsulta.FieldByName('quant').AsString;
edtprecounitario.Text:= dm.qryConsulta.FieldByName('PrecoVenda').AsString;
// edtTotal1.Text:= dm.qryConsulta.FieldByName('total').AsString;
end;
e no formulario vendas no botão edita eu coloquei o seguinte condigo
frmitensvenda.idvenda := dbgvenda.Fields[0].AsString;
frmitensvenda.ShowModal;
porem quando eu vo editar abre o formulário itens venda vazio
estou utilizando o ado query os itens da venda eles vão para a dbgride eu gostaria que quando eu apertase no botão editar apareceria a venda selecionado na gride e pudece alterala
eu fis um exibe dados porem não deu certo olha o codigo ai
procedure Tfrmitensvenda.exibedados;
var ssql:string;
begin
ssql:='select* from vw_ItemVenda';
//EXECUÇÃO DA CONSULTA
dm.qryConsulta.Active:= false; //Desliga a Query
dm.qryConsulta.SQL.Clear; //Limpa o SQL Atual
dm.qryConsulta.SQL.Add(sSQL); //Adiciona Novo SQL
dm.qryConsulta.Active:= true; //Liga a Query
//PREENCHIMENTO DOS CAMPOS DO FOMULÁRIO
cboProduto.KeyValue:= dm.qryConsulta.FieldByName('nome').AsString;
edtqtd.Text:= dm.qryConsulta.FieldByName('quant').AsString;
edtprecounitario.Text:= dm.qryConsulta.FieldByName('PrecoVenda').AsString;
// edtTotal1.Text:= dm.qryConsulta.FieldByName('total').AsString;
end;
e no formulario vendas no botão edita eu coloquei o seguinte condigo
frmitensvenda.idvenda := dbgvenda.Fields[0].AsString;
frmitensvenda.ShowModal;
porem quando eu vo editar abre o formulário itens venda vazio