Wie unterscheidet man Groß- von Kleinbuchstaben und...?

[ml-kuen]

Hallo Gemeinde,

suche schon eine Weile nach einer Möglichkeit, große von kleinen Buchstaben, sowie Sonderzeichen von Ziffern zu unterscheiden. Dies sollte unabhängig vom verwendeten ANSI-Characterset funktionieren. Hat jemand eine Idee?

Gruß
Michael

[SirThornberry]

Die Buchstaben und Ziffern sollten bei allen Charsets gleich sein.
Und was verstehst du unter "unterscheiden"? Wie man einen Unterschied zwischen Groß- und Kleinbuchstaben feststellt? Wie machst du es als Mensch? Genau so sollte man es dann auch umsetzen.

[Wolfgang Mix]

Schau Dir 'mal die Funktion Ord und eine ASCII-Tabelle an.
Das Alphabeth beginnt bei Gr0ßbuchstabe A = Ord(65)


[Edit] Herzlich willkommen in der DP[Edit]

Gruß

Wolfgang

[Namenloser]

In Delphi gibt es eine sehr praktische Sache: Sets.

Delphi-Quellcode:

var
  character: char;
begin
  character := 'P'; // Irgendein Zeichen
  if character in ['a'..'z'] then
    ShowMessage('Kleinbuchstabe')
  else if character in ['A'..'Z'] then
    ShowMessage('Großbuchstabe')
  else if character in ['0'..'9'] then
    ShowMessage('Zahl')
  else
    ShowMessage('Sonderzeichen')
end;

In diesem Fall wäre allerdings das Case-Konstrukt noch eleganter:

Delphi-Quellcode:

var
  character: char;
begin
  character := 'P'; // Irgendein Zeichen
  case character of
    'a'..'z': ShowMessage('Kleinbuchstabe');
    'A'..'Z': ShowMessage('Großbuchstabe');
    '0'..'9': ShowMessage('Zahl');
    else      ShowMessage('Sonderzeichen');
  end;
end;

[himitsu]

wenn es sich nur um die Buchstaben, wie A-Z und ÄÖÜ handelt, dann geht auch dieses
if Ord(Key) and $20 <> 0 then IstEinKleinbuchstabe; ob es jetzt auch bei allen Sonderzeichen ala Á und Co. auch geht, kann ich allerdings nicht sagen, aber bei den normalen Buchstaben ist es immer so


[edit]
ansonsten
if AnsiUpperCase(Key)[1] = Key then IstEinGroßbuchstabe;

[ml-kuen]

Vielen Dank für eure schnelle Hilfe. Was die deutsche Sprache angeht, mögen die Lösungsvorschläge alle brauchbar sein, jedoch was ist, wenn ich auch bspw. den Kyrillischen, Grichischen oder sonstigen Zeichensatz unterstützen möchte. Bleibt mir nichts Anderes, als den aktuellen Characterset zu ermitteln um dann mit den Richtigen Sets zu arbeiten?
Um so länger ich drüber nachdenke, desto sicherer bin ich mir, dass es da kein "Allheilmittel" gibt.

Wenn's noch andere Ideen gibt, sind sie herzlich willkommen hier aufgeschrieben zu werden.

Nochmals herzlichen Dank an alle Helfer.

Michael

[SirThornberry]

Ziffern sind überall gleich. Die Buchstaben kannst du eventuell mit AnsiLowerCase und AnsiUppercase bedingt heraus finden (das ß im deutschen zum Beispiel nicht)

[ml-kuen]

Genau, ß und andere Ausreißer machen da einen Sonderfall drauß. Ausserem gibt es in andern Codesets auch Unterschiede in der Anzahl der Buchstaben des jeweiligen Alphabets.

Danke für den Tip

Michael

[SirThornberry]

Die Anzahl der Buchstaben ist egal, lediglich Buchstaben die sich nicht in Groß-/Kleinschreibung unterscheiden bilden eine Außnahme. Ansonsten kann man ermitteln ob es sich um einen Buchstaben handelt in dem man prüft ob AnsiUpperCase und AnsiLowerCase verschiedene Ergebnisse liefern

[ml-kuen]

Danach müsste ja die Lösung des Problems in den Units dieser und ähnlicher Funktionen liegen. Wo sind diese Sets oder was auch immer denn definiert? Kann man das irgwendwie rausfinden, oder liegen die in Delphi nicht als Quellcode vor?

Gruß
Michael