Fórum Problema em Query de Consulta. #283717

02/06/2005

0

Galera, já pesquisei no forum, mas infelizmente não deram certo as instruções encontradas.
Preciso fazer uma simples consulta.
O problema é que ele encontra o registro, se procuro outro registro ele não faz nada, naum mostra mensagem que encontrou e nem tao pouco atualiza a grid.

Os comandos para pesquisa.

// Pesquisa por nome do cliente
DmPesquisa.Qry_dst_Servico.SQL.Clear;
DmPesquisa.Qry_dst_Servico.SQL.Add(´select * from Os where upper(Cliente) like :parOs´);
with (DmPesquisa.Qry_cds_Servico) do
begin
Params.ParamByName(´parOs´).AsString := ´¬´ + UpperCase(TxtLocalizar.Text) + ´¬´;
Open;
If (RecordCount = 0) then
Application.MessageBox(´Erro 1007 - Nome do Cliente não encontrado !´, ´Procura´, mb_ok + mb_IconWarning);
TxtLocalizar.SetFocus;
end;
end

Comando na query:
Parametro Sql,

select * from os where CodOrcamento like :parOs


Grato pela ajuda.


Objetivacreator

Objetivacreator

Responder

Posts

03/06/2005

Ivonei

Tente fechar a query antes da rotina.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar