Datei mit FireDac "Case Sensitive" filtern

[ATS3788]

Hallo
Ich habe folgenden Pascal Code

Delphi-Quellcode:

                  if Msg.WParam = 0 then
                  FDTable2.FilterOptions := FDTable2.FilterOptions  + [foCaseInsensitive]
                  else
                  FDTable2.FilterOptions := FDTable2.FilterOptions  - [foCaseInsensitive];

                  _Char := Pointer(msg.LParam);

                  S := '%' + StrPas(_Char) + '%';
                  S := QuotedStr(S);


                  FDTable2.Filter := 'FELD1 like ' + S;
                  FDTable2.Filtered := True;

und leider funktioniert das filtern "Case Sensitive" nicht.