Problemas ao trazer dados de uma Query

Delphi

24/01/2013

Na minha tabela de orçamentos está cadastrado o código, descrição, valor do serviço e valor do material na tabela de serviços, na minha tabela de orçamento eu digito o nome do serviço ele localiza e consegue trazer somente o código quando eu tento trazer os valores de serviço e material não trazem nada. 

begin 
  if key = #13 then 
  begin 
    Db_Codigo_Servico.Text    := dmPesquisa.Sql_servico_aux.FieldByName('ser_codigo').AsString; 
    db_descricao_servico.text := dmPesquisa.Sql_servico_aux.FieldByName('ser_descricao').AsString; 
    Db_Preco_Servico.Text     := dmPesquisa.Sql_servico_aux.FieldByName('ser_material').AsString; 
    db_preco_mao_obra.Text    := dmPesquisa.Sql_servico_aux.FieldByName('ser_mao_obra').AsString; 

    Db_Quantidade_Servico.SetFocus; 
    db_grid_servico_pesquisa.Visible := false; 
  end;

Nícolas Braz

Nícolas Braz

Curtidas 0

Respostas

Rafael Cunha

Rafael Cunha

24/01/2013

Cole aqui o comando SQL que você está utilizando no "Sql_servico_aux".
GOSTEI 0
POSTAR