Fórum Path - Windows Service #353690
14/02/2008
0
Olá a todos !
Desenvolvi um Serviço de Windows com Delphi 2006 e em seu processamento preciso verificar se existe um arquivo no mesmo diretório do Serviço.
Algo como :
if FileExists(ExtractFilePath(Application.ExeName) + ´\Parametros.ini´) then
mas isso não funciona para Serviços.
Como retornar o Path do serviço ?
Agradeço a ajuda.
Desenvolvi um Serviço de Windows com Delphi 2006 e em seu processamento preciso verificar se existe um arquivo no mesmo diretório do Serviço.
Algo como :
if FileExists(ExtractFilePath(Application.ExeName) + ´\Parametros.ini´) then
mas isso não funciona para Serviços.
Como retornar o Path do serviço ?
Agradeço a ajuda.
Felipeucc
Curtir tópico
+ 0
Responder
Posts
14/02/2008
Rodrigoprado
if FileExists(ExtractFilePath(Application.ExeName) + ´Cadastro.xml´) then
begin
showmessage(ExtractFilePath(Application.ExeName) + ´Cadastro.xml´)
end;
o código funciona sim....
tenho um serviço aqui e testei com o .xml, meu serviço esta na system 32, ai caso o arquivo na exista eu verifico o mesmo e crio.
tenta fazer o teste em um form delphi qualquer em seguida jogue no serviço, istale ele pelo comando [caminho /install] ai execute o services.msc veja se o serviço esta iniciado.
begin
showmessage(ExtractFilePath(Application.ExeName) + ´Cadastro.xml´)
end;
o código funciona sim....
tenho um serviço aqui e testei com o .xml, meu serviço esta na system 32, ai caso o arquivo na exista eu verifico o mesmo e crio.
tenta fazer o teste em um form delphi qualquer em seguida jogue no serviço, istale ele pelo comando [caminho /install] ai execute o services.msc veja se o serviço esta iniciado.
Responder
Gostei + 0
14/02/2008
Onjahyr
Parece que é a barra que você colocou, retire ela: [b:5fa7ce77a7]´\Parametros.ini´[/b:5fa7ce77a7]
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)