In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

TRegistry.

Xailer professional forum in English
Responder
pjmfelix
Mensajes: 61
Registrado: Jue Abr 27, 2006 1:23 pm

TRegistry.

Mensaje por pjmfelix »

Hi.
In this class what is equal to RegQueryValue(Handle,"IExplore.Exe",@cValue).
Regards.
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9440
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

TRegistry.

Mensaje por ignacio »

Paulo,
This class has nothing to deal with IE. Is for WINDOWS OS Registry
database.
Regards,
"Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hi.
>
> In this class what is equal to
> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>
> Regards.
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
NoName
Mensajes: 531
Registrado: Vie Feb 03, 2006 7:27 pm

TRegistry.

Mensaje por NoName »

Paulo,
This class has nothing to deal with IE. Is for WINDOWS OS Registry
database.
Regards,
"Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hi.
>
> In this class what is equal to
> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>
> Regards.
>
Arriba
pjmfelix
Mensajes: 61
Registrado: Jue Abr 27, 2006 1:23 pm

TRegistry.

Mensaje por pjmfelix »

Hi, Ignacio i want pass this function that i have in FW to Xailer, to
retreive the path of IExplorer.Exe.
FW Sample :
Local nHandle,cValue := ""
If
RegOpenKey(HKEY_LOCAL_MACHINE,"SOFTWAREMicrosoftWindowsCurrentVersionApp
Paths",@nHandle) == 0
RegQueryValue(nHandle,"IExplore.Exe",@cValue)
cValue := lfn2sfn(cValue)
RegCloseKey(nHandle)
EndIf
Xailer Sample:
Local oWinReg
WITH OBJECT oWinReg := TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
:OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp Paths")
:GetString("IExplore.Exe")
:CloseKey()
:End()
END WITH
Regards.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escreveu na mensagem
news:4458cd1d$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Paulo,
>
> This class has nothing to deal with IE. Is for WINDOWS OS Registry
> database.
>
> Regards,
>
> "Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
> news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Hi.
>>
>> In this class what is equal to
>> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>>
>> Regards.
>>
>
>
Arriba
pjmfelix
Mensajes: 61
Registrado: Jue Abr 27, 2006 1:23 pm

TRegistry.

Mensaje por pjmfelix »

Hi, Ignacio i want pass this function that i have in FW to Xailer, to
retreive the path of IExplorer.Exe.
FW Sample :
Local nHandle,cValue := ""
If
RegOpenKey(HKEY_LOCAL_MACHINE,"SOFTWAREMicrosoftWindowsCurrentVersionApp
Paths",@nHandle) == 0
RegQueryValue(nHandle,"IExplore.Exe",@cValue)
cValue := lfn2sfn(cValue)
RegCloseKey(nHandle)
EndIf
Xailer Sample:
Local oWinReg
WITH OBJECT oWinReg := TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
:OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp Paths")
:GetString("IExplore.Exe")
:CloseKey()
:End()
END WITH
Regards.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escreveu na mensagem
news:4458cd1d$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Paulo,
>
> This class has nothing to deal with IE. Is for WINDOWS OS Registry
> database.
>
> Regards,
>
> "Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
> news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Hi.
>>
>> In this class what is equal to
>> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>>
>> Regards.
>>
>
>
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9440
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

TRegistry.

Mensaje por ignacio »

Paulo,
Try this:
#include "WinReg.api"
With Object TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
if :OpenKey( "SOFTWAREMicrosoftWindowsCurrentVersionApp
PathsIEXPLORE.EXE" ) == 0
cDir := :GetString( "" )
:CloseKey()
endif
End With
Regards,
"Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
news:4458d721$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hi, Ignacio i want pass this function that i have in FW to Xailer, to
> retreive the path of IExplorer.Exe.
>
>
> FW Sample :
>
> Local nHandle,cValue := ""
>
> If
> RegOpenKey(HKEY_LOCAL_MACHINE,"SOFTWAREMicrosoftWindowsCurrentVersionApp
> Paths",@nHandle) == 0
> RegQueryValue(nHandle,"IExplore.Exe",@cValue)
> cValue := lfn2sfn(cValue)
> RegCloseKey(nHandle)
> EndIf
>
>
> Xailer Sample:
>
> Local oWinReg
>
> WITH OBJECT oWinReg := TRegistry():New()
> :Root := HKEY_LOCAL_MACHINE
> :OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp Paths")
> :GetString("IExplore.Exe")
> :CloseKey()
> :End()
> END WITH
>
> Regards.
>
>
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escreveu na mensagem
> news:4458cd1d$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Paulo,
>>
>> This class has nothing to deal with IE. Is for WINDOWS OS Registry
>> database.
>>
>> Regards,
>>
>> "Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
>> news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>> Hi.
>>>
>>> In this class what is equal to
>>> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>>>
>>> Regards.
>>>
>>
>>
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
NoName
Mensajes: 531
Registrado: Vie Feb 03, 2006 7:27 pm

TRegistry.

Mensaje por NoName »

Paulo,
Try this:
#include "WinReg.api"
With Object TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
if :OpenKey( "SOFTWAREMicrosoftWindowsCurrentVersionApp
PathsIEXPLORE.EXE" ) == 0
cDir := :GetString( "" )
:CloseKey()
endif
End With
Regards,
"Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
news:4458d721$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Hi, Ignacio i want pass this function that i have in FW to Xailer, to
> retreive the path of IExplorer.Exe.
>
>
> FW Sample :
>
> Local nHandle,cValue := ""
>
> If
> RegOpenKey(HKEY_LOCAL_MACHINE,"SOFTWAREMicrosoftWindowsCurrentVersionApp
> Paths",@nHandle) == 0
> RegQueryValue(nHandle,"IExplore.Exe",@cValue)
> cValue := lfn2sfn(cValue)
> RegCloseKey(nHandle)
> EndIf
>
>
> Xailer Sample:
>
> Local oWinReg
>
> WITH OBJECT oWinReg := TRegistry():New()
> :Root := HKEY_LOCAL_MACHINE
> :OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp Paths")
> :GetString("IExplore.Exe")
> :CloseKey()
> :End()
> END WITH
>
> Regards.
>
>
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escreveu na mensagem
> news:4458cd1d$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>> Paulo,
>>
>> This class has nothing to deal with IE. Is for WINDOWS OS Registry
>> database.
>>
>> Regards,
>>
>> "Paulo Jorge M. Félix" <pjmfelix@sisbit.pt> escribió en el mensaje
>> news:44589997$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>> Hi.
>>>
>>> In this class what is equal to
>>> RegQueryValue(Handle,"IExplore.Exe",@cValue).
>>>
>>> Regards.
>>>
>>
>>
>
>
Arriba
jlalin
Mensajes: 926
Registrado: Sab Dic 25, 2010 11:10 pm

TRegistry.

Mensaje por jlalin »

Paulo,
this sample should work as expected:
WITH OBJECT oWinReg := TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
:OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp
PathsIExplore.exe")
cPath := :GetString( "Path" )
:CloseKey()
:End()
END WITH
Regards,
José Lalí­n
Arriba
jlalin
Mensajes: 926
Registrado: Sab Dic 25, 2010 11:10 pm

TRegistry.

Mensaje por jlalin »

Paulo,
this sample should work as expected:
WITH OBJECT oWinReg := TRegistry():New()
:Root := HKEY_LOCAL_MACHINE
:OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp
PathsIExplore.exe")
cPath := :GetString( "Path" )
:CloseKey()
:End()
END WITH
Regards,
José Lalí­n
Arriba
pjmfelix
Mensajes: 61
Registrado: Jue Abr 27, 2006 1:23 pm

TRegistry.

Mensaje por pjmfelix »

Thank you Ignacio and José.
It works.
"José Lalín" <dezac@corevia.com> escreveu na mensagem
news:445a67e0$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Paulo,
>
> this sample should work as expected:
>
> WITH OBJECT oWinReg := TRegistry():New()
> :Root := HKEY_LOCAL_MACHINE
> :OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp
> PathsIExplore.exe")
> cPath := :GetString( "Path" )
> :CloseKey()
> :End()
> END WITH
>
> Regards,
> José Lalín
Arriba
pjmfelix
Mensajes: 61
Registrado: Jue Abr 27, 2006 1:23 pm

TRegistry.

Mensaje por pjmfelix »

Thank you Ignacio and José.
It works.
"José Lalín" <dezac@corevia.com> escreveu na mensagem
news:445a67e0$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Paulo,
>
> this sample should work as expected:
>
> WITH OBJECT oWinReg := TRegistry():New()
> :Root := HKEY_LOCAL_MACHINE
> :OpenKey("SOFTWAREMicrosoftWindowsCurrentVersionApp
> PathsIExplore.exe")
> cPath := :GetString( "Path" )
> :CloseKey()
> :End()
> END WITH
>
> Regards,
> José Lalín
Arriba
Responder

Volver a “Xailer Pro English”