Lazarus

Programming => Packages and Libraries => Topic started by: tester-dev on September 09, 2019, 03:48:13 pm

Title: ZEOS 7.2.4 Filter error
Post by: tester-dev on September 09, 2019, 03:48:13 pm
I am using that to filter :

Code: Pascal  [Select]
  1.  procedure TNGrid.EditChange(Sender: TObject);
  2.  Var
  3.    En_tete : string; //header name
  4.  begin
  5.   if (Col <> Null) and (Col >= CFix) then
  6.    En_tete := MyDataset.Fields[Col-1].DisplayName;
  7.    if NOT (TEdit(Sender).Text = '') then
  8.    begin
  9.     MyDataset.Filtered:= false;
  10.     MyDataset.Filter:= En_tete+' like ''*'+TEdit(Sender).Text+'*''';
  11.     MyDataset.Filtered:= true;
  12.    end
  13.    else
  14.    begin
  15.     MyDataset.Filtered:= false;
  16.     MyDataset.Filter:='';
  17.    end;
  18.    Filter2();
  19.  end;

I can't filter the last character .
And when the cell contains one char then it does not filter at all.
Title: Re: ZEOS 7.2.4 Filter error
Post by: tester-dev on September 12, 2019, 02:16:59 pm
I think this might be the same problem as in Ticket #369.
 https://sourceforge.net/p/zeoslib/tickets/369/ (https://sourceforge.net/p/zeoslib/tickets/369/)