Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi DevExpress: DBView-FilterRow ohne Wildcard (https://www.delphipraxis.net/212875-devexpress-dbview-filterrow-ohne-wildcard.html)

haentschman 17. Apr 2023 08:37


DevExpress: DBView-FilterRow ohne Wildcard
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallöle...8-)

Ich brauche in der Filterliste ein "Like". Mit %Value% funktioniert das. Das verstehen die User aber nicht. :? Ich möchte: Bei Eingabe "Bla" Ergebnis aus der Datenmenge 'MeinBla', 'BlaBlubb' haben.

Bei DevExpress gibt es diesen Eintrag:
https://supportcenter.devexpress.com...-or-like-value
created 15 years ago...mit weiterführenden Links. Alle sind imho nicht zielführend. ...Endlosschleife von Link zu Link.:?

Ich habe gefühlt alle Filtereinstellungen durch.

Hat jemand eine Idee.

Danke.:wink:

Version: 21.2.9

CrossPost: englische DP https://en.delphipraxis.net/topic/87...hout-wildcard/

Delphi.Narium 17. Apr 2023 09:36

AW: DevExpress: FilterRow ohne Wildcard
 
Wie sieht denn die Eingabemöglichkeit aus Usersicht aus?

Ein Edit, in dem der gesamte Filter eingegeben wird oder ein Edit / Combobox für das Feld und ein Edit für den Suchbegriff, ...

Verstehen denn die User den * als Platzhalter?

Z. B.:
Delphi-Quellcode:
Feld = '*Bla*'
? Dann könntest Du im Programm den Filter entsprechend in
Delphi-Quellcode:
Feld like '%Bla%'
umbauen?

Oder soll sowieso grundsätzlich per Like gesucht werden?

Dann bietet es sich wirklich an, die Feldauswahl per ComboBox anzubieten und den Suchbegriff per Edit. Dann hast Du ggfls. auch Einfluss auf eventuell im Suchbegriff enthaltene ' und die User müssen sich nicht angewöhnen im Filter ggfls. '' einzugeben, wenn like und % auch schon etwas zuviel verlangt sind.

dataspider 17. Apr 2023 10:02

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Meinst du wirklich die FilterRow?
Da hat man irgendwann mal eine sinnvolle Erweiterung implementiert:
Delphi-Quellcode:
GridView.FilterRow.OperatorCustomization := True;

Frank

haentschman 17. Apr 2023 10:12

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Liste der Anhänge anzeigen (Anzahl: 1)
:wink:
Wir reden über die FilterRow in der Grid View.

* es soll grundsätzlich "%Value%" zur Datenbank "gesendet" werden, aber in der FilterRow soll nur "Value" angezeigt werden...% = hidden :zwinker:
Zitat:

Da hat man irgendwann mal eine sinnvolle Erweiterung implementiert
...ist grundsätzlich abgelehnt worden.:? Die gibt es im Programm nur als "Option"...keiner hat es aktiv!

dataspider 17. Apr 2023 10:34

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Da bleibt wohl nur, die Spalten der Grid zu iterieren und den Operator zu setzen:
Delphi-Quellcode:
GridColumn.Options.FilterRowOperator := foContains;

Frank

haentschman 17. Apr 2023 11:25

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Liste der Anhänge anzeigen (Anzahl: 4)
...habe ich gemacht.

Delphi-Quellcode:
colStore.Options.FilterRowOperator := foContains;
...
...keine Änderung der Funktion. Kein "contains". :?

1. Eingabe string "56"
* Autovervollständigung mit 2x "0"
* Entferung der 2x "0"
* Enter
-> Bild: leer :?

2. Eingabe string "%56%"
* Enter
-> Bild: Match :thumb:

Das Ergebnis hätte ich gern immer...

dataspider 17. Apr 2023 12:40

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Ja, das ist ja doof...

Er ignoriert das, wenn GridView.FilterRow.OperatorCustomization False ist.
Hier könnte man mal bei DevExpress anfragen - aber das dauert auch meist ewig.
Das Standardverhalten sollte man eigentlich beeinflussen können.
Leider ist DevExpress bei Anfragen zu Änderungen manchmal ziemlich "zickig"...

Frank

Stevie 17. Apr 2023 15:25

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Damit foContains funktioniert, muss das Feld ein TextFeld sein, ist es das? Ggf musst du explicit die Properties Eigenschaft der Column setzen, ansonsten nimmt das Grid anhand des Feld- bzw Datatyps einen Default.

dataspider 17. Apr 2023 16:22

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Liste der Anhänge anzeigen (Anzahl: 1)
Delphi-Quellcode:
function TcxGridFilterRow.GetOperator(Index: Integer; AValue: Variant): TcxFilterOperatorKind;
var
  AFilterCriteriaItem: TcxFilterCriteriaItem;
begin
  if GridView.FilterRow.OperatorCustomization then
  begin
    ....
  end
  else
    Result := GetDefaultFilterOperatorKind(AValue, True);
end;

function TcxGridFilterRow.GetDefaultFilterOperatorKind(const AValue: Variant; ACheckMask: Boolean): TcxFilterOperatorKind;

  function HasMask(const AValue: string): Boolean;
  begin
    Result :=
      (Pos(DataController.Filter.PercentWildcard, AValue) <> 0) or
      (Pos(DataController.Filter.UnderscoreWildcard, AValue) <> 0);
  end;

begin
  if VarIsStr(AValue) and (not ACheckMask or HasMask(AValue)) then
    Result := foLike
  else
    Result := foEqual;
end;
In den Sourcen von DevExpress sieht man, dass es nur funktioniert, wenn GridView.FilterRow.OperatorCustomization True ist.
Man muss also mit den Symbolen in der FilterRow leben (siehe Anhang) oder auf Contains verzichten.
Standard bei Text ist dann foLike...


Frank

himitsu 17. Apr 2023 16:47

AW: DevExpress: DBView-FilterRow ohne Wildcard
 
Gibt es kein CustomDraw dafür? :stupid:


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:21 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz