|
Postada em 22/07/2006 01:07 hs
alguem ae sabe como eu faço isso? exemplo: eu quero ler um valor do registro, ae uso a API RegQueryValueEx, ela retorna o conteudo do valor, porém retorna em Long, mas se eu abrir o registro e for ver o que está la, é uma string. alguem sabe como trazer p/ string este long, e fazer o contrario tb?
|
|
|
|
|
Postada em 22/07/2006 07:10 hs
Acho que assim strVAR = Trim(Str(Trim(longVAR))) ' LIMPA TODOS OS ESPAÇOS e MUDA P/String longVAR = CLng(Val(strVAR)) ' MUDA UMS STRING DE NUMEROS PARA Long vlu//
|
|
|
|
Postada em 22/07/2006 13:11 hs
vlw ae pela atenção... + n funciono, a q transforma LONG para STR eu testei com a função de API q le o registro, mas e n retornou o que eu esperava, mas pode ser q o erro esteje na chamada da API, agora a q transforma STR para LONG eu testei usando um textbox msm p/ pegar a STR, mas sempre retorna 0. vou colocar a minha chamada da função que faz a leitura do registro, se alguem puder ajudar, agradeço.
Const HKEY_LOCAL_MACHINE = &H80000002 Dim Result As Long Dim strBuf As String Dim lDataBufSize As Long RegOpenKeyEx HKEY_LOCAL_MACHINE,
|
|
|
|
Postada em 22/07/2006 13:12 hs
cortou... aki vai o code
Const HKEY_LOCAL_MACHINE = &H80000002 Dim Result As Long Dim strBuf As String Dim lDataBufSize As Long RegOpenKeyEx HKEY_LOCAL_MACHINE, "SOFTWARE", 0, 1, Result strBuf = String(250, Chr(0)) lDataBufSize = Len(strBuf) Label1.Caption = Trim(Str(Trim(RegQueryValueEx(Result, "(Padrão)", 0, 0, ByVal strBuf, lDataBufSize))))
se alguem puder me ajudar, agradeço mto.
|
|
|
|
Postada em 22/07/2006 15:27 hs
acho q ele está voltando o valor em hexadecimal amigo tenta assim: Label1.Caption = Hex(RegQueryValueEx(Result, "(Padrão)", 0, 0, ByVal strBuf, lDataBufSize))
ou assim: Label1.Caption = Hex(clng(RegQueryValueEx(Result, "(Padrão)", 0, 0, ByVal strBuf, lDataBufSize))) veja se dá certo... t+
|
|
|
|
Postada em 22/07/2006 18:18 hs
Vocês estão usam a API de fora completamente errada! De onde saiu a idéia que o valor lido no registro é retornado pela API RegQueryValueEx??? No seu caso o valor lido pela API RegQueryValueEx é armazenada em strBuf e em lDataBufSize esta tamanho da string lida.
Consulte o uso dessa API no API Guide - www.allapi.net.
|
|
|
|