Kann Delphi jetzt kein s[1] mehr?

[derpepe]

Geht nicht

Die Funktion soll die Leerzeichen am Anfang eines Strings zählen.
Warum geht das so nicht? Ist Delphi jetzt doof? Oder ich? Sonst ging das doch immer so??

Delphi-Quellcode:

  function countspacesinfront(s:string):integer;
  var
    z:integer;
    sx:string;
  begin
    sx:=s;
    z:=0;
    while sx[1]=' ' do begin
      sx:=copy(sx,2,length(sx)-1);
      inc(z);
    end;
    countspacesinfront:=z;
  end;