uses inifiles;
//********************************************
procedure Tinicio.FormCreate(Sender: TObject);
var
ini: TIniFile;
(...)
ini := TIniFile.Create('./parametros.ini');
aux:=ini.ReadString('parametros', 'avisoanyonuevo', 'si');
ini.Free;
(...)
ini := TIniFile.Create('./parametros.ini');
ini.WriteString('parametros', 'avisoanyonuevo', 'si');
ini.Free;
.
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario