class= " lineNumbers " de
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :
29 :
30 :
31 :
32 :
33 :
34 :
35 :
36 :
37 :
38 :
39 :
40 :
41 :
42 :
43 :
44 :
45 :
46 :
47 :
48 :
49 :
50 :
51 :
52 :
53 :
54 :
55 :
56 :
57 :
|
class= de
class= " de l'id= " codeSnippet800596 de *****************************************************************************
Prototypes de // Windows api
***************************************************************************** de //
VIDE KERNEL32.GetSystemTime (INDICATEUR) de stdcall de prototype ;
stdcall BOOL KERNEL32.SystemTimeToTzSpecificLocalTime (INDICATEUR, INDICATEUR, INDICATEUR) de prototype ;
le _SYSTEMTIME de typedef commencent
Iyear COURT ;
Imonth COURT ;
iDayOffWeek COURT ;
Iday COURT ;
Ihour COURT ;
Iminute COURT ;
Isecond COURT ;
Imillisecond COURT ;
extrémité ;
_SYSTEMTIME SystemTime, LocalTime ;
pSystemTime d'INDICATEUR de _SYSTEMTIME, pLocalTime ;
#include « ifx.h »
#include « isrt.h »
#include « iswi.h »
#include « WinApi.h »
prototype MiscCommon_Installed d'exportation () ;
fonction MiscCommon_Installed ()
Jour VARIABLE, année, mois ;
CORDE sYear, sDay, sMonth ;
bSuccess de BOOL ;
Dragon de CORDE ;
svName de CORDE ;
Le NOMBRE nvSize ;
Temp de CORDE ;
commencer
// obtiennent le jour, le mois, et l'année en cours
pSystemTime = &SystemTime ;
GetSystemTime (pSystemTime) ;
pLocalTime = &LocalTime ;
bSuccess = SystemTimeToTzSpecificLocalTime (NULLE, pSystemTime, pLocalTime) ;
Année = pLocalTime->iyear ;
sYear = année ;
Mois = pLocalTime->imonth ;
sMonth = mois ;
Jour = pLocalTime->iday ;
sDay = jour ;
//MessageBox (sMonth, INFORMATION) ;
RegDBSetKeyValueEx (« \ \ LOGICIEL \ \ \ sans fil de ComHouse \ dégagement », « InstallYear », REGDB_NUMBER, sYear, -1) ;
RegDBSetKeyValueEx (« \ \ LOGICIEL \ \ \ sans fil de ComHouse \ dégagement », « InstallMonth », REGDB_NUMBER, sMonth, -1) ;
RegDBSetKeyValueEx (« \ \ LOGICIEL \ \ \ sans fil de ComHouse \ dégagement », « InstallDay », REGDB_NUMBER, sDay, -1) ;
RegDBSetKeyValueEx (« \ \ LOGICIEL \ \ \ sans fil de ComHouse \ dégagement », « INSTALLDIR », REGDB_STRING, INSTALLDIR, -1) ;
extrémité ;
|