Re: [delphi-br] Erro Leitura Registro Windows 7
Sinceramente, o Windows 7 de vocês devem ser pirata (XP misturado com Win7), O meu Windows 7 é Original, 32 bits e não existe este valor. VOCÊS ESTÃO CONFUNDINDO. A CHAVE EXISTE, mas o valor não existe, o valor é o valor, a chave é a chave, A CHAVE EXISTE, o VALOR NÃO. A, não vou mais discutir, parece até brincadeira, fala sério! Parei por aqui. Em 21/01/2010 20:05, Mieli Jr. escreveu: So abrir com 'OpenKeyReadOnly'... Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo logado como usuario comum. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Alguém aqui pode me indicar (ou enviar) uma boa apostila sobre banco de dados, falando sobre chave estrangeira, relacionamentos (com exemplos) e, de preferência, sobre o Firebird? Agradeço! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
O que eu testei tb era original e a situação é a q vc descreveu. A chave existe, porém o valor estava em branco (não preenchido), até onde eu me lembro. Mas como essa mensagem só chegou no momento em que estou redigindo (Sab, 23.01.2010 - 11:54) nem vale a pena requentar o caldo. Atte, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qui, 21/1/10, EmbarcaDelphi embarcadel...@yahoo.com.br escreveu: De: EmbarcaDelphi embarcadel...@yahoo.com.br Assunto: Re: [delphi-br] Erro Leitura Registro Windows 7 Para: delphi-br@yahoogrupos.com.br Data: Quinta-feira, 21 de Janeiro de 2010, 22:46 Sinceramente, o Windows 7 de vocês devem ser pirata (XP misturado com Win7), O meu Windows 7 é Original, 32 bits e não existe este valor. VOCÊS ESTÃO CONFUNDINDO. A CHAVE EXISTE, mas o valor não existe, o valor é o valor, a chave é a chave, A CHAVE EXISTE, o VALOR NÃO. A, não vou mais discutir, parece até brincadeira, fala sério! Parei por aqui. Em 21/01/2010 20:05, Mieli Jr. escreveu: So abrir com 'OpenKeyReadOnly' ... Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo logado como usuario comum. [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Francamente heim!!! :(
Como você posta uma pergunta dessa sem primeiro ir lá no regedit
verificar se esta chave existe ou não?
ProductName não existe no Windows 7
Em 20/01/2010 15:47, rcesa...@ymail.com escreveu:
Prezados,
Tenho um aplicação que lê algumas informações do registro do Windows.
No Windows XP ela funciona sem problemas, mas no Windows 7 a leitura
das mesmas chaves não traz valor nenhum e também não dá erro.
Uma das funções de leitura é a seguinte:
function NomeProduto: String;
var
registro_aux: TRegistry;
begin
registro_aux := TRegistry.Create;
Result := '';
try
registro_aux.RootKey := HKEY_LOCAL_MACHINE;
if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion', False)) then
begin
Result := registro_aux.ReadString ('ProductName');
registro_aux.CloseKey;
end;
finally
registro_aux.Free;
end;
end;
Será que alguém poderia me dizer o que fazer pra essa função retornar
o valor da chave no Windows 7?
Obrigado.
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Francamente heim!!! :(
Como você posta uma resposta dessa sem primeiro ir lá no regedit
verificar se esta chave existe ou não?
ProductName EXISTE SIM! no Windows 7
RSRSRS
Desculpe mais eu não resisti! Realmente existe sim...
2010/1/21 EmbarcaDelphi embarcadel...@yahoo.com.br
Francamente heim!!! :(
Como você posta uma pergunta dessa sem primeiro ir lá no regedit
verificar se esta chave existe ou não?
ProductName não existe no Windows 7
Em 20/01/2010 15:47, rcesa...@ymail.com escreveu:
Prezados,
Tenho um aplicação que lê algumas informações do registro do Windows.
No Windows XP ela funciona sem problemas, mas no Windows 7 a leitura
das mesmas chaves não traz valor nenhum e também não dá erro.
Uma das funções de leitura é a seguinte:
function NomeProduto: String;
var
registro_aux: TRegistry;
begin
registro_aux := TRegistry.Create;
Result := '';
try
registro_aux.RootKey := HKEY_LOCAL_MACHINE;
if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion', False)) then
begin
Result := registro_aux.ReadString ('ProductName');
registro_aux.CloseKey;
end;
finally
registro_aux.Free;
end;
end;
Será que alguém poderia me dizer o que fazer pra essa função retornar
o valor da chave no Windows 7?
Obrigado.
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Deve ser problemas com permissão mesmo.
Mas se é somente pra retornar a versão so windows você poderia tentar
resolver isso abrindo a chave como somente leitura nesse caso:
registro_aux.OpenKeyReadOnly('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion')
Vê ai se funfa!
[As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Erro Leitura Registro Windows 7
Particularmente usaria a dica do artigo publicado em
http://www.delphi3000.com/articles/article_3851.asp, e o adaptaria para
detecter versões do Windows 7. Ou seja, acho melhor usar a API do Windows para
detectar e analisar qual a versão em uso.
Boa sorte.
Sds.
To: delphi-br@yahoogrupos.com.br
From: ml.li...@gmail.com
Date: Thu, 21 Jan 2010 12:14:56 -0200
Subject: Re: [delphi-br] Erro Leitura Registro Windows 7
Deve ser problemas com permissão mesmo.
Mas se é somente pra retornar a versão so windows você poderia tentar
resolver isso abrindo a chave como somente leitura nesse caso:
registro_aux.OpenKeyReadOnly('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion')
Vê ai se funfa!
_
Com o Windows 7 nenhum arquivo vai se esconder de você. Clique para conhecer !
http://www.microsoft.com/brasil/windows7/default.html?WT.mc_id=1539
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Existe porque foi criada pelo seu programa ou por terceiros, mas no
original o Windows 7 não trás este valor. Eu uso o Windows 7 32 bits.
pode ser que venha no de 64 bits (mas ainda assim eu duvido).
Em 21/01/2010 10:52, Marcelo Magnani escreveu:
Desculpe a intromissão, mas a chave ProductName existe sim no Windows 7. O
problema deve ser outro.
A função abaixo foi testada no Windows 7 e funcionou normalmente.
function NomeProduto: String;
var
registro_aux: TRegistry;
begin
registro_aux := TRegistry.Create;
Result := '';
try
registro_aux.RootKey := HKEY_LOCAL_MACHINE;
if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows NT\CurrentVersion',
False)) then
begin
Result := registro_aux.ReadString ('ProductName');
registro_aux.CloseKey;
end;
finally
registro_aux.Free;
end;
end;
Abraços
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
NÃO EXISTE. Se tem no seu Windows 7 é porque foi colocado através de outros programas, não vem no original. A não ser que seja Windows 7 64 bits, pois o meu é de 32 bits. Em 21/01/2010 10:58, Mieli Jr. escreveu: Francamente heim!!! :( Como você posta uma resposta dessa sem primeiro ir lá no regedit verificar se esta chave existe ou não? ProductName EXISTE SIM! no Windows 7 RSRSRS Desculpe mais eu não resisti! Realmente existe sim... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
Eu acredito que seja o controle de conta do usuário.. com ele ativado não da nem pra instalar um serviço. Att, ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... Em 21 de janeiro de 2010 14:29, Marcelo leite_rom...@yahoo.com.brescreveu: Mas voces estão desviando o foco da pergunta, o nosso colega perguntou se há algum problema de leitura da chave do registro e não a existencia da mesma. De: EmbarcaDelphi embarcadel...@yahoo.com.brembarcadelphi%40yahoo.com.br Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Quinta-feira, 21 de Janeiro de 2010 12:12:36 Assunto: Re: [delphi-br] Erro Leitura Registro Windows 7 NÃO EXISTE. Se tem no seu Windows 7 é porque foi colocado através de outros programas, não vem no original. A não ser que seja Windows 7 64 bits, pois o meu é de 32 bits. Em 21/01/2010 10:58, Mieli Jr. escreveu: Francamente heim!!! :( Como você posta uma resposta dessa sem primeiro ir lá no regedit verificar se esta chave existe ou não? ProductName EXISTE SIM! no Windows 7 RSRSRS Desculpe mais eu não resisti! Realmente existe sim... [As partes desta mensagem que não continham texto foram removidas] __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro Leitura Registro Windows 7
So abrir com 'OpenKeyReadOnly'... Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo logado como usuario comum. []'s [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro Leitura Registro Windows 7
if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows NT\CurrentVersion',
False)) then
Será que alguém poderia me dizer o que fazer pra essa função retornar o valor
da chave no Windows 7?
mas essa chave está lá no registro? Se sim, pode ser permissão de acesso...
--
Jackson
