FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TReg32 urgente???
Posts: 111
Joined: Sun Aug 13, 2006 07:28 PM
TReg32 urgente???
Posted: Fri Jan 12, 2007 04:21 PM

Saludos, estoy algo atorado, mi siguiente duda es la siguiente, por medio de la clase treg32 quiero eliminar la entrada en el registro de windows, pero no se como, alguien sabe como, o tiene un ejemplo

gracias

antonio díaz

Posts: 111
Joined: Sun Aug 13, 2006 07:28 PM
TReg32 urgente???
Posted: Fri Jan 12, 2007 05:43 PM

he intentado borrar una clave del registro con esta instruccion pero no me lo hace, RegDeleteKey( "CLAVE" ), utilizo fwh26, harbour, que estoy haciendo mal, alguien ya intento hacerlo

gracias

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
TReg32 urgente???
Posted: Fri Jan 12, 2007 06:24 PM
Antonio,

Te falta el parámetro nKey, que previamente has de calcular usando RegOpenKey( )
   local hKey

   RegOpenKey( HKEY_LOCAL_MACHINE,;
               "Software\Microsoft\Windows\CurrentVersion\Run", @hKey )

   RegDeleteKey( hKey, "CLAVE" ) 
   RegCloseKey( hKey )
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 111
Joined: Sun Aug 13, 2006 07:28 PM
TReg32 urgente???
Posted: Fri Jan 12, 2007 06:28 PM

este es el codigo que utilizo, pero no me elimina nada, que estoy haciendo mal

if RegOpenKey( HKEY_CURRENT_USER, "Software\ODBC\ODBC.INI\LIGA_INFORMIX", @nHandle ) = 0
RegDeleteKey( nHandle, "LIGA_INFORMIX" )
msgstop("eliminada")
endif

saludos

Antonio Díaz

Posts: 625
Joined: Wed Mar 14, 2007 06:49 PM
Re: TReg32 urgente???
Posted: Mon May 09, 2011 09:33 PM
Pues de nuevo reviviendo a los muertos:

Maestro Antonio ha habido alguna solución, RegOpenKey() devuelve 0 eso quiere decir que pudo abrir con exito la clave, pero no logro eliminarla.

Aqui mi codigo..

Code (fw): Select all Collapse
LOCAL hKey

IF RegOpenKey( HKEY_LOCAL_MACHINE,"SOFTWARE\Microsoft\Windows\CurrentVersion\Run", @hKey ) == 0
              SysRefresh()
              MSGInfo("Borrando")
              Msginfo("Borrando Registro...",RegDeleteKey( hKey, "WIFICTRL" ))   //RegDeleteKey( hKey, "WIFICTRL" )
              SysRefresh()
              MSGInfo("Ya no debe estar")
              RegCloseKey( hKey )
           ENDIF


Al poner Msginfo("Borrando Registro...",RegDeleteKey( hKey, "WIFICTRL" )) devuelve 2, segun la documentacion esto debe ser 0 para indicar que la eliminacion fue correcta, que significa el error 2, y si fuera posible documentar en este post cuales y que significan los errores para poder solucionarlos.

Alguien más que haya podido solucionarla... :-) :-) :-)
Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TReg32 urgente???
Posted: Mon May 09, 2011 10:30 PM
Victor,

Aqui tienes la documentación de la función en el API de Windows:
http://msdn.microsoft.com/en-us/library/ms724845(v=vs.85).aspx
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 364
Joined: Tue Oct 25, 2005 07:06 PM
Re: TReg32 urgente???
Posted: Mon May 09, 2011 11:17 PM

amigo aca como trabaja la clase:

viewtopic.php?f=6t=8811hilit=lregistro

&&

Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian

alex_patino74@hotmail.com
whatsapp 57+3214777217
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: TReg32 urgente???
Posted: Tue May 10, 2011 02:08 AM

si estas bajo windows 7 o vista, no podras elimianr o modificar llaves en el registro a menos que tu app la hallas ejecutado como administrador.
esto por que estos SOs es mas rectrictivo con este tipo de operaciones.

salu2

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
Posts: 625
Joined: Wed Mar 14, 2007 06:49 PM
Re: TReg32 urgente??? (SOLUCIONADO)
Posted: Tue May 10, 2011 03:39 AM
Y como dicen por aka: :-) ! LISTO EL POLLO ! :-) ya pude solucionar el borrado de las claves de registro.

Es una solucion un poco ruda porque no uso la clase TReg32 y los comandos RegOpenKey(),RegDeleteKey() y RegCloseKey().
Estuve buscando en la ayuda de Windows y di con la solucion usando el propio Manejador del Registro de o lo que es más bien el Comando "REG", pueden ver una lista de ayuda en una consola DOS y tecleando "REG" y "REG /?"

Al grano, necesitaba borrar la cadena "MiApp" que estaba guardada en:
"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MiApp (DirdelExe)"
para iniciar una aplicacion para control de Wifi´s, pero no pude con dichas funciones de la Clase TReg32

Lo pude hacer de esta manera y con una sola linea de codigo:
Code (fw): Select all Collapse
WAITRUN("COMMAND.COM /C REG DELETE HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /V WIFICTRL /F",0)

/V Busca la etiqueta (Creo que es Equivalente a RegOpenKey() y su Handle)
/F Forza a Eliminar la cadena sin preguntar

Así que les dejo una solucion efectiva y menos tediosa que manejar handles y valores del manejador de error.


Maestro Antonio: Gracias por facilitarme el como entender los numeros de error que devuelve el manejador de funciones y que estan guardados en el archivo winerror.h de Borland :-) :-) :-) , los errores mas comunes que me dieron fueron:

ERROR_BAD_PATHNAME 161L
ERROR_FILE_NOT_FOUND 2L
ERROR_ACCESS_DENIED 5L
ERROR_INVALID_HANDLE 6L

El batallar con esto me obligo a dar con la solucion:


QAZWSX2K: Gracias por tu enlace, pero necesitaba borrar claves, Crearlas y modificarles se pueden hacer sin problemas con la clase TReg32. :-)

carlos vargas: Uso Windows XP SP3, no me gusta Windows Vista y Menos 7, los he instalado en otras makinas pero es engorroso que para todo te pida permiso, aparte de que las siento mas lentas e inestables, por fiabilidad me quedo por lo pronto con XP.

Con lo queme dices de los permisos, tambien pense en eso, pero soy Administrador en mi equipo y ni asi me dejo borrarlas, me decia que no encontraba la ruta, o que no era valida la clave a buscar. :-) :-)

Espero les sea de ayuda para que no batallen como yo jejeje. :-) :-) :-) :-) Ya voy 2 en un dia...
Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon

Continue the discussion