Kann Delphi jetzt kein s[1] mehr?

[derpepe]

Ich dachte eher ob es eine vordefinierte Funktion gibt die ungefähr so aussehen müßte:

Delphi-Quellcode:

function gibzeichen(s:string;pos:integer):char;
begin
  if length(s)>=pos then
    gibzeichen:=s[pos]
  else
    gibzeichen:='';
end;

oder so

Delphi-Quellcode:

function gibzeichen(s:string;pos:integer):char;
begin
  gibzeichen:=copy(s,pos,1);
end;