Moin Neutral General,
nein, denn meine Methode funktioniert auch nur von 'A'..'Z'.
Mit Umlauten geht das nicht.
In Abwandlung Deiner Methode:
Delphi-Quellcode:
function IsUpperCase(c: Char): Boolean;
begin
Result := c = AnsiUpperCase(c);
end;
oder derer von ManuMF:
Delphi-Quellcode:
function IsUpperCase(c: Char): Boolean;
begin
Result := Char in ['A'..'Z','Ä','Ö','Ü'];
end;