Acessar registro!
ola pessoal gostaria de acessar um valor no registro no view source do meu projeto...??
e se o valor for por exemplo 10 ele nao executa a aplicacao teria como..??
e se o valor for por exemplo 10 ele nao executa a aplicacao teria como..??
Zacca
Curtidas 0
Respostas
Marcelo.l
20/12/2003
Tente isto
Em USES declare Registry
try
Reg := TRegistry.Create;
if Reg.OpenKey(´\Software\MeuPrograma´, True) then
begin
if Reg.ValueExists(´Contador´) then
iCount := Reg.ReadInteger(´Contador´);
end;
finally
Reg.Free;
end;
if icount >= 10 Then Halt(1);
Em USES declare Registry
try
Reg := TRegistry.Create;
if Reg.OpenKey(´\Software\MeuPrograma´, True) then
begin
if Reg.ValueExists(´Contador´) then
iCount := Reg.ReadInteger(´Contador´);
end;
finally
Reg.Free;
end;
if icount >= 10 Then Halt(1);
GOSTEI 0