1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:

Try
  Try
  Ini := TIniFile.Create(IniName);
  Spielername := Ini.ReadString('Userdaten', 'Spielername', 'Hans Maulwurf');
  Spielercossy := Ini.ReadString('Userdaten', 'Cossy', '1234567890');
  Except
  Spielername := InputBox('Spielernamen eingeben...', 'Name:', '');
  Spielercossy := InputBox('Cossy eingeben...', 'Cossy:', '');

  Ini.WriteString('Userdaten', 'Spielername', Spielername);
  Ini.WriteString('Userdaten', 'Cossy', Spielercossy);
  End;
Finally
Ini.Free;
End;					

1:
2:
3:
4:
5:
6:
7:
8:
9:

If Not FileExists(...) Then
Begin 
/// Aufforderung über Inputboxen
/// Versuch, in INI zu schreiben
End Else
Begin
/// Versuch, INI zu lesen
/// Werte aus INI übernehmen
End;