Criar Alias na pasta do projeto

21/09/2004

Oi, gostaria de saber como faço pra criar ALIAS em tempo de execução que ´enxergue´ o caminho de instalação do meu projeto.
Exemplo:
Caso o usuário na hora que irá instalar, troque a pasta padrão (C:\Arquivos de Programas\Meu Projeto) para outra diferente.

Uso D7, Paradox e InnoSetup


Facc

Respostas

21/09/2004

Aroldo Zanela

Colega,

Está no help do Delphi:

  with Session do
  if not IsAlias(´NOVO´) then
  begin
    AddStandardAlias(´NOVO´, ExtractFilePath(ParamStr(0)), ´PARADOX´);
    SaveConfigFile;
  end;


Não esqueça de adicionar [b:d75526eb47]dbTables [/b:d75526eb47]na lista de uses.


Responder Citar

21/09/2004

Facc

[quote:bc69e276cb=´Aroldo Zanela´]Colega,

Está no help do Delphi:

  with Session do
  if not IsAlias(´NOVO´) then
  begin
    AddStandardAlias(´NOVO´, ExtractFilePath(ParamStr(0)), ´PARADOX´);
    SaveConfigFile;
  end;


Não esqueça de adicionar [b:bc69e276cb]dbTables [/b:bc69e276cb]na lista de uses.[/quote:bc69e276cb]

Amigo,

Eu fiz tudo o que vc me disse, porém deu erro, poderia me ajudar na hora da instalação ele criar esse alias???


Responder Citar

22/09/2004

Aroldo Zanela

Colega,

Sem problemas, coloque o fragmento de código referente a criação do ALIAS e onde ele está sendo disparado.


Responder Citar