RE:como Leer y Escribir en un archivo .Ini
Tienes que declarar en el Uses la unidad INIFiles. Luego puedes hacer los siguiente:
procedimiento......................
var
MiFicheroIni:TIniFile;
Valor:String;
begin
MiFicheroIni:=TInifile.Create(changefileext(extractfilename(paramstr(o)),'.ini'));
//para escribir
Valor:=Edit1.Text;
MiFicheroIni.Writestring('SECCION','Primero',Valor);
Esto quedaria
[SECCION]
Primero=lo que lleve la variable Valor;
//para leer
Valor:='';
Valor:=MiFicheroIni.Redastring('SECCION','Primero','Esta Vacio');
si el valor de Primero esta vacio o no existe te devuelve la cadena por defecto 'Esta vacio' dentro de la variable Valor y si Primero tiene contenido te lo devuelve en la misma variable.
Tambien existe WriteBool,ReadBool, WriteInteger etc. Mira la ayuda.
Suerte