Ir para conteúdo
Fórum Script Brasil

R10

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Tudo que R10 postou

  1. Bom dia Senhores sou novo por aqui e preciso da ajuda de vocês. É o seguinte ... Crei um serviço do windows no delphi 2009. Este serviço faz um backup. Código do Serviço : ################################### procedure TThreadBackup.Execute; var Hora: string; Data: string; begin while not Terminated do begin Hora := FormatDateTime('hhmm' ,Now); Data := FormatDateTime('ddmmyyyy',Now); ShellExecute(handle,PWideChar('open'),PWideChar('C:\ARQUIVOS DE PROGRAMAS\WINRAR\WINRAR.EXE'),PWideChar('A C:\Bk' + Data + Hora),PWideChar('C:\Siafw\'),SW_SHOWMINIMIZED); Break; Application.Destroy; end; end; ################################### Quero criar algumas chaves no regedit onde o usuario possa acessar o regedit e definir algumas informações. Por exemplo : Nome Backup Diretorio Origem Diretorio Destino Hora Backup ( Esta hora será quando será inicializado o meu serviço ) Sei que preciso usar a classe TRegistry. Outra pergunta como inicializar um serviço do windows pelo Regedit. Por favor me ajudem Obrigado
×
×
  • Criar Novo...