0-Based Strings ab XE4

[Daniel]

Ja, aber eben in diesem Fall nicht pauschal auf "1" setzen, sondern die Dynamik nutzen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
const
  thirdChar = Low(string) + 2;
var s : string;
begin
  s:= 'Hallo';
  ShowMessage( s[thirdChar] );
end;

Der "Witz" dabei, dass die Funktion "Low()" hier keine konkrete Variable, sondern den String-Typ als solchen bekommt.