Delphi - find character a given position/index

Question

I have searched all over for this. In Delphi/Lazarus, given a position, I want to find the character at that position in a different string. I know how to find the position of a character. I need it the other way around: the character at a given position. Thanks in advance.

Solution 1

In Delphi, a character in the string can be indexed using the array notation. Just note that first character in string has an index of one.

var
  s: string;
  c: char;
begin
  s := 'Hello';
  c := s[1]; //H
end;

Solution 2

A string can be accessed like an array.

MyString[12] gives you the 12th character in the string. Note : This is 1-index (because the 0th position used to hold the length of the string)

Example :

var
  MyString : String;
  MyChar : Char;
begin
  MyString := 'This is a test';
  MyChar := MyString[4]; //MyChar is 's'
end;

Solution 3

This was last answered in 2012, so figured I'd just add an update:

For latest version of Delphi (Currently Tokyo Edition - that run over multiple platforms using FMX framework), the StringHelper class offers a cross platform character index solution. This implementation assumes a 0-based index for all supported platforms.

eg.

var
  myString: String;
  myChar: Char;
begin
  myChar := myString.Chars[0]; 
end;