Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Spaß mit UPPERCASE / LOWERCASE ? (https://www.delphipraxis.net/205829-spass-mit-uppercase-lowercase.html)

rokli 21. Okt 2020 08:07

Spaß mit UPPERCASE / LOWERCASE ?
 
Moin,

Aufgabe: Einen Datensatz anhand eines Namens in einer DB finden.

Ein Editfeld enthält den zu suchenden Begriff: "König Günter".
Damit ich bei der Schreibweise kein Theater bekomme, habe ich die Vergleichswerte in Großschrift gewandelt:

Das Coding sieht so aus:
Delphi-Quellcode:
         
qryKd.SQL.Text    := sSQL +
         ' AND UPPER(Kd.Name1) LIKE ' + QuotedStr(UPPERCASE(TRIM(edtName1.Text)) + '%') +
         ' ORDER BY Kd.Name1';
und das kommt in der Query an:

Delphi-Quellcode:
   AND UPPER(Kd.Name1) LIKE 'KöNIG GüNTER%' ORDER BY Kd.Name1


Ich finde natürlich nicht einen Datensatz, da die Umlaute nicht in Großschrift übersetzt worden sind!

Nächste Idee: Alles auf Kleinschrift bringen:
Delphi-Quellcode:
         
qryKd.SQL.Text    := sSQL +
         ' AND LOWER(Kd.Name1) LIKE ' + QuotedStr(LOWERCASE(TRIM(edtName1.Text)) + '%') +
         ' ORDER BY Kd.Name1';
Ergebnis:
Delphi-Quellcode:
   AND LOWER(Kd.Name1) LIKE 'kÖnig günter%' ORDER BY Kd.Name1
Diesmal bleiben groß geschriebenen Umlaute auch in Großschrift.

Ich werde wohl die Umlaute durch die benötigten Ascii-Werte ersetzen müssen.

Weiß jemand, warum die Umlaute von UPPERCASE nicht groß gemacht werden, bzw. bei LOWERCASE nicht klein gemacht werden?

Klaus01 21. Okt 2020 08:10

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
.. schau mal hier -> https://www.delphipraxis.net/183060-...ute-nicht.html

Grüße
Klaus

Bernhard Geyer 21. Okt 2020 08:12

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Guckst du hier:
https://www.delphipraxis.net/183060-...ute-nicht.html

Hier würde ich aber empfehlen
1, Umstellen auf Parametrisierte Abfragen
2, Das uppercase auch für deinen Parameterwert auf DB-Ebene durchführen zu lassen
3, Überlegen das Feld Kd.Name1 auf DB-Ebene als Case-Insensitive anlegen zu lassen

dummzeuch 21. Okt 2020 08:17

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Zitat:

Zitat von rokli (Beitrag 1475855)
Weiß jemand, warum die Umlaute von UPPERCASE nicht groß gemacht werden, bzw. bei LOWERCASE nicht klein gemacht werden?

Es sind nicht nur Umlaute, mit denen man diesen Spaß haben kann, sondern auch andere Zeichen, z.B. Accents. Und da gibt es dann noch landesspezifische Unterschiede: In Frankreich oder Kanada werden Accents bei Großschreibung weggeleassen, im anderen Land nicht (ich weiß gerade nicht mehr, welches welches war).

Selbst wenn man die Konvertierung explizit selbst vornimmt ( if s[i]='ä' then s[i]:='Ä' ), ist noch immer nicht gesagt, dass dann die Datenbank-Engine gleich konvertiert. Es ist sicherer, beides von der Datenbank-Engine machen zulassen, sofern sie eine Konvertierungsfunktion zur Verfügung stellt.

Delphi-Quellcode:
qryKd.SQL.Text   := sSQL +
         ' AND UPPER(Kd.Name1) LIKE UPPER(' + QuotedStr(UPPERCASE(TRIM(edtName1.Text)) + '%') + ')' +
         ' ORDER BY Kd.Name1';

rokli 21. Okt 2020 08:21

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Spitze! - Ich hatte nicht damit gerechnet, das das schon dokumentiert war - sorry! Hätte ich nach suchen sollen!

Aber zum Thema: Mit ASCILOWER und ASCIUPPER läuft das!

Danke!!

rokli 21. Okt 2020 08:25

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Die Konvertierung beider Werte in der IBM DB2 erscheint mir hier noch die beste Lösung zu sein! Das läuft nun auch schon so.

Vielen Dank an Bernhard und dummzeuch!

(Schreibfehler korrigiert)

mkinzler 21. Okt 2020 09:09

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
DB2 scheint expression indices zu unterstützen. Das wäre dann der Weg der Wahl.

rokli 21. Okt 2020 09:19

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
da hab ich leider keinen Einfluss drauf - die DB wird von einem externen Softwareanbieter gepflegt.

Uwe Raabe 21. Okt 2020 09:41

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
So richtig spaßig wird es dann mit den beiden türkischen i's: How to uppercase Turkish “i”?

Zitat:

In Turkish, there are two i

Dotless: ı, I
Dotted: i, İ
PROBLEM: Every time I uppercase an i, I get an I.

I want to get an İ (only in Turkish) when I uppercase an i, and an I when I uppercase an ı.

rokli 21. Okt 2020 11:07

AW: Spaß mit UPPERCASE / LOWERCASE ?
 
Hallo Uwe,

jetzt sag nicht, dass Du auch noch türkisch sprichst??


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:50 Uhr.
Seite 1 von 2  1 2      

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