Strings vergleichen

[youuu]

Habe es nun so gelöst.

Delphi-Quellcode:

(pos(AnsiUpperCase(EditSearchFast.Text), AnsiUpperCase(Customer.company_name))>0)

[DeddyH]

Etwas Anderes tut AnsiContainsText aber auch nicht (zumindest im Ergebnis). Aber wenn es nun geht, ist ja alles gut :zwinker:

[youuu]

Zitat:

Zitat von DeddyH

Etwas Anderes tut AnsiContainsText aber auch nicht (zumindest im Ergebnis). Aber wenn es nun geht, ist ja alles gut :zwinker:

Hatte mich auch gewundert das es nicht ging, da es ja einen Boolean Wert zurück gibt und normalerweise hätte funktionieren sollen.

[Matze]

Zitat:

Zitat von Muetze1

Und wie er dies macht. Das er das nicht macht ist ein Gerücht welches die Delphi Hilfe über mehrere Ausgaben verbreitete...

Tatsache. :oops:
Aber mit dem Workaround würde es gehen, auch wenn das vom Code her vielleicht nicht ganz so schön ist.

[semo]

Ich nutze auch vor der Verwendung von Pos() ein UpperCase() bzw. LowerCase:

Delphi-Quellcode:

Column := TVirtualStringTree(Sender).Header.Columns.GetFirstVisibleColumn();
while (Column <> InvalidColumn) do
begin
  NodeText := UpperCase(TVirtualStringTree(Sender).Text[Node, Column]);
  bFoundText := (Pos(SearchString, NodeText) > 0);

  if bFoundText then
    Break;
  Column := TVirtualStringTree(Sender).Header.Columns.GetNextVisibleColumn(column);
end;
Sender.IsVisible[Node] := bFoundText;

Und sollte man nicht auf die Verwendung der ANSI Funktionen hinsichtlich Delphi 2009 und Unicode Strings verzichten?

[DeddyH]

Ich hab zwar kein D2009, aber dort heißen die Funktionen m.W.n. zwar noch so, aber sind unicodefähig. Falls das nicht stimmen sollte, bitte ich einen Kundigen um Berichtigung.

[himitsu]

AnsiUpperCase ist in Delphi2009 nicht Ansi, sondern Unicode.

also kein Problen, aber dafür nur etwas verwirrend :angel2:

man kann auch WideUpperCase verwenden, aber dieses arbeitet mit WideString, wärend AnsiUpperCase in D2009 aus UnicodeString basiert.

[semo]

Kleiner Nachtrag:
AnsiStrings.AnsiUpperCase --> AnsiUpperCase wandelt alle Zeichen im gegebenen AnsiString in Großbuchstaben um. Im Gegensatz zu UpperCase wird bei der Umwandlung die aktuelle Gebietseinstellung des Benutzers verwendet.

SysUtils.AnsiUpperCase --> AnsiUpperCase gibt eine Kopie des in S angegebenen Strings in einem groß geschriebenen String zurück. Bei der Konvertierung wird das aktuelle Gebietsschema berücksichtigt. Diese Funktion unterstützt Multibyte-Zeichensätze (MBCS).

[DeddyH]

Da ist aber wieder "Ansi" im Namen :lol: (Spaß muss sein *g*)

[himitsu]

http://www.delphipraxis.net/internal...t.php?t=149533
http://www.delphipraxis.net/internal...050060#1050060