Einzelnen Beitrag anzeigen

Benutzerbild von Flocke
Flocke

Registriert seit: 9. Jun 2005
Ort: Unna
1.172 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#8

Re: Zeichen auf Lowercase etc. testen

  Alt 23. Dez 2005, 11:45
Dann mache ich's mal, ist ja ein Einzeller:
Delphi-Quellcode:
IsLower := AnsiUpperCase(ch) <> ch;
IsUpper := AnsiLowerCase(ch) <> ch;
IsDigit := ch in ['0' .. '9'];
Volker
Besucht meine Garage
Aktuell: RtfLabel 1.3d, PrintToFile 1.4
  Mit Zitat antworten Zitat