String auf Großbuchstaben überprüfen

[Klaus01]

Oder so:

Delphi-Quellcode:

for i := 1 to length(text) do 
begin 
    if text[i] in ['A'..'Z'] then 
      großbuchstabe; 
end;

Grüße
Klaus