hmm ich bin zwars auch noch Delphi Anfänger aber ich glaub das machst du wenn du den Text mit einer for Schleife durchläufst und dabei überprüfts ob das Zeichen ein A bzw. ... Z ist und setzt eine Variable immer um 1 hoch.
z.B. so:
Delphi-Quellcode:
for I:= 1 to length(ch) do
begin
if ch[I] <> 'A' then
Inc(count);
end;