Fórum Atualizar Reg (regedit) a partir de um arquivo .reg. #372212
13/07/2009
0
Sistema.Reg
Abri-lo atualizando as chaves no registro do windows ?
Pelo CMD do XP a linha de comando é:
regedit.exe /s ¬systemdrive¬\Progs\Sistema.reg
Como faço isso no delphi ?
Thiagopedro
Curtir tópico
+ 0Posts
14/07/2009
.lg.
Talvez se chamar o [color=darkblue:b06e443d1a]cmd[/color:b06e443d1a] pelo ShellAPI passando o comando como parâmetro... ainda não testei, mas tai o codigo:
ShellExecute (0, Nil, Comando, Parametros, Nil, SW_ShowMaximized);
Não fiz um teste, pois estou um pouco ocupado. mas [color=darkred:b06e443d1a]se der[/color:b06e443d1a] eu faço um teste e volto a postar.
Gostei + 0
14/07/2009
Thiagopedro
ShellExecute (0, Nil, Comando, Parametros, Nil, SW_ShowMaximized);
Boa intenção!
A questão é se eu for usar de alguma forma o CMD eu chamaria logo o .bat
Mas o que quero é fazer essa operação via aplicação, sem chamar o CMD.
Sei que isso é possível, mas no momento agora não estou sabendo fazer.
Certamente nesse fórum tem pessoas com inúmeras experiências que pode ajudar.
Gostei + 0
14/07/2009
Emerson Nascimento
ShellExecute(0, Nil, ´regedit.exe´, ´/s ¬systemdrive¬\Progs\Sistema.reg´, Nil, SW_ShowMaximized);
ou assim:
ShellExecute(0, Nil, ´regedit.exe /s ¬systemdrive¬\Progs\Sistema.reg´, Nil, Nil, SW_SHOWNORMAL);
Gostei + 0
05/08/2009
Thiagopedro
var
csApp, csParams : PChar;
Str: String;
begin
csApp := ´regedit´;
Str := ´/s C:\Registro.reg´;
csParams := PChar(Str) //converte a var string para pchar
ShellExecute(0,
Nil,
csApp,
csParams,
Nil,
SW_HIDE);
Mas só funciona se o arquivo estiver no c:\
Porque não consigo fazer funcionar se o arquivo estiver por exemplo:
var
csApp, csParams : PChar;
Str: String;
begin
csApp := ´regedit´;
Str := ´/s C:\Arquivos de programas\Registro.reg´;
ou
Str := ´/s ´ + extractfiledir(Application.ExeName)+´\Registro.reg´;
????
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)