Crea un proyecto nuevo, pon un botón, y en el onclick del mismo copia esto:
Código Delphi
[-]procedure TFmain.Button1Click(Sender: TObject);
var
ifCfg : TIniFile;
begin
try
ifCfg := TIniFile.Create( 'algo.ini' );
ifCfg.WriteString( 'BaseDatos','Ruta','\datos\' );
finally
ifCfg.free;
end;
end;
En el directorio windows estará 'algo.ini'