[Pedro-Juan]

Hola a tod@s.

Delphi6
InterBase 5.1

Perdon estaba leyendo este tema y a mi tambien me generaba problemas el installador. Estoy (creo) en el camino correcto para solucionarlo. Pero me queda una duda con los alias:

¿Qué sucede si el usuario final decide instalar el programa en otro directorio?

¿Hay que obligarlo a instalarlo en una ruta concreta para que no falle el alias?

Si se instala en la ruta C:\Archivos de programa\ ¿Que sucede cuando alguien de un país no hispano se baja la aplicación? Por ejemplo: (C:\Program files\), el alias no encontrará la ruta...

He intentado solucionarlo de esta manera, pero no funciona, no encuentra la ruta del alias cuando lo instalo en un directorio diferente:

Código Delphi [-]
procedure CrearAlias(cRuta: String); //se declara el procedure
...
procedure TDataModule.DataModuleCreate(Sender: TObject);
var cAliasDB: String;
begin
 
cAliasDB := ExtractFilePath(Application.ExeName) + '\Data\PROGRAMA.GDB';
 
CrearAlias(cAliasDB);
...
end;
 
//implementación
procedure CrearAlias(cRuta: String);
var NewAlias: TStringList;
begin
  NewAlias := TStringList.Create;
  with NewAlias do begin
    Clear;
    Add('SERVER NAME=' + cRuta);
  end;
  Session.ModifyAlias('ProgramaData', NewAlias);
  NewAlias.Free;
end;

Estoy a punto de decidir obligar al usuario final a instalar el programa en un directorio en C:\, deshabilitando, en el instalador, la posibilidad de modificarlo.

Muchas gracias.