com dbgrid

[Wilke1 0]

Não tenho nada pronto, foi uma forma de resolver que encontrei, você precisa montar, vai indo por passos, analisando as linhas geradas... e ver o produto final gerado...

procedure TFMFornecedor.QryhorariopromotorAfterInsert(DataSet: TDataSet);begin inherited; if DBLOOKUPCOMBOBOX11.Text='Todas as lojas' then datamoduledetalhes.QueryLoja.First; while not datamoduledetalhes.QueryLoja.Eof do begin Qryhorariopromotor.sql.clear; Qryhorariopromotor.SQL.Add('insert into tb_horario_promotores(cd_promotor,cd_loja,dia_semana,ds_hora_inicial,ds_hora_final)'); Qryhorariopromotor.SQL.Add('values(:codpromotor,:loja,:dia,:hora1,:hora2) '); Qryhorariopromotor.ParamByName('codpromotor').Value:=Qrypromotores.FieldByName('cd_promotor').AsString; Qryhorariopromotor.ParamByName('loja').Value:=datamoduledetalhes.QueryLoja.FieldByName('cd_loja').AsString; Qryhorariopromotor.ParamByName('dia').Value:=dbcombobox1.Text; Qryhorariopromotor.ParamByName('hora1').Value:=dbedit44.Text; Qryhorariopromotor.ParamByName('hora2').Value:=dbedit45.Text; datamoduledetalhes.QueryLoja.Next; end;end;marcio estou fazendo assim, mas ainda não deu certo

resolvido

[marcio.theis 3]

beleza... coisa boa... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif