delphi how to copy a character out of a string into a char code example

Example: choose character from string in delphi

var
	sA : String;
    cA : Char;
    

sA := 'Name';
cA := A[1]; //This selects the first letter of your string