.pas(155): Undeclared identifier: ´loCaseInsensitive´
Tenho a seguinte instrução rodando em um formulário :
#
If RGpesquisaServico.ItemIndex = 0 then
begin
If DMtables.IBQservicos.Locate(´CodigoServico´,EDTpesquisaServico.Text,[loCaseInsensitive,loPartialKey]) then
begin
EDTpesquisaServico.Text := ´´;
EDTpesquisaServico.SetFocus;
end
else
begin
ShowMessage(EDTpesquisaServico.Text + ´ NÃO CADASTRADO !´);
EDTpesquisaServico.Text := ´´;
EDTpesquisaServico.SetFocus;
end;
Porem ao copiar para outro formulário o mesmo apresenta a seguinte
linha de ERRO:
[Error] gerenciaServicos.pas(155): Undeclared identifier: ´loCaseInsensitive´
Gostaria de instruções para corrigilo, estou usando INTERBASE, sem indice
para o CÓDIGO e DESCRIÇÃO.
Marcelo Andrade
#
If RGpesquisaServico.ItemIndex = 0 then
begin
If DMtables.IBQservicos.Locate(´CodigoServico´,EDTpesquisaServico.Text,[loCaseInsensitive,loPartialKey]) then
begin
EDTpesquisaServico.Text := ´´;
EDTpesquisaServico.SetFocus;
end
else
begin
ShowMessage(EDTpesquisaServico.Text + ´ NÃO CADASTRADO !´);
EDTpesquisaServico.Text := ´´;
EDTpesquisaServico.SetFocus;
end;
Porem ao copiar para outro formulário o mesmo apresenta a seguinte
linha de ERRO:
[Error] gerenciaServicos.pas(155): Undeclared identifier: ´loCaseInsensitive´
Gostaria de instruções para corrigilo, estou usando INTERBASE, sem indice
para o CÓDIGO e DESCRIÇÃO.
Marcelo Andrade
Marceloandrade
Curtidas 0
Respostas
Everton
13/04/2003
clique na palavra loCaseInsensitive e aperte F1. Verifique se a unit da função está adicionada na seção uses.
GOSTEI 0
Joilson_gouveia
13/04/2003
Verifique se não estaria faltando a [b:bdd171d93e]Unit DB [/b:bdd171d93e]na cláusula Uses desse novo formulário...
GOSTEI 0