Duvida localizar arquivo!

[ahhmulekxd]

Eu estou fazendo um programa mais Ihcomplicou ;D
o programa faz o seguinte, ele abre um arquivo texto procurar o conteudo nele e altera!
mais o problema esta em localizar esse arquivo para alterar!
o caminho dele é +- esse!
(unidade q o windows esta instalado):\(Users ou documents and settings)\(Nome do Usuario)\AppData(pasta oculta)\Roaming\Mozilla\Firefox\Profiles\??????.de fault(??? cada pc recebe um nome diferente)\prefs.js(finalmente o arquivo)

o comando a ser execultado pelo delphi esse ai logo em baixo!

var
ARQ: TStringList;
begin
ARQ:=TStringList.Create;
ARQ.LoadFromFile('CAMINHO DO ARQUIVO prefs.js');
ARQ.Text:=StringReplace(ARQ.Text,'PROCURA CONTEUDO A SER ALTERADO','SE ACHAR TROCA POR ESSE',[rfReplaceAll]);
ARQ.SavetoFile('CAMINHO DO ARQUIVO prefs.js');
end;

como eu posso fazer para q o programa encontre o caminho certo EM QUALQUER MAQUINA Q ELE SEJA EXECULTADO?
vlws

[wendel]

Olá ahhmulekxd para que voce chegue ate a pasta Roaming, basta voce usar: %AppData%

Então veja como ficaria:

ARQ.LoadFromFile('%AppData%\Mozilla\Firefox\Profiles\'+Edit1.Text+'\prefs.js');

No Edit1, seria para voce colocar o nome do arquivo .default.
Se eu não me engano deste modo vai funcionar.
Verifique se da certo ou se é isso mesmo o que voce quer, qualquer outra duvida nao exite em posta-la.