Creo que esto te puede servir:
Código Delphi
[-]procedure TForm1.Create(Sender: TObject);
var
T: TIniFile;
Begin
T := TIniFile.create('Nombre del archivo');
Timer1.Interval := T.ReadInteger('NombreDeLaSintaxis(
)', 'Identificador','Default');
Timer1.Enabled := true;
end;
procedure Timer1.OnTimer(Sender: TObject);
begin
ShowMessage('Hola');
Button1.Click//Llama al procedure del boton 1 al hacer click
end;