Registro windows by mheads
Código
Na Uses adicione Regedit...
esse exemplo o sistema sera exibido em messagebox o Endereco do banco de dados dentro do Registro do windows.
E foi declarado uma Procedure Caminho Abaixo do public
a chave se chama Host e nela esta contida o endereco
Procedure Tfrmlogo.Caminho;
var cam:Tregistry;
begin
try
cam:=tregistry.create;
with cam do begin
rootkey:=HKEy_LOCAL_MACHINE;
openkey('Software',False);
Showmessage(ReadString('Host'));
closekey;
end;
Espero ter ajudado
By Eber_Mheads
Publicidade
Vote na dica
Quantidade de votos: 0 votos
Aceitação: 0%
Detalhes da dica
Categoria: Windows
Adicionada dia: 08/11/05
Por: Eber Alves Da Silva
Visualizada: 2828 vezes
Adicionada dia: 08/11/05
Por: Eber Alves Da Silva
Visualizada: 2828 vezes
COLUNISTAS
Publicidade
Enquete
O que achou do novo site?
Validações
Publicidade
Enquete
O que achou do novo site?
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009