Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
ric_rio2 Aprendiz
Registrado: Segunda-Feira, 1 de Outubro de 2018 Mensagens: 108
|
Enviada: Qui Nov 28, 2019 11:20 am Assunto: TQUery(PARADOX) com Filter [Resolvido] |
|
|
Bom dia..
Estou usando o Delphi 7 com Parados e tentando fazer o seguinte filtro
Código: | 1 Qy_Planoc.Filtered:= False;
2 Qy_Planoc.Filter:= 'PlanodeConta LIKE '+QuotedStr('GEM %');
3 Qy_Planoc.Filtered:= True; |
Mas na linha 2 esta me retornando o seguinte erro..
'Operation not Applicable'
Em vários exemplos na net esse tipo de filtro é normal.
algum dos senhores sabe porque não estou conseguindo fazer esse tipo de filtro com like?
Editado pela última vez por ric_rio2 em Qui Nov 28, 2019 2:33 pm, num total de 1 vez |
|
Voltar ao Topo |
|
|
imex Moderador
Registrado: Sexta-Feira, 7 de Janeiro de 2011 Mensagens: 11666
|
Enviada: Qui Nov 28, 2019 11:47 am Assunto: |
|
|
Bom dia,
Não fiz nenhum teste mas acho que com TQuery não funciona mesmo.
De qualquer forma, você pode conseguir esse filtro utilizando código no evento OnFilterRecord da TQuery em vez de utilizar a propriedade Filter.
Espero que ajude
Editado pela última vez por imex em Ter Fev 27, 2024 11:00 am, num total de 1 vez |
|
Voltar ao Topo |
|
|
ric_rio2 Aprendiz
Registrado: Segunda-Feira, 1 de Outubro de 2018 Mensagens: 108
|
Enviada: Qui Nov 28, 2019 12:23 pm Assunto: |
|
|
Boa tarde imex..
Também acho que com o TQUERY não irá rolar..
Funciona perfeitamente com o TZQUERY. ( tendo que trocar o coringa % para * )
Eu ate tentei usar o evento OnFilterRecord mas ele não dispara..
Você saberia a forma correta de usa-lo?
Valeu pela atenção |
|
Voltar ao Topo |
|
|
imex Moderador
Registrado: Sexta-Feira, 7 de Janeiro de 2011 Mensagens: 11666
|
Enviada: Qui Nov 28, 2019 12:31 pm Assunto: |
|
|
Boa tarde,
Não dispara? Você mudou a propriedade Filtered para True? |
|
Voltar ao Topo |
|
|
ric_rio2 Aprendiz
Registrado: Segunda-Feira, 1 de Outubro de 2018 Mensagens: 108
|
Enviada: Qui Nov 28, 2019 2:32 pm Assunto: |
|
|
Boa tarde.. novamente
Então eu esqueci de mencionar que estou usando o oncheng do maskedit..
o negocio era saber como usar o OnFilterRecord..
Ficou do seguinte modo..
No on Change do MaskEdit..:
Código: | Var
AAA : Boolean;
begin
Qy_C.Filtered:= False;
Qy_C.Filtered:= True;
Qy_C.OnFilterRecord(DataSource_C.DataSet,AAA); |
no Evento OnFilterRecord ficou assim..:
Código: | Accept := Pos(Me_Filter_C.Text , Qy_C.FieldByName('campo1').AsString) > 0; |
Então ai tudo funcionou..
Mais uma vez.. obrigado pela atenção imex |
|
Voltar ao Topo |
|
|
|