for i := 0 to 11 do
headstring[i]:=Ini.ReadString('Head', 'HeadString' + IntToStr(i), HeadString[i]);





delphi help:
Delphi syntax:

function ReadString(const Section, Ident, Default: String): String; override;

C++ syntax:

virtual AnsiString __fastcall ReadString(const AnsiString Section, const AnsiString Ident, const AnsiString Default);

Description

Call ReadString to read a string value from an INI file. Section identifies the section in the file that contains the desired key. Ident is the name of the key from which to retrieve the value. Default is the string value to return if the:

Section does not exist.
Key does not exist.
Data value for the key is not assigned.