voce in HKEY_CURRENT_USER

Moderator: Enrico Maria Giordano

Post Reply
Romeo
Posts: 328
Joined: Thu Jan 25, 2007 3:53 pm
Location: Milan (Italy)

voce in HKEY_CURRENT_USER

Post by Romeo »

Ciao,

non riesco piu' a trovare l'esempio che mi permette di creare nuove variabili in hkey_current_user

Esempio, in key:

: EditWithPDFArchitech=1 (1)
...\Software\PdfCreator\Program ho varie variabili : LastSaveDirectory=c:\test (2)
: OpenOutputFile=1 (3)
: (4)
ma mi manca la variiabile: Pippo

Come faccio ad inserire la variabile Pippo come (4) variabile ?

Ho provato con RegCreateKey() e RegSetKey() ma canno qualcosa...

Grazie

Romeo/Zingoni
User avatar
Enrico Maria Giordano
Posts: 7355
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia
Contact:

Re: voce in HKEY_CURRENT_USER

Post by Enrico Maria Giordano »

Romeo,
Romeo wrote:Ciao,

non riesco piu' a trovare l'esempio che mi permette di creare nuove variabili in hkey_current_user

Esempio, in key:

: EditWithPDFArchitech=1 (1)
...\Software\PdfCreator\Program ho varie variabili : LastSaveDirectory=c:\test (2)
: OpenOutputFile=1 (3)
: (4)
ma mi manca la variiabile: Pippo

Come faccio ad inserire la variabile Pippo come (4) variabile ?

Ho provato con RegCreateKey() e RegSetKey() ma canno qualcosa...

Grazie

Romeo/Zingoni
Prova con questo esempio. E' un po' vecchio ma potrebbe funzionare.

Code: Select all

#include "Fivewin.ch"


#define HKEY_CURRENT_USER 2147483649

#define REG_DWORD 4


FUNCTION MAIN()

    LOCAL hKey := 0

    IF ! ISWINNT(); RETURN NIL; ENDIF

    REGCREATEKEY( HKEY_CURRENT_USER, "Test", @hKey )
    REGSETVALUE( hKey, "TestValue", 0, REG_DWORD, L2BIN( 1 ), 4 )
    REGCLOSEKEY( hKey )

    RETURN NIL


DLL32 FUNCTION REGCREATEKEY( hKey AS LONG, cSubKey AS LPSTR, @nHandle AS PTR ) AS LONG;
      PASCAL FROM "RegCreateKeyA" LIB "advapi32.dll"

DLL32 FUNCTION REGSETVALUE( hKey AS LONG, cValueName AS LPSTR, nReserved AS LONG, nType AS DWORD, cData AS LPSTR, nData AS DWORD ) AS LONG;
      PASCAL FROM "RegSetValueExA" LIB "advapi32.dll"

DLL32 FUNCTION REGCLOSEKEY( hKey AS LONG ) AS LONG;
      PASCAL FROM "RegCloseKey" LIB "advapi32.dll"
EMG
Post Reply