SELECT com ClientDataSet Delphi

09/06/2021

0

Existe alguma forma de usar o REPLACE do SQL Server em uma consulta buscando do ClientDataSet?
Responder

Post mais votado

15/06/2021

você pode usar uma função para isso.
ClientDataset.Filtered := False;
ClientDataset.OnFilterRecord := FiltraCPF;
ClientDataset.Filtered := True;

função:
procedure TFormX.FiltraCPF(DataSet: TDataSet; var Accept: Boolean);
  function SomenteNumeros(Texto: string): string;
  var i: integer;
  begin
    result := '';
    for i := 1 to length(Texto) do
      if CharInSet(Texto[i],['0'..'9']) then
        result := result + Texto[i];
  end;
begin
  Accept := ContainsText(SomenteNumeros(DataSet['CampoCPF'].AsString), EditPesquisa.Text);
end;

Emerson Nascimento

Emerson Nascimento
Responder

Mais Posts

09/06/2021

Gxf

algm poderia ajudar?

no caso o CPF é gravado no banco de dados com "." e "-" e preciso filtrar ignorando isso... Via AdoQuery consegui fazer, porem preciso tbm usando a função FILTER do clientdataset.

Att;
Responder

14/06/2021

Anderson Gonçalves

Usa o comando locate do ClienteDataSet

ClientDataSet1.Locate('CAMPO',EDTI1.TEXT,[]);

Ele vai posicionar na linha do dbgrid o campo localizado.

Deve te ajudar.
Responder

14/06/2021

Usa


WhatsApp +16 575 29 2372 Get 100% PMP Cisco CCNA AWS Certificate Saudi Arabia
Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

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

Aceitar