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:
|
" codeBody "
" notpretty " //*****************************************************************************
API van de Vensters van // Prototypen
// *****************************************************************************
prototype stdcall NIETIGE KERNEL32.GetSystemTime (WIJZER);
prototype stdcall BOOL KERNEL32.SystemTimeToTzSpecificLocalTime (WIJZER, WIJZER, WIJZER);
typedef _SYSTEMTIME begin
KORTE iyear;
KORTE imonth;
KORTE iDayOffWeek;
KORTE iday;
KORTE ihour;
KORTE iminute;
KORTE isecond;
KORTE imillisecond;
eind;
_SYSTEMTIME SystemTime, LocalTime;
_SYSTEMTIME WIJZER pSystemTime, pLocalTime;
#include „ifx.h“
#include „isrt.h“
#include „iswi.h“
#include „WinApi.h“
de uitvoer prototype MiscCommon_Installed ();
functie MiscCommon_Installed ()
VERSCHILLENDE Dag, Jaar, Maand;
sYear KOORD, sDay, sMonth;
BOOL bSuccess;
De draak van het KOORD;
KOORD svName;
Het AANTAL nvSize;
De temperaturen van het KOORD;
begin
// krijgt huidig dag, maand, en jaar
pSystemTime = &SystemTime;
GetSystemTime (pSystemTime);
pLocalTime = &LocalTime;
bSuccess = SystemTimeToTzSpecificLocalTime (VERKLAAR, pSystemTime, pLocalTime nietig);
Jaar = pLocalTime->iyear;
sYear = Jaar;
Maand = pLocalTime->imonth;
sMonth = Maand;
Dag = pLocalTime->iday;
sDay = Dag;
//MessageBox (sMonth, INFORMATIE);
RegDBSetKeyValueEx („\ \ de Draadloze \ \ Versie \ ComHouse“, „InstallYear“, sYear REGDB_NUMBER, -1 van de SOFTWARE \);
RegDBSetKeyValueEx („\ \ de Draadloze \ \ Versie \ ComHouse“, „InstallMonth“, REGDB_NUMBER, sMonth, -1 van de SOFTWARE \);
RegDBSetKeyValueEx („\ \ de Draadloze \ \ Versie \ ComHouse“, „InstallDay“, sDay REGDB_NUMBER, -1 van de SOFTWARE \);
RegDBSetKeyValueEx („\ \ de Draadloze \ \ Versie \ ComHouse“, „INSTALLDIR“, REGDB_STRING, INSTALLDIR, -1 van de SOFTWARE \);
eind;
|