Ich denke das ist ein Problem wie Delphi in der Vergangenheit mit Strings umgegangen ist, da waren doch plötzlich Strings 0 basiert unter den mobileplatforms, was plötzlich wieder geändert wurde. Nun verwenden wieder alle Delphi Compiler standardmässig 1 basierte Strings. D.h. mal musste man bei 1 beginnen mit iterieren mal bei 0.
https://docwiki.embarcadero.com/RADS...rings_(Delphi)
Allgemein gültig war glaub ich aber für alle Delphiversionen:
Delphi-Quellcode:
Anzahl:= 0;
for i:= low(s) to high(s) do
begin
if s[i] <> ' ' then
Inc(Anzahl);
end;
showmessage(inttostr(Anzahl));