[r803]: / branches / FeatureBranches / PrimaryHost / Project Information_1 / GetVersionProperty / svnobj  Maximize  Restore  History

Download this file

11 lines (10 with data), 2.5 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
IF stKey = "Version" THEN
	GetVersionProperty.uiMajor := 1;
	GetVersionProperty.uiMinor := 4;
	GetVersionProperty.uiServicePack := 0;
	GetVersionProperty.uiPatch := 12;
ELSE
	GetVersionProperty.uiMajor := 0;
	GetVersionProperty.uiMinor := 0;
	GetVersionProperty.uiPatch := 0;
END_IF