Changeset 487 for cprs/branches/tmg-cprs/CPRS-Chart

Timestamp:

Sep 7, 2008, 8:34:08 PM (16 years ago)

Author:

Kevin Toppenberg

Message:

adding skin support (incomplete)

Location:

cprs/branches/tmg-cprs/CPRS-Chart

Files:

• Accessibility_TLB.pas (modified) (2 diffs)
• CPRSChart.cfg (modified) (1 diff)
• CPRSChart.dklang (modified) ( previous)
• CPRSChart.dof (modified) (2 diffs)
• CPRSChart.drc (modified) (38 diffs)
• CPRSChart.dsk (modified) (11 diffs)
• CPRSChart.~dsk (modified) (6 diffs)
• CPRSChart_TLB.pas (modified) (1 diff)
• Options/fOptions.dfm (modified) (4 diffs)
• Options/fOptions.pas (modified) (7 diffs)
• fFrame.pas (modified) (4 diffs)

cprs/branches/tmg-cprs/CPRS-Chart/Accessibility_TLB.pas

@@ -13 +13 @@
 
 // PASTLWTR : 1.2
-// File generated on 7/19/2008 3:07:40 PM from Type Library described below.
+// File generated on 9/7/2008 8:16:48 PM from Type Library described below.
 
 // ************************************************************************  //
@@ -24 +24 @@
 //   (1) v2.0 stdole, (C:\WINDOWS\system32\stdole2.tlb)
 // Parent TypeLibrary:
-//   (0) v1.0 CPRSChart, (P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb)
+//   (0) v1.0 CPRSChart, (P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb)
 // Errors:
 //   Hint: Parameter 'var' of IAccPropServices.SetPropValue changed to 'var_'

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.cfg

@@ -37 +37 @@
 -LE"c:\program files\borland\delphi7\Projects\Bpl"
 -LN"c:\program files\borland\delphi7\Projects\Bpl"
--U"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics"
--O"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics"
--I"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics"
--R"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics"
--DMSWINDOWS
+-U"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff"
+-O"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff"
+-I"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff"
+-R"c:\program files\borland\delphi7\Lib\Debug;c:\program files\borland\delphi7\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff"
+-DMSWINDOWS;USE_SKINS
 -w-UNSAFE_TYPE
 -w-UNSAFE_CODE

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dof

@@ -95 +95 @@
 PackageDLLOutputDir=
 PackageDCPOutputDir=
-SearchPath=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics
+SearchPath=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff
 Packages=vcl;rtl;vclx;VclSmp;vclshlctrls;dbrtl;adortl;vcldb;qrpt;bdertl;vcldbx;dsnap;cds;bdecds;teeui;teedb;tee;teeqr;ibxpress;visualclx;visualdbclx;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;inetdb;nmfast;dbexpress;dbxcds;indy;dclOffice2k;soaprtl;XWB_R60
-Conditionals=MSWINDOWS
+Conditionals=MSWINDOWS;USE_SKINS
 DebugSourceDirs=P:\Vista\tmg-cprs\dklang-package-3.01\
 UsePackages=0
@@ -135 +135 @@
 ProductVersion=1.0.0.0
 Comments=1.0.26.76
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=P:\Vista\tmg-cprs\dklang-package-3.01\
 [HistoryLists\hlConditionals]
-Count=1
-Item0=MSWINDOWS
+Count=2
+Item0=MSWINDOWS;USE_SKINS
+Item1=MSWINDOWS
 [HistoryLists\hlUnitAliases]
 Count=1
 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
 [HistoryLists\hlSearchPath]
-Count=14
-Item0=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics
-Item1=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source
-Item2=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01
-Item3=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib
-Item4=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages
-Item5=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU
-Item6=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu
-Item7=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI
-Item8=$(DELPHI)\Lib\Debug;C:\Program Files\Borland\Delphi7\Source\Rtl\Sys;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI
-Item9=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI;C:\Program Files\Borland\Delphi7\Source\Rtl\Sys
-Item10=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU
-Item11=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib
-Item12=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib
-Item13=C:\Vista\cprs\OR_3_215V26_69\CPRS-Lib
+Count=15
+Item0=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics;P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\SkinStuff
+Item1=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source;P:\Vista\tmg-cprs\TPNGGraphics
+Item2=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01;P:\Vista\tmg-cprs\TntWare\Delphi Unicode Controls\Source
+Item3=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib;P:\Vista\tmg-cprs\dklang-package-3.01
+Item4=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages;P:\Vista\tmg-cprs\CPRS-Lib
+Item5=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU;P:\Vista\tmg-cprs\Packages
+Item6=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu;P:\Vista\tmg-cprs\CPRS-Lib\DCU
+Item7=$(DELPHI)\Lib\Debug;$(DELPHI)\Source\ToolsAPI;P:\Vista\tmg-cprs\CPRS-Chart;P:\Vista\tmg-cprs\CPRS-Chart\dcu
+Item8=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI
+Item9=$(DELPHI)\Lib\Debug;C:\Program Files\Borland\Delphi7\Source\Rtl\Sys;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI
+Item10=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU;$(DELPHI)\Source\ToolsAPI;C:\Program Files\Borland\Delphi7\Source\Rtl\Sys
+Item11=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Chart;C:\Vista\cprs\OR_3_270V26_69\CPRS-Chart\DCU
+Item12=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib;C:\Program Files\Borland\Delphi7\Projects\OR_SRC_CREATION FILE 12 06 06 OR_3_270\OR_SRC_CREATION\CPRS-Lib
+Item13=$(DELPHI)\Lib\Debug;C:\Vista\cprs\OR_3_270V26_69\CPRS-Lib
+Item14=C:\Vista\cprs\OR_3_215V26_69\CPRS-Lib
 [HistoryLists\hlUnitOutputDirectory]
 Count=3

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.drc

@@ -9 +9 @@
 */
 
-#define IdResourceStrings_RSStackESHUTDOWN 64928
-#define IdResourceStrings_RSStackETOOMANYREFS 64929
-#define IdResourceStrings_RSStackETIMEDOUT 64930
-#define IdResourceStrings_RSStackECONNREFUSED 64931
-#define IdResourceStrings_RSStackELOOP 64932
-#define IdResourceStrings_RSStackENAMETOOLONG 64933
-#define IdResourceStrings_RSStackEHOSTDOWN 64934
-#define IdResourceStrings_RSStackEHOSTUNREACH 64935
-#define IdResourceStrings_RSStackENOTEMPTY 64936
-#define IdResourceStrings_RSStackHOST_NOT_FOUND 64937
-#define JConsts_sChangeJPGSize 64938
-#define JConsts_sJPEGError 64939
-#define JConsts_sJPEGImageFile 64940
-#define IdResourceStrings_RSStackENOPROTOOPT 64944
-#define IdResourceStrings_RSStackEPROTONOSUPPORT 64945
-#define IdResourceStrings_RSStackESOCKTNOSUPPORT 64946
-#define IdResourceStrings_RSStackEOPNOTSUPP 64947
-#define IdResourceStrings_RSStackEPFNOSUPPORT 64948
-#define IdResourceStrings_RSStackEAFNOSUPPORT 64949
-#define IdResourceStrings_RSStackEADDRINUSE 64950
-#define IdResourceStrings_RSStackEADDRNOTAVAIL 64951
-#define IdResourceStrings_RSStackENETDOWN 64952
-#define IdResourceStrings_RSStackENETUNREACH 64953
-#define IdResourceStrings_RSStackENETRESET 64954
-#define IdResourceStrings_RSStackECONNABORTED 64955
-#define IdResourceStrings_RSStackECONNRESET 64956
-#define IdResourceStrings_RSStackENOBUFS 64957
-#define IdResourceStrings_RSStackEISCONN 64958
-#define IdResourceStrings_RSStackENOTCONN 64959
-#define IdResourceStrings_RSWS2LoadError 64960
-#define IdResourceStrings_RSInvalidServiceName 64961
-#define IdResourceStrings_RSStackError 64962
-#define IdResourceStrings_RSStackEINTR 64963
-#define IdResourceStrings_RSStackEBADF 64964
-#define IdResourceStrings_RSStackEACCES 64965
-#define IdResourceStrings_RSStackEFAULT 64966
-#define IdResourceStrings_RSStackEINVAL 64967
-#define IdResourceStrings_RSStackEMFILE 64968
-#define IdResourceStrings_RSStackEWOULDBLOCK 64969
-#define IdResourceStrings_RSStackEINPROGRESS 64970
-#define IdResourceStrings_RSStackEALREADY 64971
-#define IdResourceStrings_RSStackENOTSOCK 64972
-#define IdResourceStrings_RSStackEDESTADDRREQ 64973
-#define IdResourceStrings_RSStackEMSGSIZE 64974
-#define IdResourceStrings_RSStackEPROTOTYPE 64975
-#define pnglang_EPNGInvalidFileHeaderText 64976
-#define pnglang_EPNGIHDRNotFirstText 64977
-#define pnglang_EPNGSizeExceedsText 64978
-#define pnglang_EPNGUnknownPalEntryText 64979
-#define pnglang_EPNGUnknownCriticalChunkText 64980
-#define pnglang_EPNGUnknownCompressionText 64981
-#define pnglang_EPNGUnknownInterlaceText 64982
-#define pnglang_EPNGCannotAssignChunkText 64983
-#define pnglang_EPNGUnexpectedEndText 64984
-#define pnglang_EPNGNoImageDataText 64985
-#define pnglang_EPNGCannotChangeSizeText 64986
-#define pnglang_EPNGOutMemoryText 64987
-#define pnglang_EPNGHeaderNotPresentText 64988
-#define IdResourceStrings_RSWinsockInitializationError 64989
-#define IdResourceStrings_RSSetSizeExceeded 64990
-#define IdResourceStrings_RSWS2CallError 64991
-#define VDBConsts_SFirstRecord 64992
-#define VDBConsts_SPriorRecord 64993
-#define VDBConsts_SNextRecord 64994
-#define VDBConsts_SLastRecord 64995
-#define VDBConsts_SInsertRecord 64996
-#define VDBConsts_SDeleteRecord 64997
-#define VDBConsts_SEditRecord 64998
-#define VDBConsts_SPostEdit 64999
-#define VDBConsts_SCancelEdit 65000
-#define VDBConsts_SRefreshRecord 65001
-#define VDBConsts_SRemoteLogin 65002
-#define pnglang_EPngInvalidCRCText 65003
-#define pnglang_EPNGInvalidIHDRText 65004
-#define pnglang_EPNGMissingMultipleIDATText 65005
-#define pnglang_EPNGZLIBErrorText 65006
-#define pnglang_EPNGInvalidPaletteText 65007
-#define QConsts_SUnknownImageFormat 65008
-#define QConsts_SUnableToWrite 65009
-#define QConsts_SUndo 65010
-#define QConsts_SRedo 65011
-#define QConsts_SLine 65012
-#define QConsts_SCut 65013
-#define QConsts_SCopy 65014
-#define QConsts_SPaste 65015
-#define QConsts_SClear 65016
-#define QConsts_SSelectAll 65017
-#define QConsts_SNoAppInLib 65018
-#define QConsts_SDuplicateApp 65019
-#define DBConsts_SBcdOverflow 65020
-#define DBConsts_SInvalidBcdValue 65021
-#define DBConsts_SCouldNotParseTimeStamp 65022
-#define DBConsts_SInvalidSqlTimeStamp 65023
-#define QConsts_SMsgDlgInformation 65024
-#define QConsts_SMsgDlgConfirm 65025
-#define QConsts_SUnnamed 65026
-#define QConsts_SName 65027
-#define QConsts_SSize 65028
-#define QConsts_SType 65029
-#define QConsts_SDate 65030
-#define QConsts_SAttributes 65031
-#define QConsts_SDuplicateMenus 65032
-#define QConsts_SImageIndexError 65033
-#define QConsts_SInvalidImageDimensions 65034
-#define QConsts_SInvalidImageDimension 65035
-#define QConsts_SInvalidMimeSourceStream 65036
-#define QConsts_SMimeNotSupportedForIcon 65037
-#define QConsts_SOpen 65038
-#define QConsts_SSave 65039
-#define QConsts_SNotAnMDIForm 65040
-#define QConsts_SMDIChildNotVisible 65041
-#define QConsts_SControlParentSetToSelf 65042
-#define QConsts_SOKButton 65043
-#define QConsts_SCancelButton 65044
-#define QConsts_SYesButton 65045
-#define QConsts_SNoButton 65046
-#define QConsts_SHelpButton 65047
-#define QConsts_SCloseButton 65048
-#define QConsts_SIgnoreButton 65049
-#define QConsts_SRetryButton 65050
-#define QConsts_SAbortButton 65051
-#define QConsts_SAllButton 65052
-#define QConsts_SCannotDragForm 65053
-#define QConsts_SMsgDlgWarning 65054
-#define QConsts_SMsgDlgError 65055
-#define QConsts_SmkcAlt 65056
-#define QConsts_SInvalidPixelFormat 65057
-#define QConsts_SNoCanvasHandle 65058
-#define QConsts_SInvalidCanvasState 65059
-#define QConsts_SInvalidImageSize 65060
-#define QConsts_SInvalidColorDepth 65061
-#define QConsts_SCannotFocus 65062
-#define QConsts_SParentRequired 65063
-#define QConsts_SVisibleChanged 65064
-#define QConsts_SMenuIndexError 65065
-#define QConsts_SMenuReinserted 65066
-#define QConsts_SNoMenuRecursion 65067
-#define QConsts_SMenuNotFound 65068
-#define QConsts_SMenuSetFormError 65069
-#define QConsts_SGroupIndexTooLow 65070
-#define QConsts_SNoMDIForm 65071
-#define QConsts_SmkcEsc 65072
-#define QConsts_SmkcReturn 65073
-#define QConsts_SmkcEnter 65074
-#define QConsts_SmkcSpace 65075
-#define QConsts_SmkcPgUp 65076
-#define QConsts_SmkcPgDn 65077
-#define QConsts_SmkcEnd 65078
-#define QConsts_SmkcHome 65079
-#define QConsts_SmkcLeft 65080
-#define QConsts_SmkcUp 65081
-#define QConsts_SmkcRight 65082
-#define QConsts_SmkcDown 65083
-#define QConsts_SmkcIns 65084
-#define QConsts_SmkcDel 65085
-#define QConsts_SmkcShift 65086
-#define QConsts_SmkcCtrl 65087
-#define DKLang_SDKLangErrMsg_ErrorLoadingTran 65088
-#define DKLang_SDKLangErrMsg_InvalidConstName 65089
-#define DKLang_SDKLangErrMsg_DuplicateConstName 65090
-#define DKLang_SDKLangErrMsg_ConstantNotFound 65091
-#define DKLang_SDKLangErrMsg_LangManagerCalledAtDT 65092
-#define DKLang_SDKLangErrMsg_StreamVersionTooHigh 65093
-#define OleConst_SCannotActivate 65094
-#define OleConst_SNoWindowHandle 65095
-#define OleConst_SInvalidLicense 65096
-#define OleConst_SNotLicensed 65097
-#define OleConst_sNoRunningObject 65098
-#define QConsts_SInvalidCreateWidget 65099
-#define QConsts_STooManyMessageBoxButtons 65100
-#define QConsts_SmkcBkSp 65101
-#define QConsts_SmkcTab 65102
-#define QConsts_SmkcBackTab 65103
-#define TeeConst_TeeMsg_CheckPointerSize 65104
-#define TeeConst_TeeMsg_FunctionPeriod 65105
-#define TeeConst_TeeMsg_PieOther 65106
-#define TeeConst_TeeMsg_ValuesX 65107
-#define TeeConst_TeeMsg_ValuesY 65108
-#define TeeConst_TeeMsg_ValuesPie 65109
-#define TeeConst_TeeMsg_ValuesBar 65110
-#define TeeConst_TeeMsg_ValuesAngle 65111
-#define TeeConst_TeeMsg_ValuesGanttStart 65112
-#define TeeConst_TeeMsg_ValuesGanttEnd 65113
-#define TeeConst_TeeMsg_ValuesGanttNextTask 65114
-#define TeeConst_TeeMsg_ValuesArrowEndX 65115
-#define TeeConst_TeeMsg_ValuesArrowEndY 65116
-#define TntSystem_SBufferOverflow 65117
-#define TntSystem_SInvalidUTF7 65118
-#define DKLang_SDKLangErrMsg_DuplicatePropValueID 65119
-#define TeeConst_TeeMsg_GanttSample4 65120
-#define TeeConst_TeeMsg_GanttSample5 65121
-#define TeeConst_TeeMsg_GanttSample6 65122
-#define TeeConst_TeeMsg_GanttSample7 65123
-#define TeeConst_TeeMsg_GanttSample8 65124
-#define TeeConst_TeeMsg_GanttSample9 65125
-#define TeeConst_TeeMsg_GanttSample10 65126
-#define TeeConst_TeeMsg_DefaultFontSize 65127
-#define TeeConst_TeeMsg_FunctionAdd 65128
-#define TeeConst_TeeMsg_FunctionSubtract 65129
-#define TeeConst_TeeMsg_FunctionMultiply 65130
-#define TeeConst_TeeMsg_FunctionDivide 65131
-#define TeeConst_TeeMsg_FunctionHigh 65132
-#define TeeConst_TeeMsg_FunctionLow 65133
-#define TeeConst_TeeMsg_FunctionAverage 65134
-#define TeeConst_TeeMsg_DefaultFontName 65135
-#define TeeConst_TeeMsg_Rotation 65136
-#define TeeConst_TeeMsg_PieSample1 65137
-#define TeeConst_TeeMsg_PieSample2 65138
-#define TeeConst_TeeMsg_PieSample3 65139
-#define TeeConst_TeeMsg_PieSample4 65140
-#define TeeConst_TeeMsg_PieSample5 65141
-#define TeeConst_TeeMsg_PieSample6 65142
-#define TeeConst_TeeMsg_PieSample7 65143
-#define TeeConst_TeeMsg_PieSample8 65144
-#define TeeConst_TeeMsg_GalleryStandard 65145
-#define TeeConst_TeeMsg_GalleryFunctions 65146
-#define TeeConst_TeeMsg_GalleryArrow 65147
-#define TeeConst_TeeMsg_GalleryGantt 65148
-#define TeeConst_TeeMsg_GanttSample1 65149
-#define TeeConst_TeeMsg_GanttSample2 65150
-#define TeeConst_TeeMsg_GanttSample3 65151
-#define TeeConst_TeeMsg_3dPercent 65152
-#define TeeConst_TeeMsg_CircularSeries 65153
-#define TeeConst_TeeMsg_BarWidthPercent 65154
-#define TeeConst_TeeMsg_BarOffsetPercent 65155
-#define TeeConst_TeeMsg_DefaultPercentOf 65156
-#define TeeConst_TeeMsg_DefPercentFormat 65157
-#define TeeConst_TeeMsg_DefValueFormat 65158
-#define TeeConst_TeeMsg_AxisTitle 65159
-#define TeeConst_TeeMsg_AxisLabels 65160
-#define TeeConst_TeeMsg_GalleryLine 65161
-#define TeeConst_TeeMsg_GalleryPoint 65162
-#define TeeConst_TeeMsg_GalleryArea 65163
-#define TeeConst_TeeMsg_GalleryBar 65164
-#define TeeConst_TeeMsg_GalleryHorizBar 65165
-#define TeeConst_TeeMsg_GalleryPie 65166
-#define TeeConst_TeeMsg_GalleryFastLine 65167
-#define ComConst_SNoCloseActiveServer2 65168
-#define TeeConst_TeeMsg_LegendTopPos 65169
-#define TeeConst_TeeMsg_LegendFirstValue 65170
-#define TeeConst_TeeMsg_LegendColorWidth 65171
-#define TeeConst_TeeMsg_SeriesSetDataSource 65172
-#define TeeConst_TeeMsg_SeriesInvDataSource 65173
-#define TeeConst_TeeMsg_FillSample 65174
-#define TeeConst_TeeMsg_Angle 65175
-#define TeeConst_TeeMsg_AxisLogDateTime 65176
-#define TeeConst_TeeMsg_AxisLogNotPositive 65177
-#define TeeConst_TeeMsg_AxisLabelSep 65178
-#define TeeConst_TeeMsg_AxisIncrementNeg 65179
-#define TeeConst_TeeMsg_AxisMinMax 65180
-#define TeeConst_TeeMsg_AxisMaxMin 65181
-#define TeeConst_TeeMsg_AxisLogBase 65182
-#define TeeConst_TeeMsg_MaxPointsPerPage 65183
-#define ComStrs_sFailSetCalMinMaxRange 65184
-#define ComStrs_sFailsetCalSelRange 65185
-#define WinHelpViewer_hNoKeyword 65186
-#define ComConst_SCreateRegKeyError 65187
-#define ComConst_SOleError 65188
-#define ComConst_SObjectFactoryMissing 65189
-#define ComConst_STypeInfoMissing 65190
-#define ComConst_SBadTypeInfo 65191
-#define ComConst_SDispIntfMissing 65192
-#define ComConst_SNoMethod 65193
-#define ComConst_SVarNotObject 65194
-#define ComConst_STooManyParams 65195
-#define ComConst_SDCOMNotInstalled 65196
-#define ComConst_SDAXError 65197
-#define ComConst_SAutomationWarning 65198
-#define ComConst_SNoCloseActiveServer1 65199
-#define ComStrs_sTabFailSet 65200
-#define ComStrs_sTabFailSetObject 65201
-#define ComStrs_sTabMustBeMultiLine 65202
-#define ComStrs_sInvalidIndex 65203
-#define ComStrs_sInsertError 65204
-#define ComStrs_sInvalidOwner 65205
-#define ComStrs_sRichEditInsertError 65206
-#define ComStrs_sRichEditLoadFail 65207
-#define ComStrs_sRichEditSaveFail 65208
-#define ComStrs_sUDAssociated 65209
-#define ComStrs_sPageIndexError 65210
-#define ComStrs_sInvalidComCtl32 65211
-#define ComStrs_sDateTimeMax 65212
-#define ComStrs_sDateTimeMin 65213
-#define ComStrs_sFailSetCalDateTime 65214
-#define ComStrs_sFailSetCalMaxSelRange 65215
-#define ExtCtrls_clNameInactiveCaptionText 65216
-#define ExtCtrls_clNameInfoBk 65217
-#define ExtCtrls_clNameInfoText 65218
-#define ExtCtrls_clNameMenu 65219
-#define ExtCtrls_clNameMenuText 65220
-#define ExtCtrls_clNameNone 65221
-#define ExtCtrls_clNameScrollBar 65222
-#define ExtCtrls_clName3DDkShadow 65223
-#define ExtCtrls_clName3DLight 65224
-#define ExtCtrls_clNameWindow 65225
-#define ExtCtrls_clNameWindowFrame 65226
-#define ExtCtrls_clNameWindowText 65227
-#define ComStrs_sTabFailClear 65228
-#define ComStrs_sTabFailDelete 65229
-#define ComStrs_sTabFailRetrieve 65230
-#define ComStrs_sTabFailGetObject 65231
-#define ExtCtrls_clNameMedGray 65232
-#define ExtCtrls_clNameActiveBorder 65233
-#define ExtCtrls_clNameActiveCaption 65234
-#define ExtCtrls_clNameAppWorkSpace 65235
-#define ExtCtrls_clNameBackground 65236
-#define ExtCtrls_clNameBtnFace 65237
-#define ExtCtrls_clNameBtnHighlight 65238
-#define ExtCtrls_clNameBtnShadow 65239
-#define ExtCtrls_clNameBtnText 65240
-#define ExtCtrls_clNameCaptionText 65241
-#define ExtCtrls_clNameDefault 65242
-#define ExtCtrls_clNameGrayText 65243
-#define ExtCtrls_clNameHighlight 65244
-#define ExtCtrls_clNameHighlightText 65245
-#define ExtCtrls_clNameInactiveBorder 65246
-#define ExtCtrls_clNameInactiveCaption 65247
-#define ExtCtrls_clNameOlive 65248
-#define ExtCtrls_clNameNavy 65249
-#define ExtCtrls_clNamePurple 65250
-#define ExtCtrls_clNameTeal 65251
-#define ExtCtrls_clNameGray 65252
-#define ExtCtrls_clNameSilver 65253
-#define ExtCtrls_clNameRed 65254
-#define ExtCtrls_clNameLime 65255
-#define ExtCtrls_clNameYellow 65256
-#define ExtCtrls_clNameBlue 65257
-#define ExtCtrls_clNameFuchsia 65258
-#define ExtCtrls_clNameAqua 65259
-#define ExtCtrls_clNameWhite 65260
-#define ExtCtrls_clNameMoneyGreen 65261
-#define ExtCtrls_clNameSkyBlue 65262
-#define ExtCtrls_clNameCream 65263
-#define Consts_SDockedCtlNeedsName 65264
-#define Consts_SDockTreeRemoveError 65265
-#define Consts_SDockZoneNotFound 65266
-#define Consts_SDockZoneHasNoCtl 65267
-#define Consts_SMultiSelectRequired 65268
-#define Consts_SSeparator 65269
-#define Consts_SErrorSettingCount 65270
-#define Consts_SListBoxMustBeVirtual 65271
-#define Consts_SNoGetItemEventHandler 65272
-#define HelpIntfs_hNoTableOfContents 65273
-#define HelpIntfs_hNothingFound 65274
-#define HelpIntfs_hNoContext 65275
-#define HelpIntfs_hNoTopics 65276
-#define ExtCtrls_clNameBlack 65277
-#define ExtCtrls_clNameMaroon 65278
-#define ExtCtrls_clNameGreen 65279
-#define Consts_SmkcAlt 65280
-#define Consts_srNone 65281
-#define Consts_SOutOfRange 65282
-#define Consts_sAllFilter 65283
-#define Consts_SInsertLineError 65284
-#define Consts_SInvalidClipFmt 65285
-#define Consts_SIconToClipboard 65286
-#define Consts_SCannotOpenClipboard 65287
-#define Consts_SInvalidMemoSize 65288
-#define Consts_SInvalidPrinterOp 65289
-#define Consts_SNoDefaultPrinter 65290
-#define Consts_SDuplicateMenus 65291
-#define Consts_SPictureLabel 65292
-#define Consts_SPictureDesc 65293
-#define Consts_SPreviewLabel 65294
-#define Consts_SCannotOpenAVI 65295
-#define Consts_SmkcTab 65296
-#define Consts_SmkcEsc 65297
-#define Consts_SmkcEnter 65298
-#define Consts_SmkcSpace 65299
-#define Consts_SmkcPgUp 65300
-#define Consts_SmkcPgDn 65301
-#define Consts_SmkcEnd 65302
-#define Consts_SmkcHome 65303
-#define Consts_SmkcLeft 65304
-#define Consts_SmkcUp 65305
-#define Consts_SmkcRight 65306
-#define Consts_SmkcDown 65307
-#define Consts_SmkcIns 65308
-#define Consts_SmkcDel 65309
-#define Consts_SmkcShift 65310
-#define Consts_SmkcCtrl 65311
-#define Consts_SMsgDlgWarning 65312
-#define Consts_SMsgDlgError 65313
-#define Consts_SMsgDlgInformation 65314
-#define Consts_SMsgDlgConfirm 65315
-#define Consts_SMsgDlgYes 65316
-#define Consts_SMsgDlgNo 65317
-#define Consts_SMsgDlgOK 65318
-#define Consts_SMsgDlgCancel 65319
-#define Consts_SMsgDlgHelp 65320
-#define Consts_SMsgDlgAbort 65321
-#define Consts_SMsgDlgRetry 65322
-#define Consts_SMsgDlgIgnore 65323
-#define Consts_SMsgDlgAll 65324
-#define Consts_SMsgDlgNoToAll 65325
-#define Consts_SMsgDlgYesToAll 65326
-#define Consts_SmkcBkSp 65327
-#define Consts_SCancelButton 65328
-#define Consts_SYesButton 65329
-#define Consts_SNoButton 65330
-#define Consts_SHelpButton 65331
-#define Consts_SCloseButton 65332
-#define Consts_SIgnoreButton 65333
-#define Consts_SRetryButton 65334
-#define Consts_SAbortButton 65335
-#define Consts_SAllButton 65336
-#define Consts_SCannotDragForm 65337
-#define Consts_SVMetafiles 65338
-#define Consts_SVEnhMetafiles 65339
-#define Consts_SVIcons 65340
-#define Consts_SVBitmaps 65341
-#define Consts_SMaskErr 65342
-#define Consts_SMaskEditErr 65343
-#define Consts_SVisibleChanged 65344
-#define Consts_SCannotShowModal 65345
-#define Consts_SScrollBarRange 65346
-#define Consts_SPropertyOutOfRange 65347
-#define Consts_SMenuIndexError 65348
-#define Consts_SMenuReinserted 65349
-#define Consts_SMenuNotFound 65350
-#define Consts_SNoTimers 65351
-#define Consts_SNotPrinting 65352
-#define Consts_SPrinting 65353
-#define Consts_SInvalidPrinter 65354
-#define Consts_SDeviceOnPort 65355
-#define Consts_SGroupIndexTooLow 65356
-#define Consts_SNoMDIForm 65357
-#define Consts_SControlParentSetToSelf 65358
-#define Consts_SOKButton 65359
-#define Consts_SUnknownExtension 65360
-#define Consts_SUnknownClipboardFormat 65361
-#define Consts_SOutOfResources 65362
-#define Consts_SNoCanvasHandle 65363
-#define Consts_SInvalidImageSize 65364
-#define Consts_SInvalidImageList 65365
-#define Consts_SReplaceImage 65366
-#define Consts_SImageIndexError 65367
-#define Consts_SImageReadFail 65368
-#define Consts_SImageWriteFail 65369
-#define Consts_SWindowDCError 65370
-#define Consts_SWindowClass 65371
-#define Consts_SCannotFocus 65372
-#define Consts_SParentRequired 65373
-#define Consts_SParentGivenNotAParent 65374
-#define Consts_SMDIChildNotVisible 65375
-#define RTLConsts_STooManyDeleted 65376
-#define RTLConsts_SUnknownGroup 65377
-#define RTLConsts_SUnknownProperty 65378
-#define RTLConsts_SWriteError 65379
-#define RTLConsts_SThreadCreateError 65380
-#define RTLConsts_SThreadError 65381
-#define Consts_SInvalidTabPosition 65382
-#define Consts_SInvalidTabStyle 65383
-#define Consts_SInvalidBitmap 65384
-#define Consts_SInvalidIcon 65385
-#define Consts_SInvalidMetafile 65386
-#define Consts_SInvalidPixelFormat 65387
-#define Consts_SInvalidImage 65388
-#define Consts_SScanLine 65389
-#define Consts_SChangeIconSize 65390
-#define Consts_SOleGraphic 65391
-#define RTLConsts_SInvalidPropertyType 65392
-#define RTLConsts_SInvalidPropertyValue 65393
-#define RTLConsts_SInvalidRegType 65394
-#define RTLConsts_SInvalidStringGridOp 65395
-#define RTLConsts_SListCapacityError 65396
-#define RTLConsts_SListCountError 65397
-#define RTLConsts_SListIndexError 65398
-#define RTLConsts_SMemoryStreamError 65399
-#define RTLConsts_SPropertyException 65400
-#define RTLConsts_SReadError 65401
-#define RTLConsts_SReadOnlyProperty 65402
-#define RTLConsts_SRegGetDataFailed 65403
-#define RTLConsts_SRegSetDataFailed 65404
-#define RTLConsts_SResNotFound 65405
-#define RTLConsts_SSeekNotImplemented 65406
-#define RTLConsts_SSortedListError 65407
-#define RTLConsts_SDuplicateItem 65408
-#define RTLConsts_SDuplicateName 65409
-#define RTLConsts_SDuplicateString 65410
-#define RTLConsts_SFCreateErrorEx 65411
-#define RTLConsts_SFixedColTooBig 65412
-#define RTLConsts_SFixedRowTooBig 65413
-#define RTLConsts_SFOpenErrorEx 65414
-#define RTLConsts_SGridTooLarge 65415
-#define RTLConsts_SIndexOutOfRange 65416
-#define RTLConsts_SIniFileWriteError 65417
-#define RTLConsts_SInvalidImage 65418
-#define RTLConsts_SInvalidMask 65419
-#define RTLConsts_SInvalidName 65420
-#define RTLConsts_SInvalidProperty 65421
-#define RTLConsts_SInvalidPropertyElement 65422
-#define RTLConsts_SInvalidPropertyPath 65423
-#define SysConst_SShortDayNameSat 65424
-#define SysConst_SLongDayNameSun 65425
-#define SysConst_SLongDayNameMon 65426
-#define SysConst_SLongDayNameTue 65427
-#define SysConst_SLongDayNameWed 65428
-#define SysConst_SLongDayNameThu 65429
-#define SysConst_SLongDayNameFri 65430
-#define SysConst_SLongDayNameSat 65431
-#define SysConst_SCannotCreateDir 65432
-#define RTLConsts_SAncestorNotFound 65433
-#define RTLConsts_SAssignError 65434
-#define RTLConsts_SBitsIndexError 65435
-#define RTLConsts_SCantWriteResourceStreamError 65436
-#define RTLConsts_SCheckSynchronizeError 65437
-#define RTLConsts_SClassNotFound 65438
-#define RTLConsts_SDuplicateClass 65439
-#define SysConst_SLongMonthNameMar 65440
-#define SysConst_SLongMonthNameApr 65441
-#define SysConst_SLongMonthNameMay 65442
-#define SysConst_SLongMonthNameJun 65443
-#define SysConst_SLongMonthNameJul 65444
-#define SysConst_SLongMonthNameAug 65445
-#define SysConst_SLongMonthNameSep 65446
-#define SysConst_SLongMonthNameOct 65447
-#define SysConst_SLongMonthNameNov 65448
-#define SysConst_SLongMonthNameDec 65449
-#define SysConst_SShortDayNameSun 65450
-#define SysConst_SShortDayNameMon 65451
-#define SysConst_SShortDayNameTue 65452
-#define SysConst_SShortDayNameWed 65453
-#define SysConst_SShortDayNameThu 65454
-#define SysConst_SShortDayNameFri 65455
-#define SysConst_SOSError 65456
-#define SysConst_SUnkOSError 65457
-#define SysConst_SShortMonthNameJan 65458
-#define SysConst_SShortMonthNameFeb 65459
-#define SysConst_SShortMonthNameMar 65460
-#define SysConst_SShortMonthNameApr 65461
-#define SysConst_SShortMonthNameMay 65462
-#define SysConst_SShortMonthNameJun 65463
-#define SysConst_SShortMonthNameJul 65464
-#define SysConst_SShortMonthNameAug 65465
-#define SysConst_SShortMonthNameSep 65466
-#define SysConst_SShortMonthNameOct 65467
-#define SysConst_SShortMonthNameNov 65468
-#define SysConst_SShortMonthNameDec 65469
-#define SysConst_SLongMonthNameJan 65470
-#define SysConst_SLongMonthNameFeb 65471
-#define SysConst_SVarTypeNotUsableWithPrefix 65472
-#define SysConst_SVarTypeTooManyCustom 65473
-#define SysConst_SVarTypeCouldNotConvert 65474
-#define SysConst_SVarTypeConvertOverflow 65475
-#define SysConst_SVarOverflow 65476
-#define SysConst_SVarInvalid 65477
-#define SysConst_SVarBadType 65478
-#define SysConst_SVarNotImplemented 65479
-#define SysConst_SVarUnexpected 65480
-#define SysConst_SExternalException 65481
-#define SysConst_SAssertionFailed 65482
-#define SysConst_SIntfCastError 65483
-#define SysConst_SSafecallException 65484
-#define SysConst_SAssertError 65485
-#define SysConst_SAbstractError 65486
-#define SysConst_SModuleAccessViolation 65487
-#define SysConst_SExceptTitle 65488
-#define SysConst_SInvalidFormat 65489
-#define SysConst_SArgumentMissing 65490
-#define SysConst_SDispatchError 65491
-#define SysConst_SReadAccess 65492
-#define SysConst_SWriteAccess 65493
-#define SysConst_SFormatTooLong 65494
-#define SysConst_SVarArrayCreate 65495
-#define SysConst_SVarArrayBounds 65496
-#define SysConst_SVarArrayLocked 65497
-#define SysConst_SInvalidVarCast 65498
-#define SysConst_SInvalidVarOp 65499
-#define SysConst_SInvalidVarNullOp 65500
-#define SysConst_SInvalidVarOpWithHResultWithPrefix 65501
-#define SysConst_SVarTypeOutOfRangeWithPrefix 65502
-#define SysConst_SVarTypeAlreadyUsedWithPrefix 65503
-#define SysConst_SDivByZero 65504
-#define SysConst_SRangeError 65505
-#define SysConst_SIntOverflow 65506
-#define SysConst_SInvalidOp 65507
-#define SysConst_SZeroDivide 65508
-#define SysConst_SOverflow 65509
-#define SysConst_SUnderflow 65510
-#define SysConst_SInvalidPointer 65511
-#define SysConst_SInvalidCast 65512
-#define SysConst_SAccessViolationArg3 65513
-#define SysConst_SAccessViolationNoArg 65514
-#define SysConst_SStackOverflow 65515
-#define SysConst_SControlC 65516
-#define SysConst_SPrivilege 65517
-#define SysConst_SOperationAborted 65518
-#define SysConst_SException 65519
+#define IdResourceStrings_RSStackESHUTDOWN 64848
+#define IdResourceStrings_RSStackETOOMANYREFS 64849
+#define IdResourceStrings_RSStackETIMEDOUT 64850
+#define IdResourceStrings_RSStackECONNREFUSED 64851
+#define IdResourceStrings_RSStackELOOP 64852
+#define IdResourceStrings_RSStackENAMETOOLONG 64853
+#define IdResourceStrings_RSStackEHOSTDOWN 64854
+#define IdResourceStrings_RSStackEHOSTUNREACH 64855
+#define IdResourceStrings_RSStackENOTEMPTY 64856
+#define IdResourceStrings_RSStackHOST_NOT_FOUND 64857
+#define IdResourceStrings_RSStackENOPROTOOPT 64864
+#define IdResourceStrings_RSStackEPROTONOSUPPORT 64865
+#define IdResourceStrings_RSStackESOCKTNOSUPPORT 64866
+#define IdResourceStrings_RSStackEOPNOTSUPP 64867
+#define IdResourceStrings_RSStackEPFNOSUPPORT 64868
+#define IdResourceStrings_RSStackEAFNOSUPPORT 64869
+#define IdResourceStrings_RSStackEADDRINUSE 64870
+#define IdResourceStrings_RSStackEADDRNOTAVAIL 64871
+#define IdResourceStrings_RSStackENETDOWN 64872
+#define IdResourceStrings_RSStackENETUNREACH 64873
+#define IdResourceStrings_RSStackENETRESET 64874
+#define IdResourceStrings_RSStackECONNABORTED 64875
+#define IdResourceStrings_RSStackECONNRESET 64876
+#define IdResourceStrings_RSStackENOBUFS 64877
+#define IdResourceStrings_RSStackEISCONN 64878
+#define IdResourceStrings_RSStackENOTCONN 64879
+#define IdResourceStrings_RSWS2LoadError 64880
+#define IdResourceStrings_RSInvalidServiceName 64881
+#define IdResourceStrings_RSStackError 64882
+#define IdResourceStrings_RSStackEINTR 64883
+#define IdResourceStrings_RSStackEBADF 64884
+#define IdResourceStrings_RSStackEACCES 64885
+#define IdResourceStrings_RSStackEFAULT 64886
+#define IdResourceStrings_RSStackEINVAL 64887
+#define IdResourceStrings_RSStackEMFILE 64888
+#define IdResourceStrings_RSStackEWOULDBLOCK 64889
+#define IdResourceStrings_RSStackEINPROGRESS 64890
+#define IdResourceStrings_RSStackEALREADY 64891
+#define IdResourceStrings_RSStackENOTSOCK 64892
+#define IdResourceStrings_RSStackEDESTADDRREQ 64893
+#define IdResourceStrings_RSStackEMSGSIZE 64894
+#define IdResourceStrings_RSStackEPROTOTYPE 64895
+#define pnglang_EPNGInvalidFileHeaderText 64896
+#define pnglang_EPNGIHDRNotFirstText 64897
+#define pnglang_EPNGSizeExceedsText 64898
+#define pnglang_EPNGUnknownPalEntryText 64899
+#define pnglang_EPNGUnknownCriticalChunkText 64900
+#define pnglang_EPNGUnknownCompressionText 64901
+#define pnglang_EPNGUnknownInterlaceText 64902
+#define pnglang_EPNGCannotAssignChunkText 64903
+#define pnglang_EPNGUnexpectedEndText 64904
+#define pnglang_EPNGNoImageDataText 64905
+#define pnglang_EPNGCannotChangeSizeText 64906
+#define pnglang_EPNGOutMemoryText 64907
+#define pnglang_EPNGHeaderNotPresentText 64908
+#define IdResourceStrings_RSWinsockInitializationError 64909
+#define IdResourceStrings_RSSetSizeExceeded 64910
+#define IdResourceStrings_RSWS2CallError 64911
+#define QConsts_SUnableToWrite 64912
+#define QConsts_SUndo 64913
+#define QConsts_SRedo 64914
+#define QConsts_SLine 64915
+#define QConsts_SCut 64916
+#define QConsts_SCopy 64917
+#define QConsts_SPaste 64918
+#define QConsts_SClear 64919
+#define QConsts_SSelectAll 64920
+#define QConsts_SNoAppInLib 64921
+#define QConsts_SDuplicateApp 64922
+#define pnglang_EPngInvalidCRCText 64923
+#define pnglang_EPNGInvalidIHDRText 64924
+#define pnglang_EPNGMissingMultipleIDATText 64925
+#define pnglang_EPNGZLIBErrorText 64926
+#define pnglang_EPNGInvalidPaletteText 64927
+#define QConsts_SMsgDlgConfirm 64928
+#define QConsts_SUnnamed 64929
+#define QConsts_SName 64930
+#define QConsts_SSize 64931
+#define QConsts_SType 64932
+#define QConsts_SDate 64933
+#define QConsts_SAttributes 64934
+#define QConsts_SDuplicateMenus 64935
+#define QConsts_SImageIndexError 64936
+#define QConsts_SInvalidImageDimensions 64937
+#define QConsts_SInvalidImageDimension 64938
+#define QConsts_SInvalidMimeSourceStream 64939
+#define QConsts_SMimeNotSupportedForIcon 64940
+#define QConsts_SOpen 64941
+#define QConsts_SSave 64942
+#define QConsts_SUnknownImageFormat 64943
+#define QConsts_SMDIChildNotVisible 64944
+#define QConsts_SControlParentSetToSelf 64945
+#define QConsts_SOKButton 64946
+#define QConsts_SCancelButton 64947
+#define QConsts_SYesButton 64948
+#define QConsts_SNoButton 64949
+#define QConsts_SHelpButton 64950
+#define QConsts_SCloseButton 64951
+#define QConsts_SIgnoreButton 64952
+#define QConsts_SRetryButton 64953
+#define QConsts_SAbortButton 64954
+#define QConsts_SAllButton 64955
+#define QConsts_SCannotDragForm 64956
+#define QConsts_SMsgDlgWarning 64957
+#define QConsts_SMsgDlgError 64958
+#define QConsts_SMsgDlgInformation 64959
+#define QConsts_SInvalidPixelFormat 64960
+#define QConsts_SNoCanvasHandle 64961
+#define QConsts_SInvalidCanvasState 64962
+#define QConsts_SInvalidImageSize 64963
+#define QConsts_SInvalidColorDepth 64964
+#define QConsts_SCannotFocus 64965
+#define QConsts_SParentRequired 64966
+#define QConsts_SVisibleChanged 64967
+#define QConsts_SMenuIndexError 64968
+#define QConsts_SMenuReinserted 64969
+#define QConsts_SNoMenuRecursion 64970
+#define QConsts_SMenuNotFound 64971
+#define QConsts_SMenuSetFormError 64972
+#define QConsts_SGroupIndexTooLow 64973
+#define QConsts_SNoMDIForm 64974
+#define QConsts_SNotAnMDIForm 64975
+#define QConsts_SmkcReturn 64976
+#define QConsts_SmkcEnter 64977
+#define QConsts_SmkcSpace 64978
+#define QConsts_SmkcPgUp 64979
+#define QConsts_SmkcPgDn 64980
+#define QConsts_SmkcEnd 64981
+#define QConsts_SmkcHome 64982
+#define QConsts_SmkcLeft 64983
+#define QConsts_SmkcUp 64984
+#define QConsts_SmkcRight 64985
+#define QConsts_SmkcDown 64986
+#define QConsts_SmkcIns 64987
+#define QConsts_SmkcDel 64988
+#define QConsts_SmkcShift 64989
+#define QConsts_SmkcCtrl 64990
+#define QConsts_SmkcAlt 64991
+#define VDBConsts_SNextRecord 64992
+#define VDBConsts_SLastRecord 64993
+#define VDBConsts_SInsertRecord 64994
+#define VDBConsts_SDeleteRecord 64995
+#define VDBConsts_SEditRecord 64996
+#define VDBConsts_SPostEdit 64997
+#define VDBConsts_SCancelEdit 64998
+#define VDBConsts_SRefreshRecord 64999
+#define VDBConsts_SNotReplicatable 65000
+#define VDBConsts_SRemoteLogin 65001
+#define QConsts_SInvalidCreateWidget 65002
+#define QConsts_STooManyMessageBoxButtons 65003
+#define QConsts_SmkcBkSp 65004
+#define QConsts_SmkcTab 65005
+#define QConsts_SmkcBackTab 65006
+#define QConsts_SmkcEsc 65007
+#define DBConsts_SDataSetReadOnly 65008
+#define DBConsts_SNestedDataSetClass 65009
+#define DBConsts_STextFalse 65010
+#define DBConsts_STextTrue 65011
+#define DBConsts_SProviderSQLNotSupported 65012
+#define DBConsts_SProviderExecuteNotSupported 65013
+#define DBConsts_SDataSetUnidirectional 65014
+#define DBConsts_SUnassignedVar 65015
+#define DBConsts_SRecordNotFound 65016
+#define DBConsts_SBcdOverflow 65017
+#define DBConsts_SInvalidBcdValue 65018
+#define DBConsts_SInvalidFormatType 65019
+#define DBConsts_SCouldNotParseTimeStamp 65020
+#define DBConsts_SInvalidSqlTimeStamp 65021
+#define VDBConsts_SFirstRecord 65022
+#define VDBConsts_SPriorRecord 65023
+#define DBConsts_SBcdFieldRangeError 65024
+#define DBConsts_SInvalidIntegerValue 65025
+#define DBConsts_SInvalidBoolValue 65026
+#define DBConsts_SInvalidFloatValue 65027
+#define DBConsts_SFieldTypeMismatch 65028
+#define DBConsts_SFieldSizeMismatch 65029
+#define DBConsts_SInvalidVarByteArray 65030
+#define DBConsts_SFieldOutOfRange 65031
+#define DBConsts_SFieldRequired 65032
+#define DBConsts_SDataSetMissing 65033
+#define DBConsts_SCircularDataLink 65034
+#define DBConsts_SLookupInfoError 65035
+#define DBConsts_SDataSourceChange 65036
+#define DBConsts_SDataSetOpen 65037
+#define DBConsts_SNotEditing 65038
+#define DBConsts_SDataSetClosed 65039
+#define ipGIF_sGIFImageFile 65040
+#define ipGIF_sProgressLoading 65041
+#define ipGIF_sProgressSaving 65042
+#define ipGIF_sProgressConverting 65043
+#define ipGIF_sProgressRendering 65044
+#define ipGIF_sProgressCopying 65045
+#define ipGIF_sProgressOptimizing 65046
+#define DBConsts_SInvalidFieldSize 65047
+#define DBConsts_SInvalidFieldKind 65048
+#define DBConsts_SUnknownFieldType 65049
+#define DBConsts_SFieldNameMissing 65050
+#define DBConsts_SDuplicateFieldName 65051
+#define DBConsts_SFieldNotFound 65052
+#define DBConsts_SFieldAccessError 65053
+#define DBConsts_SFieldValueError 65054
+#define DBConsts_SFieldRangeError 65055
+#define ipGIF_sUnsupportedClass 65056
+#define ipGIF_sInvalidData 65057
+#define ipGIF_sBadHeight 65058
+#define ipGIF_sBadWidth 65059
+#define ipGIF_sFailedPaste 65060
+#define ipGIF_sScreenSizeExceeded 65061
+#define ipGIF_sNoColorTable 65062
+#define ipGIF_sBadPixelCoordinates 65063
+#define ipGIF_sInvalidPixelFormat 65064
+#define ipGIF_sBadDimension 65065
+#define ipGIF_sNoDIB 65066
+#define ipGIF_sInvalidStream 65067
+#define ipGIF_sInvalidColor 65068
+#define ipGIF_sEmptyColorMap 65069
+#define ipGIF_sEmptyImage 65070
+#define ipGIF_sInvalidReduction 65071
+#define ipGIF_sOutOfData 65072
+#define ipGIF_sTooManyColors 65073
+#define ipGIF_sBadColorIndex 65074
+#define ipGIF_sBadVersion 65075
+#define ipGIF_sBadSignature 65076
+#define ipGIF_sScreenBadColorSize 65077
+#define ipGIF_sImageBadColorSize 65078
+#define ipGIF_sUnknownExtension 65079
+#define ipGIF_sBadExtensionLabel 65080
+#define ipGIF_sOutOfMemDIB 65081
+#define ipGIF_sDecodeTooFewBits 65082
+#define ipGIF_sDecodeCircular 65083
+#define ipGIF_sBadTrailer 65084
+#define ipGIF_sBadExtensionInstance 65085
+#define ipGIF_sBadBlockSize 65086
+#define ipGIF_sBadBlock 65087
+#define TntSystem_SInvalidUTF7 65088
+#define DKLang_SDKLangErrMsg_DuplicatePropValueID 65089
+#define DKLang_SDKLangErrMsg_ErrorLoadingTran 65090
+#define DKLang_SDKLangErrMsg_InvalidConstName 65091
+#define DKLang_SDKLangErrMsg_DuplicateConstName 65092
+#define DKLang_SDKLangErrMsg_ConstantNotFound 65093
+#define DKLang_SDKLangErrMsg_LangManagerCalledAtDT 65094
+#define DKLang_SDKLangErrMsg_StreamVersionTooHigh 65095
+#define OleConst_SCannotActivate 65096
+#define OleConst_SNoWindowHandle 65097
+#define OleConst_SInvalidLicense 65098
+#define OleConst_SNotLicensed 65099
+#define OleConst_sNoRunningObject 65100
+#define JConsts_sChangeJPGSize 65101
+#define JConsts_sJPEGError 65102
+#define JConsts_sJPEGImageFile 65103
+#define TeeConst_TeeMsg_FunctionAverage 65104
+#define TeeConst_TeeMsg_DefaultFontName 65105
+#define TeeConst_TeeMsg_CheckPointerSize 65106
+#define TeeConst_TeeMsg_FunctionPeriod 65107
+#define TeeConst_TeeMsg_PieOther 65108
+#define TeeConst_TeeMsg_ValuesX 65109
+#define TeeConst_TeeMsg_ValuesY 65110
+#define TeeConst_TeeMsg_ValuesPie 65111
+#define TeeConst_TeeMsg_ValuesBar 65112
+#define TeeConst_TeeMsg_ValuesAngle 65113
+#define TeeConst_TeeMsg_ValuesGanttStart 65114
+#define TeeConst_TeeMsg_ValuesGanttEnd 65115
+#define TeeConst_TeeMsg_ValuesGanttNextTask 65116
+#define TeeConst_TeeMsg_ValuesArrowEndX 65117
+#define TeeConst_TeeMsg_ValuesArrowEndY 65118
+#define TntSystem_SBufferOverflow 65119
+#define TeeConst_TeeMsg_GanttSample2 65120
+#define TeeConst_TeeMsg_GanttSample3 65121
+#define TeeConst_TeeMsg_GanttSample4 65122
+#define TeeConst_TeeMsg_GanttSample5 65123
+#define TeeConst_TeeMsg_GanttSample6 65124
+#define TeeConst_TeeMsg_GanttSample7 65125
+#define TeeConst_TeeMsg_GanttSample8 65126
+#define TeeConst_TeeMsg_GanttSample9 65127
+#define TeeConst_TeeMsg_GanttSample10 65128
+#define TeeConst_TeeMsg_DefaultFontSize 65129
+#define TeeConst_TeeMsg_FunctionAdd 65130
+#define TeeConst_TeeMsg_FunctionSubtract 65131
+#define TeeConst_TeeMsg_FunctionMultiply 65132
+#define TeeConst_TeeMsg_FunctionDivide 65133
+#define TeeConst_TeeMsg_FunctionHigh 65134
+#define TeeConst_TeeMsg_FunctionLow 65135
+#define TeeConst_TeeMsg_GalleryPie 65136
+#define TeeConst_TeeMsg_GalleryFastLine 65137
+#define TeeConst_TeeMsg_Rotation 65138
+#define TeeConst_TeeMsg_PieSample1 65139
+#define TeeConst_TeeMsg_PieSample2 65140
+#define TeeConst_TeeMsg_PieSample3 65141
+#define TeeConst_TeeMsg_PieSample4 65142
+#define TeeConst_TeeMsg_PieSample5 65143
+#define TeeConst_TeeMsg_PieSample6 65144
+#define TeeConst_TeeMsg_PieSample7 65145
+#define TeeConst_TeeMsg_PieSample8 65146
+#define TeeConst_TeeMsg_GalleryStandard 65147
+#define TeeConst_TeeMsg_GalleryFunctions 65148
+#define TeeConst_TeeMsg_GalleryArrow 65149
+#define TeeConst_TeeMsg_GalleryGantt 65150
+#define TeeConst_TeeMsg_GanttSample1 65151
+#define TeeConst_TeeMsg_AxisLogBase 65152
+#define TeeConst_TeeMsg_MaxPointsPerPage 65153
+#define TeeConst_TeeMsg_3dPercent 65154
+#define TeeConst_TeeMsg_CircularSeries 65155
+#define TeeConst_TeeMsg_BarWidthPercent 65156
+#define TeeConst_TeeMsg_BarOffsetPercent 65157
+#define TeeConst_TeeMsg_DefaultPercentOf 65158
+#define TeeConst_TeeMsg_DefPercentFormat 65159
+#define TeeConst_TeeMsg_DefValueFormat 65160
+#define TeeConst_TeeMsg_AxisTitle 65161
+#define TeeConst_TeeMsg_AxisLabels 65162
+#define TeeConst_TeeMsg_GalleryLine 65163
+#define TeeConst_TeeMsg_GalleryPoint 65164
+#define TeeConst_TeeMsg_GalleryArea 65165
+#define TeeConst_TeeMsg_GalleryBar 65166
+#define TeeConst_TeeMsg_GalleryHorizBar 65167
+#define ComConst_SAutomationWarning 65168
+#define ComConst_SNoCloseActiveServer1 65169
+#define ComConst_SNoCloseActiveServer2 65170
+#define TeeConst_TeeMsg_LegendTopPos 65171
+#define TeeConst_TeeMsg_LegendFirstValue 65172
+#define TeeConst_TeeMsg_LegendColorWidth 65173
+#define TeeConst_TeeMsg_SeriesSetDataSource 65174
+#define TeeConst_TeeMsg_SeriesInvDataSource 65175
+#define TeeConst_TeeMsg_FillSample 65176
+#define TeeConst_TeeMsg_Angle 65177
+#define TeeConst_TeeMsg_AxisLogDateTime 65178
+#define TeeConst_TeeMsg_AxisLogNotPositive 65179
+#define TeeConst_TeeMsg_AxisLabelSep 65180
+#define TeeConst_TeeMsg_AxisIncrementNeg 65181
+#define TeeConst_TeeMsg_AxisMinMax 65182
+#define TeeConst_TeeMsg_AxisMaxMin 65183
+#define ComStrs_sFailSetCalDateTime 65184
+#define ComStrs_sFailSetCalMaxSelRange 65185
+#define ComStrs_sFailSetCalMinMaxRange 65186
+#define ComStrs_sFailsetCalSelRange 65187
+#define WinHelpViewer_hNoKeyword 65188
+#define ComConst_SCreateRegKeyError 65189
+#define ComConst_SOleError 65190
+#define ComConst_SObjectFactoryMissing 65191
+#define ComConst_STypeInfoMissing 65192
+#define ComConst_SBadTypeInfo 65193
+#define ComConst_SDispIntfMissing 65194
+#define ComConst_SNoMethod 65195
+#define ComConst_SVarNotObject 65196
+#define ComConst_STooManyParams 65197
+#define ComConst_SDCOMNotInstalled 65198
+#define ComConst_SDAXError 65199
+#define ComStrs_sTabFailRetrieve 65200
+#define ComStrs_sTabFailGetObject 65201
+#define ComStrs_sTabFailSet 65202
+#define ComStrs_sTabFailSetObject 65203
+#define ComStrs_sTabMustBeMultiLine 65204
+#define ComStrs_sInvalidIndex 65205
+#define ComStrs_sInsertError 65206
+#define ComStrs_sInvalidOwner 65207
+#define ComStrs_sRichEditInsertError 65208
+#define ComStrs_sRichEditLoadFail 65209
+#define ComStrs_sRichEditSaveFail 65210
+#define ComStrs_sUDAssociated 65211
+#define ComStrs_sPageIndexError 65212
+#define ComStrs_sInvalidComCtl32 65213
+#define ComStrs_sDateTimeMax 65214
+#define ComStrs_sDateTimeMin 65215
+#define ExtCtrls_clNameInactiveBorder 65216
+#define ExtCtrls_clNameInactiveCaption 65217
+#define ExtCtrls_clNameInactiveCaptionText 65218
+#define ExtCtrls_clNameInfoBk 65219
+#define ExtCtrls_clNameInfoText 65220
+#define ExtCtrls_clNameMenu 65221
+#define ExtCtrls_clNameMenuText 65222
+#define ExtCtrls_clNameNone 65223
+#define ExtCtrls_clNameScrollBar 65224
+#define ExtCtrls_clName3DDkShadow 65225
+#define ExtCtrls_clName3DLight 65226
+#define ExtCtrls_clNameWindow 65227
+#define ExtCtrls_clNameWindowFrame 65228
+#define ExtCtrls_clNameWindowText 65229
+#define ComStrs_sTabFailClear 65230
+#define ComStrs_sTabFailDelete 65231
+#define ExtCtrls_clNameSkyBlue 65232
+#define ExtCtrls_clNameCream 65233
+#define ExtCtrls_clNameMedGray 65234
+#define ExtCtrls_clNameActiveBorder 65235
+#define ExtCtrls_clNameActiveCaption 65236
+#define ExtCtrls_clNameAppWorkSpace 65237
+#define ExtCtrls_clNameBackground 65238
+#define ExtCtrls_clNameBtnFace 65239
+#define ExtCtrls_clNameBtnHighlight 65240
+#define ExtCtrls_clNameBtnShadow 65241
+#define ExtCtrls_clNameBtnText 65242
+#define ExtCtrls_clNameCaptionText 65243
+#define ExtCtrls_clNameDefault 65244
+#define ExtCtrls_clNameGrayText 65245
+#define ExtCtrls_clNameHighlight 65246
+#define ExtCtrls_clNameHighlightText 65247
+#define ExtCtrls_clNameMaroon 65248
+#define ExtCtrls_clNameGreen 65249
+#define ExtCtrls_clNameOlive 65250
+#define ExtCtrls_clNameNavy 65251
+#define ExtCtrls_clNamePurple 65252
+#define ExtCtrls_clNameTeal 65253
+#define ExtCtrls_clNameGray 65254
+#define ExtCtrls_clNameSilver 65255
+#define ExtCtrls_clNameRed 65256
+#define ExtCtrls_clNameLime 65257
+#define ExtCtrls_clNameYellow 65258
+#define ExtCtrls_clNameBlue 65259
+#define ExtCtrls_clNameFuchsia 65260
+#define ExtCtrls_clNameAqua 65261
+#define ExtCtrls_clNameWhite 65262
+#define ExtCtrls_clNameMoneyGreen 65263
+#define Consts_SPreviewLabel 65264
+#define Consts_SCannotOpenAVI 65265
+#define Consts_SDockedCtlNeedsName 65266
+#define Consts_SDockTreeRemoveError 65267
+#define Consts_SDockZoneNotFound 65268
+#define Consts_SDockZoneHasNoCtl 65269
+#define Consts_SMultiSelectRequired 65270
+#define Consts_SSeparator 65271
+#define Consts_SErrorSettingCount 65272
+#define Consts_SListBoxMustBeVirtual 65273
+#define Consts_SNoGetItemEventHandler 65274
+#define HelpIntfs_hNoTableOfContents 65275
+#define HelpIntfs_hNothingFound 65276
+#define HelpIntfs_hNoContext 65277
+#define HelpIntfs_hNoTopics 65278
+#define ExtCtrls_clNameBlack 65279
+#define Consts_SmkcShift 65280
+#define Consts_SmkcCtrl 65281
+#define Consts_SmkcAlt 65282
+#define Consts_srNone 65283
+#define Consts_SOutOfRange 65284
+#define Consts_sAllFilter 65285
+#define Consts_SInsertLineError 65286
+#define Consts_SInvalidClipFmt 65287
+#define Consts_SIconToClipboard 65288
+#define Consts_SCannotOpenClipboard 65289
+#define Consts_SInvalidMemoSize 65290
+#define Consts_SInvalidPrinterOp 65291
+#define Consts_SNoDefaultPrinter 65292
+#define Consts_SDuplicateMenus 65293
+#define Consts_SPictureLabel 65294
+#define Consts_SPictureDesc 65295
+#define Consts_SMsgDlgYesToAll 65296
+#define Consts_SmkcBkSp 65297
+#define Consts_SmkcTab 65298
+#define Consts_SmkcEsc 65299
+#define Consts_SmkcEnter 65300
+#define Consts_SmkcSpace 65301
+#define Consts_SmkcPgUp 65302
+#define Consts_SmkcPgDn 65303
+#define Consts_SmkcEnd 65304
+#define Consts_SmkcHome 65305
+#define Consts_SmkcLeft 65306
+#define Consts_SmkcUp 65307
+#define Consts_SmkcRight 65308
+#define Consts_SmkcDown 65309
+#define Consts_SmkcIns 65310
+#define Consts_SmkcDel 65311
+#define Consts_SMaskErr 65312
+#define Consts_SMaskEditErr 65313
+#define Consts_SMsgDlgWarning 65314
+#define Consts_SMsgDlgError 65315
+#define Consts_SMsgDlgInformation 65316
+#define Consts_SMsgDlgConfirm 65317
+#define Consts_SMsgDlgYes 65318
+#define Consts_SMsgDlgNo 65319
+#define Consts_SMsgDlgOK 65320
+#define Consts_SMsgDlgCancel 65321
+#define Consts_SMsgDlgHelp 65322
+#define Consts_SMsgDlgAbort 65323
+#define Consts_SMsgDlgRetry 65324
+#define Consts_SMsgDlgIgnore 65325
+#define Consts_SMsgDlgAll 65326
+#define Consts_SMsgDlgNoToAll 65327
+#define Consts_SControlParentSetToSelf 65328
+#define Consts_SOKButton 65329
+#define Consts_SCancelButton 65330
+#define Consts_SYesButton 65331
+#define Consts_SNoButton 65332
+#define Consts_SHelpButton 65333
+#define Consts_SCloseButton 65334
+#define Consts_SIgnoreButton 65335
+#define Consts_SRetryButton 65336
+#define Consts_SAbortButton 65337
+#define Consts_SAllButton 65338
+#define Consts_SCannotDragForm 65339
+#define Consts_SVMetafiles 65340
+#define Consts_SVEnhMetafiles 65341
+#define Consts_SVIcons 65342
+#define Consts_SVBitmaps 65343
+#define Consts_SParentGivenNotAParent 65344
+#define Consts_SMDIChildNotVisible 65345
+#define Consts_SVisibleChanged 65346
+#define Consts_SCannotShowModal 65347
+#define Consts_SScrollBarRange 65348
+#define Consts_SPropertyOutOfRange 65349
+#define Consts_SMenuIndexError 65350
+#define Consts_SMenuReinserted 65351
+#define Consts_SMenuNotFound 65352
+#define Consts_SNoTimers 65353
+#define Consts_SNotPrinting 65354
+#define Consts_SPrinting 65355
+#define Consts_SInvalidPrinter 65356
+#define Consts_SDeviceOnPort 65357
+#define Consts_SGroupIndexTooLow 65358
+#define Consts_SNoMDIForm 65359
+#define Consts_SChangeIconSize 65360
+#define Consts_SOleGraphic 65361
+#define Consts_SUnknownExtension 65362
+#define Consts_SUnknownClipboardFormat 65363
+#define Consts_SOutOfResources 65364
+#define Consts_SNoCanvasHandle 65365
+#define Consts_SInvalidImageSize 65366
+#define Consts_SInvalidImageList 65367
+#define Consts_SReplaceImage 65368
+#define Consts_SImageIndexError 65369
+#define Consts_SImageReadFail 65370
+#define Consts_SImageWriteFail 65371
+#define Consts_SWindowDCError 65372
+#define Consts_SWindowClass 65373
+#define Consts_SCannotFocus 65374
+#define Consts_SParentRequired 65375
+#define RTLConsts_SSeekNotImplemented 65376
+#define RTLConsts_SSortedListError 65377
+#define RTLConsts_STooManyDeleted 65378
+#define RTLConsts_SUnknownGroup 65379
+#define RTLConsts_SUnknownProperty 65380
+#define RTLConsts_SWriteError 65381
+#define RTLConsts_SThreadCreateError 65382
+#define RTLConsts_SThreadError 65383
+#define Consts_SInvalidTabPosition 65384
+#define Consts_SInvalidTabStyle 65385
+#define Consts_SInvalidBitmap 65386
+#define Consts_SInvalidIcon 65387
+#define Consts_SInvalidMetafile 65388
+#define Consts_SInvalidPixelFormat 65389
+#define Consts_SInvalidImage 65390
+#define Consts_SScanLine 65391
+#define RTLConsts_SInvalidPropertyElement 65392
+#define RTLConsts_SInvalidPropertyPath 65393
+#define RTLConsts_SInvalidPropertyType 65394
+#define RTLConsts_SInvalidPropertyValue 65395
+#define RTLConsts_SInvalidRegType 65396
+#define RTLConsts_SInvalidStringGridOp 65397
+#define RTLConsts_SListCapacityError 65398
+#define RTLConsts_SListCountError 65399
+#define RTLConsts_SListIndexError 65400
+#define RTLConsts_SMemoryStreamError 65401
+#define RTLConsts_SPropertyException 65402
+#define RTLConsts_SReadError 65403
+#define RTLConsts_SReadOnlyProperty 65404
+#define RTLConsts_SRegGetDataFailed 65405
+#define RTLConsts_SRegSetDataFailed 65406
+#define RTLConsts_SResNotFound 65407
+#define RTLConsts_SClassNotFound 65408
+#define RTLConsts_SDuplicateClass 65409
+#define RTLConsts_SDuplicateItem 65410
+#define RTLConsts_SDuplicateName 65411
+#define RTLConsts_SDuplicateString 65412
+#define RTLConsts_SFCreateErrorEx 65413
+#define RTLConsts_SFixedColTooBig 65414
+#define RTLConsts_SFixedRowTooBig 65415
+#define RTLConsts_SFOpenErrorEx 65416
+#define RTLConsts_SGridTooLarge 65417
+#define RTLConsts_SIndexOutOfRange 65418
+#define RTLConsts_SIniFileWriteError 65419
+#define RTLConsts_SInvalidImage 65420
+#define RTLConsts_SInvalidMask 65421
+#define RTLConsts_SInvalidName 65422
+#define RTLConsts_SInvalidProperty 65423
+#define SysConst_SShortDayNameThu 65424
+#define SysConst_SShortDayNameFri 65425
+#define SysConst_SShortDayNameSat 65426
+#define SysConst_SLongDayNameSun 65427
+#define SysConst_SLongDayNameMon 65428
+#define SysConst_SLongDayNameTue 65429
+#define SysConst_SLongDayNameWed 65430
+#define SysConst_SLongDayNameThu 65431
+#define SysConst_SLongDayNameFri 65432
+#define SysConst_SLongDayNameSat 65433
+#define SysConst_SCannotCreateDir 65434
+#define RTLConsts_SAncestorNotFound 65435
+#define RTLConsts_SAssignError 65436
+#define RTLConsts_SBitsIndexError 65437
+#define RTLConsts_SCantWriteResourceStreamError 65438
+#define RTLConsts_SCheckSynchronizeError 65439
+#define SysConst_SLongMonthNameJan 65440
+#define SysConst_SLongMonthNameFeb 65441
+#define SysConst_SLongMonthNameMar 65442
+#define SysConst_SLongMonthNameApr 65443
+#define SysConst_SLongMonthNameMay 65444
+#define SysConst_SLongMonthNameJun 65445
+#define SysConst_SLongMonthNameJul 65446
+#define SysConst_SLongMonthNameAug 65447
+#define SysConst_SLongMonthNameSep 65448
+#define SysConst_SLongMonthNameOct 65449
+#define SysConst_SLongMonthNameNov 65450
+#define SysConst_SLongMonthNameDec 65451
+#define SysConst_SShortDayNameSun 65452
+#define SysConst_SShortDayNameMon 65453
+#define SysConst_SShortDayNameTue 65454
+#define SysConst_SShortDayNameWed 65455
+#define SysConst_SModuleAccessViolation 65456
+#define SysConst_SOSError 65457
+#define SysConst_SUnkOSError 65458
+#define SysConst_SNL 65459
+#define SysConst_SShortMonthNameJan 65460
+#define SysConst_SShortMonthNameFeb 65461
+#define SysConst_SShortMonthNameMar 65462
+#define SysConst_SShortMonthNameApr 65463
+#define SysConst_SShortMonthNameMay 65464
+#define SysConst_SShortMonthNameJun 65465
+#define SysConst_SShortMonthNameJul 65466
+#define SysConst_SShortMonthNameAug 65467
+#define SysConst_SShortMonthNameSep 65468
+#define SysConst_SShortMonthNameOct 65469
+#define SysConst_SShortMonthNameNov 65470
+#define SysConst_SShortMonthNameDec 65471
+#define SysConst_SVarTypeAlreadyUsedWithPrefix 65472
+#define SysConst_SVarTypeNotUsableWithPrefix 65473
+#define SysConst_SVarTypeTooManyCustom 65474
+#define SysConst_SVarTypeCouldNotConvert 65475
+#define SysConst_SVarTypeConvertOverflow 65476
+#define SysConst_SVarOverflow 65477
+#define SysConst_SVarInvalid 65478
+#define SysConst_SVarBadType 65479
+#define SysConst_SVarNotImplemented 65480
+#define SysConst_SVarUnexpected 65481
+#define SysConst_SExternalException 65482
+#define SysConst_SAssertionFailed 65483
+#define SysConst_SIntfCastError 65484
+#define SysConst_SSafecallException 65485
+#define SysConst_SAssertError 65486
+#define SysConst_SAbstractError 65487
+#define SysConst_SException 65488
+#define SysConst_SExceptTitle 65489
+#define SysConst_SInvalidFormat 65490
+#define SysConst_SArgumentMissing 65491
+#define SysConst_SDispatchError 65492
+#define SysConst_SReadAccess 65493
+#define SysConst_SWriteAccess 65494
+#define SysConst_SFormatTooLong 65495
+#define SysConst_SVarArrayCreate 65496
+#define SysConst_SVarArrayBounds 65497
+#define SysConst_SVarArrayLocked 65498
+#define SysConst_SInvalidVarCast 65499
+#define SysConst_SInvalidVarOp 65500
+#define SysConst_SInvalidVarNullOp 65501
+#define SysConst_SInvalidVarOpWithHResultWithPrefix 65502
+#define SysConst_SVarTypeOutOfRangeWithPrefix 65503
+#define SysConst_SInvalidInput 65504
+#define SysConst_SDivByZero 65505
+#define SysConst_SRangeError 65506
+#define SysConst_SIntOverflow 65507
+#define SysConst_SInvalidOp 65508
+#define SysConst_SZeroDivide 65509
+#define SysConst_SOverflow 65510
+#define SysConst_SUnderflow 65511
+#define SysConst_SInvalidPointer 65512
+#define SysConst_SInvalidCast 65513
+#define SysConst_SAccessViolationArg3 65514
+#define SysConst_SAccessViolationNoArg 65515
+#define SysConst_SStackOverflow 65516
+#define SysConst_SControlC 65517
+#define SysConst_SPrivilege 65518
+#define SysConst_SOperationAborted 65519
 #define SysConst_SInvalidInteger 65520
 #define SysConst_SInvalidFloat 65521
@@ -603 +680 @@
 #define SysConst_SInvalidTime 65523
 #define SysConst_SInvalidDateTime 65524
-#define SysConst_STimeEncodeError 65525
-#define SysConst_SDateEncodeError 65526
-#define SysConst_SOutOfMemory 65527
-#define SysConst_SInOutError 65528
-#define SysConst_SFileNotFound 65529
-#define SysConst_SInvalidFilename 65530
-#define SysConst_STooManyOpenFiles 65531
-#define SysConst_SAccessDenied 65532
-#define SysConst_SEndOfFile 65533
-#define SysConst_SDiskFull 65534
-#define SysConst_SInvalidInput 65535
+#define SysConst_SInvalidTimeStamp 65525
+#define SysConst_STimeEncodeError 65526
+#define SysConst_SDateEncodeError 65527
+#define SysConst_SOutOfMemory 65528
+#define SysConst_SInOutError 65529
+#define SysConst_SFileNotFound 65530
+#define SysConst_SInvalidFilename 65531
+#define SysConst_STooManyOpenFiles 65532
+#define SysConst_SAccessDenied 65533
+#define SysConst_SEndOfFile 65534
+#define SysConst_SDiskFull 65535
 STRINGTABLE
 BEGIN
@@ -626 +703 @@
         IdResourceStrings_RSStackENOTEMPTY,     "Directory not empty"
         IdResourceStrings_RSStackHOST_NOT_FOUND,        "Host not found."
-        JConsts_sChangeJPGSize, "Cannot change the size of a JPEG image"
-        JConsts_sJPEGError,     "JPEG error #%d"
-        JConsts_sJPEGImageFile, "JPEG Image File"
         IdResourceStrings_RSStackENOPROTOOPT,   "Bad protocol option."
         IdResourceStrings_RSStackEPROTONOSUPPORT,       "Protocol not supported."
@@ -677 +751 @@
         IdResourceStrings_RSSetSizeExceeded,    "Set Size Exceeded."
         IdResourceStrings_RSWS2CallError,       "Error on call Winsock2 library function %s"
-        VDBConsts_SFirstRecord, "First record"
-        VDBConsts_SPriorRecord, "Prior record"
-        VDBConsts_SNextRecord,  "Next record"
-        VDBConsts_SLastRecord,  "Last record"
-        VDBConsts_SInsertRecord,        "Insert record"
-        VDBConsts_SDeleteRecord,        "Delete record"
-        VDBConsts_SEditRecord,  "Edit record"
-        VDBConsts_SPostEdit,    "Post edit"
-        VDBConsts_SCancelEdit,  "Cancel edit"
-        VDBConsts_SRefreshRecord,       "Refresh data"
-        VDBConsts_SRemoteLogin, "Remote Login"
-        pnglang_EPngInvalidCRCText,     "This \"Portable Network Graphics\" image is not valid because it contains invalid pieces of data (crc error)"
-        pnglang_EPNGInvalidIHDRText,    "The \"Portable Network Graphics\" image could not be loaded because one of its main piece of data (ihdr) might be corrupted"
-        pnglang_EPNGMissingMultipleIDATText,    "This \"Portable Network Graphics\" image is invalid because it has missing image parts."
-        pnglang_EPNGZLIBErrorText,      "Could not decompress the image because it contains invalid compressed data.\r\n Description: "
-        pnglang_EPNGInvalidPaletteText, "The \"Portable Network Graphics\" image contains an invalid palette."
-        QConsts_SUnknownImageFormat,    "Image format not recognized"
         QConsts_SUnableToWrite, "Unable to write bitmap"
         QConsts_SUndo,  "Undo"
@@ -705 +762 @@
         QConsts_SNoAppInLib,    "Fatal error: Cannot create application object in a shared object or library."
         QConsts_SDuplicateApp,  "Fatal error: Cannot create more than one TApplication instance"
-        DBConsts_SBcdOverflow,  "BCD overflow"
-        DBConsts_SInvalidBcdValue,      "%s is not a valid BCD value"
-        DBConsts_SCouldNotParseTimeStamp,       "Could not parse SQL TimeStamp string"
-        DBConsts_SInvalidSqlTimeStamp,  "Invalid SQL date/time values"
-        QConsts_SMsgDlgInformation,     "Information"
+        pnglang_EPngInvalidCRCText,     "This \"Portable Network Graphics\" image is not valid because it contains invalid pieces of data (crc error)"
+        pnglang_EPNGInvalidIHDRText,    "The \"Portable Network Graphics\" image could not be loaded because one of its main piece of data (ihdr) might be corrupted"
+        pnglang_EPNGMissingMultipleIDATText,    "This \"Portable Network Graphics\" image is invalid because it has missing image parts."
+        pnglang_EPNGZLIBErrorText,      "Could not decompress the image because it contains invalid compressed data.\r\n Description: "
+        pnglang_EPNGInvalidPaletteText, "The \"Portable Network Graphics\" image contains an invalid palette."
         QConsts_SMsgDlgConfirm, "Confirm"
         QConsts_SUnnamed,       "Unnamed"
@@ -725 +782 @@
         QConsts_SOpen,  "Open"
         QConsts_SSave,  "Save"
-        QConsts_SNotAnMDIForm,  "Invalid MDIParent for class %s"
+        QConsts_SUnknownImageFormat,    "Image format not recognized"
         QConsts_SMDIChildNotVisible,    "Cannot hide an MDI Child Form"
         QConsts_SControlParentSetToSelf,        "A control cannot have itself as its parent"
@@ -741 +798 @@
         QConsts_SMsgDlgWarning, "Warning"
         QConsts_SMsgDlgError,   "Error"
-        QConsts_SmkcAlt,        "Alt+"
+        QConsts_SMsgDlgInformation,     "Information"
         QConsts_SInvalidPixelFormat,    "Invalid pixel format"
         QConsts_SNoCanvasHandle,        "Canvas does not allow drawing"
@@ -757 +814 @@
         QConsts_SGroupIndexTooLow,      "GroupIndex cannot be less than a previous menu item's GroupIndex"
         QConsts_SNoMDIForm,     "Cannot create form. No MDI forms are currently active"
-        QConsts_SmkcEsc,        "Esc"
+        QConsts_SNotAnMDIForm,  "Invalid MDIParent for class %s"
         QConsts_SmkcReturn,     "Return"
         QConsts_SmkcEnter,      "Enter"
@@ -773 +830 @@
         QConsts_SmkcShift,      "Shift+"
         QConsts_SmkcCtrl,       "Ctrl+"
+        QConsts_SmkcAlt,        "Alt+"
+        VDBConsts_SNextRecord,  "Next record"
+        VDBConsts_SLastRecord,  "Last record"
+        VDBConsts_SInsertRecord,        "Insert record"
+        VDBConsts_SDeleteRecord,        "Delete record"
+        VDBConsts_SEditRecord,  "Edit record"
+        VDBConsts_SPostEdit,    "Post edit"
+        VDBConsts_SCancelEdit,  "Cancel edit"
+        VDBConsts_SRefreshRecord,       "Refresh data"
+        VDBConsts_SNotReplicatable,     "Control cannot be used in a DBCtrlGrid"
+        VDBConsts_SRemoteLogin, "Remote Login"
+        QConsts_SInvalidCreateWidget,   "Class %s could not create QT widget"
+        QConsts_STooManyMessageBoxButtons,      "Too many buttons specified for message box"
+        QConsts_SmkcBkSp,       "Backspace"
+        QConsts_SmkcTab,        "Tab"
+        QConsts_SmkcBackTab,    "BackTab"
+        QConsts_SmkcEsc,        "Esc"
+        DBConsts_SDataSetReadOnly,      "Cannot modify a read-only dataset"
+        DBConsts_SNestedDataSetClass,   "Nested dataset must inherit from %s"
+        DBConsts_STextFalse,    "False"
+        DBConsts_STextTrue,     "True"
+        DBConsts_SProviderSQLNotSupported,      "SQL not supported: %s"
+        DBConsts_SProviderExecuteNotSupported,  "Execute not supported: %s"
+        DBConsts_SDataSetUnidirectional,        "Operation not allowed on a unidirectional dataset"
+        DBConsts_SUnassignedVar,        "Unassigned variant value"
+        DBConsts_SRecordNotFound,       "Record not found"
+        DBConsts_SBcdOverflow,  "BCD overflow"
+        DBConsts_SInvalidBcdValue,      "%s is not a valid BCD value"
+        DBConsts_SInvalidFormatType,    "Invalid format type for BCD"
+        DBConsts_SCouldNotParseTimeStamp,       "Could not parse SQL TimeStamp string"
+        DBConsts_SInvalidSqlTimeStamp,  "Invalid SQL date/time values"
+        VDBConsts_SFirstRecord, "First record"
+        VDBConsts_SPriorRecord, "Prior record"
+        DBConsts_SBcdFieldRangeError,   "%s is not a valid value for field '%s'. The allowed range is %s to %s"
+        DBConsts_SInvalidIntegerValue,  "'%s' is not a valid integer value for field '%s'"
+        DBConsts_SInvalidBoolValue,     "'%s' is not a valid boolean value for field '%s'"
+        DBConsts_SInvalidFloatValue,    "'%s' is not a valid floating point value for field '%s'"
+        DBConsts_SFieldTypeMismatch,    "Type mismatch for field '%s', expecting: %s actual: %s"
+        DBConsts_SFieldSizeMismatch,    "Size mismatch for field '%s', expecting: %d actual: %d"
+        DBConsts_SInvalidVarByteArray,  "Invalid variant type or size for field '%s'"
+        DBConsts_SFieldOutOfRange,      "Value of field '%s' is out of range"
+        DBConsts_SFieldRequired,        "Field '%s' must have a value"
+        DBConsts_SDataSetMissing,       "Field '%s' has no dataset"
+        DBConsts_SCircularDataLink,     "Circular datalinks are not allowed"
+        DBConsts_SLookupInfoError,      "Lookup information for field '%s' is incomplete"
+        DBConsts_SDataSourceChange,     "DataSource cannot be changed"
+        DBConsts_SDataSetOpen,  "Cannot perform this operation on an open dataset"
+        DBConsts_SNotEditing,   "Dataset not in edit or insert mode"
+        DBConsts_SDataSetClosed,        "Cannot perform this operation on a closed dataset"
+        ipGIF_sGIFImageFile,    "GIF Image"
+        ipGIF_sProgressLoading, "Loading..."
+        ipGIF_sProgressSaving,  "Saving..."
+        ipGIF_sProgressConverting,      "Converting..."
+        ipGIF_sProgressRendering,       "Rendering..."
+        ipGIF_sProgressCopying, "Copying..."
+        ipGIF_sProgressOptimizing,      "Optimizing..."
+        DBConsts_SInvalidFieldSize,     "Invalid field size"
+        DBConsts_SInvalidFieldKind,     "Invalid FieldKind"
+        DBConsts_SUnknownFieldType,     "Field '%s' is of an unknown type"
+        DBConsts_SFieldNameMissing,     "Field name missing"
+        DBConsts_SDuplicateFieldName,   "Duplicate field name '%s'"
+        DBConsts_SFieldNotFound,        "Field '%s' not found"
+        DBConsts_SFieldAccessError,     "Cannot access field '%s' as type %s"
+        DBConsts_SFieldValueError,      "Invalid value for field '%s'"
+        DBConsts_SFieldRangeError,      "%g is not a valid value for field '%s'. The allowed range is %g to %g"
+        ipGIF_sUnsupportedClass,        "Object type not supported for operation"
+        ipGIF_sInvalidData,     "Invalid GIF data"
+        ipGIF_sBadHeight,       "Image height too small for contained frames"
+        ipGIF_sBadWidth,        "Image width too small for contained frames"
+        ipGIF_sFailedPaste,     "Failed to store GIF on clipboard"
+        ipGIF_sScreenSizeExceeded,      "Image exceeds Logical Screen size"
+        ipGIF_sNoColorTable,    "No global or local color table defined"
+        ipGIF_sBadPixelCoordinates,     "Invalid pixel coordinates"
+        ipGIF_sInvalidPixelFormat,      "Unsupported PixelFormat"
+        ipGIF_sBadDimension,    "Invalid image dimensions"
+        ipGIF_sNoDIB,   "Image has no DIB"
+        ipGIF_sInvalidStream,   "Invalid stream operation"
+        ipGIF_sInvalidColor,    "Color not in color table"
+        ipGIF_sEmptyColorMap,   "Color table is empty"
+        ipGIF_sEmptyImage,      "Image is empty"
+        ipGIF_sInvalidReduction,        "Invalid reduction method"
+        ipGIF_sOutOfData,       "Premature end of data"
+        ipGIF_sTooManyColors,   "Color table overflow"
+        ipGIF_sBadColorIndex,   "Invalid color index"
+        ipGIF_sBadVersion,      "Unsupported GIF version"
+        ipGIF_sBadSignature,    "Invalid GIF signature"
+        ipGIF_sScreenBadColorSize,      "Invalid number of colors specified in Screen Descriptor"
+        ipGIF_sImageBadColorSize,       "Invalid number of colors specified in Image Descriptor"
+        ipGIF_sUnknownExtension,        "Unknown extension type"
+        ipGIF_sBadExtensionLabel,       "Invalid extension introducer"
+        ipGIF_sOutOfMemDIB,     "Failed to allocate memory for GIF DIB"
+        ipGIF_sDecodeTooFewBits,        "Decoder bit buffer under-run"
+        ipGIF_sDecodeCircular,  "Circular decoder table entry"
+        ipGIF_sBadTrailer,      "Invalid Image trailer"
+        ipGIF_sBadExtensionInstance,    "Internal error: Extension Instance does not match Extension Label"
+        ipGIF_sBadBlockSize,    "Unsupported Application Extension block size"
+        ipGIF_sBadBlock,        "Unknown GIF block type"
+        TntSystem_SInvalidUTF7, "Invalid UTF7"
+        DKLang_SDKLangErrMsg_DuplicatePropValueID,      "Duplicate property value translation ID (%d)"
         DKLang_SDKLangErrMsg_ErrorLoadingTran,  "Loading translations failed.\r\nLine %d: %s"
         DKLang_SDKLangErrMsg_InvalidConstName,  "Invalid constant name (\"%s\")"
@@ -784 +940 @@
         OleConst_SNotLicensed,  "License information for %s not found. You cannot use this control in design mode"
         OleConst_sNoRunningObject,      "Unable to retrieve a pointer to a running object registered with OLE for %s/%s"
-        QConsts_SInvalidCreateWidget,   "Class %s could not create QT widget"
-        QConsts_STooManyMessageBoxButtons,      "Too many buttons specified for message box"
-        QConsts_SmkcBkSp,       "Backspace"
-        QConsts_SmkcTab,        "Tab"
-        QConsts_SmkcBackTab,    "BackTab"
+        JConsts_sChangeJPGSize, "Cannot change the size of a JPEG image"
+        JConsts_sJPEGError,     "JPEG error #%d"
+        JConsts_sJPEGImageFile, "JPEG Image File"
+        TeeConst_TeeMsg_FunctionAverage,        "Average"
+        TeeConst_TeeMsg_DefaultFontName,        "Arial"
         TeeConst_TeeMsg_CheckPointerSize,       "Pointer size must be greater than zero"
         TeeConst_TeeMsg_FunctionPeriod, "Function Period should be >= 0"
@@ -803 +959 @@
         TeeConst_TeeMsg_ValuesArrowEndY,        "EndY"
         TntSystem_SBufferOverflow,      "Buffer overflow"
-        TntSystem_SInvalidUTF7, "Invalid UTF7"
-        DKLang_SDKLangErrMsg_DuplicatePropValueID,      "Duplicate property value translation ID (%d)"
+        TeeConst_TeeMsg_GanttSample2,   "Prototyping"
+        TeeConst_TeeMsg_GanttSample3,   "Development"
         TeeConst_TeeMsg_GanttSample4,   "Sales"
         TeeConst_TeeMsg_GanttSample5,   "Marketing"
@@ -819 +975 @@
         TeeConst_TeeMsg_FunctionHigh,   "High"
         TeeConst_TeeMsg_FunctionLow,    "Low"
-        TeeConst_TeeMsg_FunctionAverage,        "Average"
-        TeeConst_TeeMsg_DefaultFontName,        "Arial"
+        TeeConst_TeeMsg_GalleryPie,     "Pie"
+        TeeConst_TeeMsg_GalleryFastLine,        "Fast Line"
         TeeConst_TeeMsg_Rotation,       "Rotation"
         TeeConst_TeeMsg_PieSample1,     "Cars"
@@ -835 +991 @@
         TeeConst_TeeMsg_GalleryGantt,   "Gantt"
         TeeConst_TeeMsg_GanttSample1,   "Design"
-        TeeConst_TeeMsg_GanttSample2,   "Prototyping"
-        TeeConst_TeeMsg_GanttSample3,   "Development"
+        TeeConst_TeeMsg_AxisLogBase,    "Axis Logarithmic Base should be >= 2"
+        TeeConst_TeeMsg_MaxPointsPerPage,       "MaxPointsPerPage must be >= 0"
         TeeConst_TeeMsg_3dPercent,      "3D effect percent must be between %d and %d"
         TeeConst_TeeMsg_CircularSeries, "Circular Series dependences are not allowed"
@@ -851 +1007 @@
         TeeConst_TeeMsg_GalleryBar,     "Bar"
         TeeConst_TeeMsg_GalleryHorizBar,        "Horiz. Bar"
-        TeeConst_TeeMsg_GalleryPie,     "Pie"
-        TeeConst_TeeMsg_GalleryFastLine,        "Fast Line"
+        ComConst_SAutomationWarning,    "COM Server Warning"
+        ComConst_SNoCloseActiveServer1, "There are still active COM objects in this application.  One or more clients may have references to these objects, so manually closing "
         ComConst_SNoCloseActiveServer2, "this application may cause those client application(s) to fail.\r\n\r\nAre you sure you want to close this application?"
         TeeConst_TeeMsg_LegendTopPos,   "Top Legend Position must be between 0 and 100 %"
@@ -867 +1023 @@
         TeeConst_TeeMsg_AxisMinMax,     "Axis Minimum Value must be <= Maximum"
         TeeConst_TeeMsg_AxisMaxMin,     "Axis Maximum Value must be >= Minimum"
-        TeeConst_TeeMsg_AxisLogBase,    "Axis Logarithmic Base should be >= 2"
-        TeeConst_TeeMsg_MaxPointsPerPage,       "MaxPointsPerPage must be >= 0"
+        ComStrs_sFailSetCalDateTime,    "Failed to set calendar date or time"
+        ComStrs_sFailSetCalMaxSelRange, "Failed to set maximum selection range"
         ComStrs_sFailSetCalMinMaxRange, "Failed to set calendar min/max range"
         ComStrs_sFailsetCalSelRange,    "Failed to set calendar selected range"
@@ -883 +1039 @@
         ComConst_SDCOMNotInstalled,     "DCOM not installed"
         ComConst_SDAXError,     "DAX Error"
-        ComConst_SAutomationWarning,    "COM Server Warning"
-        ComConst_SNoCloseActiveServer1, "There are still active COM objects in this application.  One or more clients may have references to these objects, so manually closing "
+        ComStrs_sTabFailRetrieve,       "Failed to retrieve tab at index %d"
+        ComStrs_sTabFailGetObject,      "Failed to get object at index %d"
         ComStrs_sTabFailSet,    "Failed to set tab \"%s\" at index %d"
         ComStrs_sTabFailSetObject,      "Failed to set object at index %d"
@@ -899 +1055 @@
         ComStrs_sDateTimeMax,   "Date exceeds maximum of %s"
         ComStrs_sDateTimeMin,   "Date is less than minimum of %s"
-        ComStrs_sFailSetCalDateTime,    "Failed to set calendar date or time"
-        ComStrs_sFailSetCalMaxSelRange, "Failed to set maximum selection range"
+        ExtCtrls_clNameInactiveBorder,  "Inactive Border"
+        ExtCtrls_clNameInactiveCaption, "Inactive Caption"
         ExtCtrls_clNameInactiveCaptionText,     "Inactive Caption Text"
         ExtCtrls_clNameInfoBk,  "Info Background"
@@ -915 +1071 @@
         ComStrs_sTabFailClear,  "Failed to clear tab control"
         ComStrs_sTabFailDelete, "Failed to delete tab at index %d"
-        ComStrs_sTabFailRetrieve,       "Failed to retrieve tab at index %d"
-        ComStrs_sTabFailGetObject,      "Failed to get object at index %d"
+        ExtCtrls_clNameSkyBlue, "Sky Blue"
+        ExtCtrls_clNameCream,   "Cream"
         ExtCtrls_clNameMedGray, "Medium Gray"
         ExtCtrls_clNameActiveBorder,    "Active Border"
@@ -931 +1087 @@
         ExtCtrls_clNameHighlight,       "Highlight Background"
         ExtCtrls_clNameHighlightText,   "Highlight Text"
-        ExtCtrls_clNameInactiveBorder,  "Inactive Border"
-        ExtCtrls_clNameInactiveCaption, "Inactive Caption"
+        ExtCtrls_clNameMaroon,  "Maroon"
+        ExtCtrls_clNameGreen,   "Green"
         ExtCtrls_clNameOlive,   "Olive"
         ExtCtrls_clNameNavy,    "Navy"
@@ -947 +1103 @@
         ExtCtrls_clNameWhite,   "White"
         ExtCtrls_clNameMoneyGreen,      "Money Green"
-        ExtCtrls_clNameSkyBlue, "Sky Blue"
-        ExtCtrls_clNameCream,   "Cream"
+        Consts_SPreviewLabel,   "Preview"
+        Consts_SCannotOpenAVI,  "Cannot open AVI"
         Consts_SDockedCtlNeedsName,     "Docked control must have a name"
         Consts_SDockTreeRemoveError,    "Error removing control from dock tree"
@@ -963 +1119 @@
         HelpIntfs_hNoTopics,    "No topic-based help system installed"
         ExtCtrls_clNameBlack,   "Black"
-        ExtCtrls_clNameMaroon,  "Maroon"
-        ExtCtrls_clNameGreen,   "Green"
+        Consts_SmkcShift,       "Shift+"
+        Consts_SmkcCtrl,        "Ctrl+"
         Consts_SmkcAlt, "Alt+"
         Consts_srNone,  "(None)"
@@ -979 +1135 @@
         Consts_SPictureLabel,   "Picture:"
         Consts_SPictureDesc,    " (%dx%d)"
-        Consts_SPreviewLabel,   "Preview"
-        Consts_SCannotOpenAVI,  "Cannot open AVI"
+        Consts_SMsgDlgYesToAll, "Yes to &All"
+        Consts_SmkcBkSp,        "BkSp"
         Consts_SmkcTab, "Tab"
         Consts_SmkcEsc, "Esc"
@@ -995 +1151 @@
         Consts_SmkcIns, "Ins"
         Consts_SmkcDel, "Del"
-        Consts_SmkcShift,       "Shift+"
-        Consts_SmkcCtrl,        "Ctrl+"
+        Consts_SMaskErr,        "Invalid input value"
+        Consts_SMaskEditErr,    "Invalid input value.  Use escape key to abandon changes"
         Consts_SMsgDlgWarning,  "Warning"
         Consts_SMsgDlgError,    "Error"
@@ -1011 +1167 @@
         Consts_SMsgDlgAll,      "&All"
         Consts_SMsgDlgNoToAll,  "N&o to All"
-        Consts_SMsgDlgYesToAll, "Yes to &All"
-        Consts_SmkcBkSp,        "BkSp"
+        Consts_SControlParentSetToSelf, "A control cannot have itself as its parent"
+        Consts_SOKButton,       "OK"
         Consts_SCancelButton,   "Cancel"
         Consts_SYesButton,      "&Yes"
@@ -1027 +1183 @@
         Consts_SVIcons, "Icons"
         Consts_SVBitmaps,       "Bitmaps"
-        Consts_SMaskErr,        "Invalid input value"
-        Consts_SMaskEditErr,    "Invalid input value.  Use escape key to abandon changes"
+        Consts_SParentGivenNotAParent,  "Parent given is not a parent of '%s'"
+        Consts_SMDIChildNotVisible,     "Cannot hide an MDI Child Form"
         Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide"
         Consts_SCannotShowModal,        "Cannot make a visible window modal"
@@ -1043 +1199 @@
         Consts_SGroupIndexTooLow,       "GroupIndex cannot be less than a previous menu item's GroupIndex"
         Consts_SNoMDIForm,      "Cannot create form. No MDI forms are currently active"
-        Consts_SControlParentSetToSelf, "A control cannot have itself as its parent"
-        Consts_SOKButton,       "OK"
+        Consts_SChangeIconSize, "Cannot change the size of an icon"
+        Consts_SOleGraphic,     "Invalid operation on TOleGraphic"
         Consts_SUnknownExtension,       "Unknown picture file extension (.%s)"
         Consts_SUnknownClipboardFormat, "Unsupported clipboard format"
@@ -1059 +1215 @@
         Consts_SCannotFocus,    "Cannot focus a disabled or invisible window"
         Consts_SParentRequired, "Control '%s' has no parent window"
-        Consts_SParentGivenNotAParent,  "Parent given is not a parent of '%s'"
-        Consts_SMDIChildNotVisible,     "Cannot hide an MDI Child Form"
+        RTLConsts_SSeekNotImplemented,  "%s.Seek not implemented"
+        RTLConsts_SSortedListError,     "Operation not allowed on sorted list"
         RTLConsts_STooManyDeleted,      "Too many rows or columns deleted"
         RTLConsts_SUnknownGroup,        "%s not in a class registration group"
@@ -1075 +1231 @@
         Consts_SInvalidImage,   "Invalid image"
         Consts_SScanLine,       "Scan line index out of range"
-        Consts_SChangeIconSize, "Cannot change the size of an icon"
-        Consts_SOleGraphic,     "Invalid operation on TOleGraphic"
+        RTLConsts_SInvalidPropertyElement,      "Invalid property element: %s"
+        RTLConsts_SInvalidPropertyPath, "Invalid property path"
         RTLConsts_SInvalidPropertyType, "Invalid property type: %s"
         RTLConsts_SInvalidPropertyValue,        "Invalid property value"
@@ -1091 +1247 @@
         RTLConsts_SRegSetDataFailed,    "Failed to set data for '%s'"
         RTLConsts_SResNotFound, "Resource %s not found"
-        RTLConsts_SSeekNotImplemented,  "%s.Seek not implemented"
-        RTLConsts_SSortedListError,     "Operation not allowed on sorted list"
+        RTLConsts_SClassNotFound,       "Class %s not found"
+        RTLConsts_SDuplicateClass,      "A class named %s already exists"
         RTLConsts_SDuplicateItem,       "List does not allow duplicates ($0%x)"
         RTLConsts_SDuplicateName,       "A component named %s already exists"
@@ -1107 +1263 @@
         RTLConsts_SInvalidName, "''%s'' is not a valid component name"
         RTLConsts_SInvalidProperty,     "Invalid property value"
-        RTLConsts_SInvalidPropertyElement,      "Invalid property element: %s"
-        RTLConsts_SInvalidPropertyPath, "Invalid property path"
+        SysConst_SShortDayNameThu,      "Thu"
+        SysConst_SShortDayNameFri,      "Fri"
         SysConst_SShortDayNameSat,      "Sat"
         SysConst_SLongDayNameSun,       "Sunday"
@@ -1123 +1279 @@
         RTLConsts_SCantWriteResourceStreamError,        "Can't write to a read-only resource stream"
         RTLConsts_SCheckSynchronizeError,       "CheckSynchronize called from thread $%x, which is NOT the main thread"
-        RTLConsts_SClassNotFound,       "Class %s not found"
-        RTLConsts_SDuplicateClass,      "A class named %s already exists"
+        SysConst_SLongMonthNameJan,     "January"
+        SysConst_SLongMonthNameFeb,     "February"
         SysConst_SLongMonthNameMar,     "March"
         SysConst_SLongMonthNameApr,     "April"
@@ -1139 +1295 @@
         SysConst_SShortDayNameTue,      "Tue"
         SysConst_SShortDayNameWed,      "Wed"
-        SysConst_SShortDayNameThu,      "Thu"
-        SysConst_SShortDayNameFri,      "Fri"
+        SysConst_SModuleAccessViolation,        "Access violation at address %p in module '%s'. %s of address %p"
         SysConst_SOSError,      "System Error.  Code: %d.\r\n%s"
         SysConst_SUnkOSError,   "A call to an OS function failed"
+        SysConst_SNL,   "Application is not licensed to use this feature"
         SysConst_SShortMonthNameJan,    "Jan"
         SysConst_SShortMonthNameFeb,    "Feb"
@@ -1155 +1311 @@
         SysConst_SShortMonthNameNov,    "Nov"
         SysConst_SShortMonthNameDec,    "Dec"
-        SysConst_SLongMonthNameJan,     "January"
-        SysConst_SLongMonthNameFeb,     "February"
+        SysConst_SVarTypeAlreadyUsedWithPrefix, "Custom variant type (%s%.4x) already used by %s"
         SysConst_SVarTypeNotUsableWithPrefix,   "Custom variant type (%s%.4x) is not usable"
         SysConst_SVarTypeTooManyCustom, "Too many custom variant types have been registered"
@@ -1172 +1327 @@
         SysConst_SAssertError,  "%s (%s, line %d)"
         SysConst_SAbstractError,        "Abstract Error"
-        SysConst_SModuleAccessViolation,        "Access violation at address %p in module '%s'. %s of address %p"
+        SysConst_SException,    "Exception %s in module %s at %p.\r\n%s%s\r\n"
         SysConst_SExceptTitle,  "Application Error"
         SysConst_SInvalidFormat,        "Format '%s' invalid or incompatible with argument"
@@ -1188 +1343 @@
         SysConst_SInvalidVarOpWithHResultWithPrefix,    "Invalid variant operation (%s%.8x)\n%s"
         SysConst_SVarTypeOutOfRangeWithPrefix,  "Custom variant type (%s%.4x) is out of range"
-        SysConst_SVarTypeAlreadyUsedWithPrefix, "Custom variant type (%s%.4x) already used by %s"
+        SysConst_SInvalidInput, "Invalid numeric input"
         SysConst_SDivByZero,    "Division by zero"
         SysConst_SRangeError,   "Range check error"
@@ -1204 +1359 @@
         SysConst_SPrivilege,    "Privileged instruction"
         SysConst_SOperationAborted,     "Operation aborted"
-        SysConst_SException,    "Exception %s in module %s at %p.\r\n%s%s\r\n"
         SysConst_SInvalidInteger,       "'%s' is not a valid integer value"
         SysConst_SInvalidFloat, "'%s' is not a valid floating point value"
@@ -1210 +1364 @@
         SysConst_SInvalidTime,  "'%s' is not a valid time"
         SysConst_SInvalidDateTime,      "'%s' is not a valid date and time"
+        SysConst_SInvalidTimeStamp,     "'%d.%d' is not a valid timestamp"
         SysConst_STimeEncodeError,      "Invalid argument to time encode"
         SysConst_SDateEncodeError,      "Invalid argument to date encode"
@@ -1220 +1375 @@
         SysConst_SEndOfFile,    "Read beyond end of file"
         SysConst_SDiskFull,     "Disk full"
-        SysConst_SInvalidInput, "Invalid numeric input"
 END
 

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dsk

@@ -1 +1 @@
 [Closed Files]
-File_0=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Lib\ORNet.pas',0,1,348,1,359,0,0
-File_1=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\UploadImages.pas',0,1,219,36,232,0,0
-File_2=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\uConst.pas',0,1,47,10,52,0,0
-File_3=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\fPtDemo.pas',0,1,1,52,82,0,0
-File_4=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Lib\ORCtrls.pas',0,1,2170,1,2178,0,0
-File_5=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\fPtSel.pas',0,1,500,34,503,1,0
-File_6=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\CPRSChart.dpr',0,1,285,1,351,0,0
-File_7=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\TMG_Extra\fWebTab.pas',0,1,1,1,88,0,0
-File_8=SourceModule,'c:\program files\borland\delphi7\source\rtl\Sys\system.pas',0,1,12601,1,12613,0,0
-File_9=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\Orders\uODBase.pas',0,1,37,1,52,0,0
+File_0=SourceModule,'P:\vista\GUI-config\SkinFormU.pas',0,1,66,1,76,0,0
+File_1=SourceModule,'P:\vista\GUI-config\MainU.pas',0,1,1958,20,1985,0,0
+File_2=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Lib\ORNet.pas',0,1,348,1,359,0,0
+File_3=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\UploadImages.pas',0,1,219,36,232,0,0
+File_4=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\uConst.pas',0,1,47,10,52,0,0
+File_5=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\fPtDemo.pas',0,1,1,52,82,0,0
+File_6=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Lib\ORCtrls.pas',0,1,2170,1,2178,0,0
+File_7=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\fPtSel.pas',0,1,500,34,503,1,0
+File_8=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\CPRSChart.dpr',0,1,285,1,351,0,0
+File_9=SourceModule,'P:\Vista\CPRS-1.0.26.69\CPRS-Chart\TMG_Extra\fWebTab.pas',0,1,1,1,88,0,0
 
 [Modules]
-Module0=P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas
-Module1=P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas
-Module2=c:\program files\borland\delphi7\source\rtl\common\classes.pas
-Module3=c:\program files\borland\delphi7\source\vcl\Controls.pas
-Module4=c:\program files\borland\delphi7\source\vcl\ComCtrls.pas
-Module5=P:\Vista\killthis.txt
+Module0=P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas
+Module1=P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas
+Module2=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas
+Module3=c:\program files\borland\delphi7\source\rtl\common\classes.pas
+Module4=c:\program files\borland\delphi7\source\vcl\Controls.pas
+Module5=c:\program files\borland\delphi7\source\vcl\ComCtrls.pas
 Module6=c:\program files\borland\delphi7\source\vcl\StdCtrls.pas
-Module7=P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
+Module7=P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
 Count=8
 EditWindowCount=1
 TypeLibWindowCount=1
 
+[P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas]
+ModuleType=SourceModule
+FormState=1
+FormOnTop=0
+
 [P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas]
 ModuleType=SourceModule
@@ -29 +34 @@
 FormOnTop=0
 
-[P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas]
-ModuleType=SourceModule
-FormState=1
+[P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas]
+ModuleType=SourceModule
+FormState=0
 FormOnTop=0
 
@@ -49 +54 @@
 FormOnTop=0
 
-[P:\Vista\killthis.txt]
-ModuleType=SourceModule
-FormState=0
-FormOnTop=0
-
 [c:\program files\borland\delphi7\source\vcl\StdCtrls.pas]
 ModuleType=SourceModule
@@ -59 +59 @@
 FormOnTop=0
 
-[P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr]
+[P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr]
 ModuleType=SourceModule
 FormState=0
@@ -68 +68 @@
 FormOnTop=0
 
-[P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb]
+[P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb]
 FormState=0
 FormOnTop=0
@@ -74 +74 @@
 [EditWindow0]
 ViewCount=8
-CurrentView=1
+CurrentView=3
 View0=0
 View1=1
@@ -102 +102 @@
 BottomPanelSize=0
 BottomPanelClients=MessageView@EditWindow0
-BottomPanelData=00000400010000000B0000004D6573736167655669657701030000000000000255000000000000000100000000000000000000000001000000000103000000000000FFFFFFFF
+BottomPanelData=00000400010000000B0000004D65737361676556696577010300000000000002550000000000000001000000000000000000000000010000000001030000000000000100000000010300000B0000004D65737361676556696577FFFFFFFF
 
 [View0]
-Module=P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
+Module=P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
 CursorX=1
 CursorY=1
@@ -113 +113 @@
 [View1]
 Module=P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas
-CursorX=13
-CursorY=3755
-TopLine=3745
+CursorX=35
+CursorY=830
+TopLine=818
 LeftCol=1
 
 [View2]
+Module=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas
+CursorX=26
+CursorY=213
+TopLine=199
+LeftCol=1
+
+[View3]
 Module=P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas
 CursorX=1
@@ -125 +132 @@
 LeftCol=1
 
-[View3]
+[View4]
 Module=c:\program files\borland\delphi7\source\vcl\StdCtrls.pas
 CursorX=1
 CursorY=2785
 TopLine=2771
-LeftCol=1
-
-[View4]
-Module=P:\Vista\killthis.txt
-CursorX=1
-CursorY=157
-TopLine=135
 LeftCol=1
 
@@ -172 +172 @@
 ClientWidth=631
 ClientHeight=419
-Module=P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb
+Module=P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb
 
 [Watches]
@@ -299 +299 @@
 SplitPos=128
 ArrangeBy=Name
-SelectedItem=Caption
+SelectedItem=OnKeyPress
 ExpandedItems=Anchors
 HiddenCategories=Legacy

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.~dsk

@@ -12 +12 @@
 
 [Modules]
-Module0=P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas
-Module1=c:\program files\borland\delphi7\source\vcl\StdCtrls.pas
-Module2=c:\program files\borland\delphi7\source\vcl\ComCtrls.pas
+Module0=P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas
+Module1=P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas
+Module2=c:\program files\borland\delphi7\source\rtl\common\classes.pas
 Module3=c:\program files\borland\delphi7\source\vcl\Controls.pas
-Module4=P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas
+Module4=c:\program files\borland\delphi7\source\vcl\ComCtrls.pas
 Module5=P:\Vista\killthis.txt
-Module6=c:\program files\borland\delphi7\source\rtl\common\classes.pas
+Module6=c:\program files\borland\delphi7\source\vcl\StdCtrls.pas
 Module7=P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
 Count=8
@@ -24 +24 @@
 TypeLibWindowCount=1
 
+[P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas]
+ModuleType=SourceModule
+FormState=1
+FormOnTop=0
+
 [P:\Vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas]
 ModuleType=SourceModule
@@ -29 +34 @@
 FormOnTop=0
 
+[c:\program files\borland\delphi7\source\rtl\common\classes.pas]
+ModuleType=SourceModule
+FormState=0
+FormOnTop=0
+
+[c:\program files\borland\delphi7\source\vcl\Controls.pas]
+ModuleType=SourceModule
+FormState=0
+FormOnTop=0
+
+[c:\program files\borland\delphi7\source\vcl\ComCtrls.pas]
+ModuleType=SourceModule
+FormState=0
+FormOnTop=0
+
+[P:\Vista\killthis.txt]
+ModuleType=SourceModule
+FormState=0
+FormOnTop=0
+
 [c:\program files\borland\delphi7\source\vcl\StdCtrls.pas]
-ModuleType=SourceModule
-FormState=0
-FormOnTop=0
-
-[c:\program files\borland\delphi7\source\vcl\ComCtrls.pas]
-ModuleType=SourceModule
-FormState=0
-FormOnTop=0
-
-[c:\program files\borland\delphi7\source\vcl\Controls.pas]
-ModuleType=SourceModule
-FormState=0
-FormOnTop=0
-
-[P:\Vista\tmg-cprs\CPRS-Chart\fFrame.pas]
-ModuleType=SourceModule
-FormState=1
-FormOnTop=0
-
-[P:\Vista\killthis.txt]
-ModuleType=SourceModule
-FormState=0
-FormOnTop=0
-
-[c:\program files\borland\delphi7\source\rtl\common\classes.pas]
 ModuleType=SourceModule
 FormState=0
@@ -74 +74 @@
 [EditWindow0]
 ViewCount=8
-CurrentView=2
+CurrentView=1
 View0=0
 View1=1
@@ -102 +102 @@
 BottomPanelSize=0
 BottomPanelClients=MessageView@EditWindow0
-BottomPanelData=00000400010000000B0000004D657373616765566965770103000000000000025500000000000000010000000000000000000000000100000000010300000B0000004D65737361676556696577FFFFFFFF
+BottomPanelData=00000400010000000B0000004D6573736167655669657701030000000000000255000000000000000100000000000000000000000001000000000103000000000000FFFFFFFF
 
 [View0]
@@ -299 +299 @@
 SplitPos=128
 ArrangeBy=Name
-SelectedItem=OnChange
+SelectedItem=Caption
 ExpandedItems=Anchors
 HiddenCategories=Legacy

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart_TLB.pas

@@ -13 +13 @@
 
 // PASTLWTR : 1.2
-// File generated on 7/19/2008 3:07:40 PM from Type Library described below.
+// File generated on 9/7/2008 8:16:48 PM from Type Library described below.
 
 // ************************************************************************  //
-// Type Lib: P:\Vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb (1)
+// Type Lib: P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb (1)
 // LIBID: {0A4A6086-6504-11D5-82DE-00C04F72C274}
 // LCID: 0

cprs/branches/tmg-cprs/CPRS-Chart/Options/fOptions.dfm

@@ -16 +16 @@
   OnCreate = FormCreate
   OnDestroy = FormDestroy
+  OnShow = FormShow
   PixelsPerInch = 96
   TextHeight = 13
@@ -86 +87 @@
       Height = 323
       HelpContext = 9999
-      ActivePage = tsCoverSheet
+      ActivePage = tsAppearance
       Align = alClient
       TabOrder = 0
@@ -1750 +1751 @@
         end
       end
+      object tsAppearance: TTabSheet
+        Caption = 'Appearance'
+        ImageIndex = 8
+        DesignSize = (
+          409
+          295)
+        object Label12: TLabel
+          Left = 8
+          Top = 5
+          Width = 45
+          Height = 13
+          Caption = 'Skin files:'
+          Transparent = True
+        end
+        object lbSkins: TListBox
+          Left = 8
+          Top = 24
+          Width = 281
+          Height = 241
+          Font.Charset = DEFAULT_CHARSET
+          Font.Color = clWindowText
+          Font.Height = -11
+          Font.Name = 'MS Sans Serif'
+          Font.Style = []
+          ItemHeight = 13
+          ParentFont = False
+          TabOrder = 0
+          OnDblClick = btnApplyClick
+          OnKeyPress = lbSkinsKeyPress
+        end
+        object cbSkinAtStartup: TCheckBox
+          Left = 8
+          Top = 272
+          Width = 265
+          Height = 17
+          Anchors = [akLeft, akBottom]
+          Caption = 'Load last selected skin when starting program'
+          Checked = True
+          State = cbChecked
+          TabOrder = 1
+        end
+        object btnMoreSkins: TButton
+          Left = 304
+          Top = 96
+          Width = 97
+          Height = 25
+          Caption = '&More skins...'
+          TabOrder = 2
+          OnClick = btnMoreSkinsClick
+        end
+        object btnDisableSkin: TButton
+          Left = 304
+          Top = 64
+          Width = 97
+          Height = 25
+          Caption = '&Disable skin'
+          ModalResult = 7
+          TabOrder = 3
+          OnClick = btnDisableSkinClick
+        end
+        object btnApplySkin: TButton
+          Left = 304
+          Top = 32
+          Width = 97
+          Height = 25
+          Caption = '&Apply skin'
+          TabOrder = 4
+          OnClick = btnApplySkinClick
+        end
+      end
     end
   end
   object DKLanguageController1: TDKLanguageController
-    Left = 80
-    Top = 280
+    Left = 328
+    Top = 192
     LangData = {
       0A0066726D4F7074696F6E73010200000001000000070043617074696F6E0200
-      0000080048656C7046696C6501640000000900706E6C426F74746F6D00000500
+      0000080048656C7046696C65016B0000000900706E6C426F74746F6D00000500
       62746E4F4B010100000003000000070043617074696F6E00090062746E43616E
       63656C010100000004000000070043617074696F6E00080062746E4170706C79
@@ -1852 +1923 @@
       676501020000004C000000040048696E744D000000040054657874000600496D
       61676531000005004D656D6F3101010000004F00000005004C696E6573000700
-      427574746F6E31010100000050000000070043617074696F6E00}
+      427574746F6E31010100000050000000070043617074696F6E000C0074734170
+      70656172616E6365010100000051000000070043617074696F6E0007004C6162
+      656C3132010100000052000000070043617074696F6E0007006C62536B696E73
+      00000F006362536B696E41745374617274757001010000005300000007004361
+      7074696F6E000C0062746E4D6F7265536B696E73010100000054000000070043
+      617074696F6E000E0062746E44697361626C65536B696E010100000055000000
+      070043617074696F6E000C0062746E4170706C79536B696E0101000000560000
+      00070043617074696F6E00}
   end
 end

cprs/branches/tmg-cprs/CPRS-Chart/Options/fOptions.pas

@@ -4 +4 @@
 interface
 
-uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
+uses
+  Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
   Buttons, ComCtrls, ExtCtrls, ORCtrls, OrFn, Dialogs, ORDtTmRng, fBAOptionsDiagnoses,
   uBAGlobals, TntStdCtrls, DKLang, jpeg, inifiles;
@@ -20 +21 @@
 
  Note: Cancel for language change is not currently supported
+//kt 9/8/08 ----------------------------
+ Also, a tab was added to the form: Appearance, for selecting skins.
  }
 
@@ -125 +128 @@
     Memo1: TMemo;
     Button1: TButton;
+    tsAppearance: TTabSheet;
+    Label12: TLabel;
+    lbSkins: TListBox;
+    cbSkinAtStartup: TCheckBox;
+    btnMoreSkins: TButton;
+    btnDisableSkin: TButton;
+    btnApplySkin: TButton;
     procedure FormCreate(Sender: TObject);
     procedure FormDestroy(Sender: TObject);
@@ -157 +167 @@
     procedure rdoRDVClick(Sender: TObject);
     procedure cbLanguageChange(Sender: TObject);
-    procedure Button1Click(Sender: TObject);  //kt added 6/29/07
+    procedure Button1Click(Sender: TObject);
+    procedure btnApplySkinClick(Sender: TObject);
+    procedure btnMoreSkinsClick(Sender: TObject);
+    procedure FormShow(Sender: TObject);
+    procedure lbSkinsKeyPress(Sender: TObject; var Key: Char);
+    procedure btnDisableSkinClick(Sender: TObject);  //kt added 6/29/07
   private
     { Private declarations }
@@ -167 +182 @@
     FsortAscending: boolean;
     FLastClickedItem: TListItem;
+    procedure FillSkinList;  //kt
     procedure Offset(var topnum: integer; topoffset: integer; var leftnum: integer; leftoffset: integer);
     procedure LoadNotifications;
@@ -187 +203 @@
 implementation
 
-uses fOptionsDays, fOptionsReminders, fOptionsSurrogate,
-     fOptionsPatientSelection, fOptionsLists, fOptionsTeams, fOptionsCombinations,
-     fOptionsOther, fOptionsNotes, fOptionsTitles, fOptionsReportsCustom, fOptionsReportsDefault,
-     fGraphs, fGraphSettings, fGraphProfiles, rGraphs, uGraphs,
-     rOptions, rCore, uCore, uOptions, UBACore, fFrame,
-     //fTestDialog;
+  uses fOptionsDays, fOptionsReminders, fOptionsSurrogate,
+       fOptionsPatientSelection, fOptionsLists, fOptionsTeams, fOptionsCombinations,
+       fOptionsOther, fOptionsNotes, fOptionsTitles, fOptionsReportsCustom, fOptionsReportsDefault,
+       fGraphs, fGraphSettings, fGraphProfiles, rGraphs, uGraphs,
+       rOptions, rCore, uCore, uOptions, UBACore, fFrame,
+       //fTestDialog;
 
     //kt mod 6/29/07 -----
+    ShellAPI, //kt 9/8/08
     ORNet, //allows access to RPCBrokerV
     TntForms, TntSystem, TntSysUtils;
@@ -202 +219 @@
 {$R *.DFM}
 
-type
-  TRule = class
-  public
-    IEN: string;
-    OriginalValue: string;
-    ItemText: string;
-end;
-
-procedure DialogOptions(var actiontype: Integer);
-// create the form and make in modal, return an action
-const
-  PixelGapBetweenButtons = 5;
-var
-  frmOptions: TfrmOptions;
-begin
-  frmOptions := TfrmOptions.Create(Application);
-  try
-    with frmOptions do
+  type
+    TRule = class
+    public
+      IEN: string;
+      OriginalValue: string;
+      ItemText: string;
+  end;
+
+  procedure DialogOptions(var actiontype: Integer);
+  // create the form and make in modal, return an action
+  const
+    PixelGapBetweenButtons = 5;
+  var
+    frmOptions: TfrmOptions;
+  begin
+    frmOptions := TfrmOptions.Create(Application);
+    try
+      with frmOptions do
+      begin
+        with pagOptions do
+        begin
+          tsCoverSheet.TabVisible := false;
+          tsNotifications.TabVisible := false;
+          tsOrderChecks.TabVisible := false;
+          tsListsTeams.TabVisible := false;
+          case actiontype of
+          1: begin
+               tsCoverSheet.TabVisible := true;
+             end;
+          2: begin
+               tsNotifications.TabVisible := true;
+             end;
+          3: begin
+               tsOrderChecks.TabVisible := true;
+             end;
+          4: begin
+               tsListsTeams.TabVisible := true;
+             end;
+          else
+             begin
+               tsCoverSheet.TabVisible := true;
+               tsNotifications.TabVisible := true;
+               tsOrderChecks.TabVisible := true;
+               tsListsTeams.TabVisible := true;
+               ActivePage := tsCoverSheet;
+  //           memReports.Text := 'Change the default date range and occurrence limits for all reports on ' +  <-- original line.  //kt 8/8/2007
+               memReports.Text := DKLangConstW('fOptions_Change_the_default_date_range_and_occurrence_limits_for_all_reports_on') + //kt added 8/8/2007
+  //                             'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
+                                 DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
+  //           memReport1.Text := 'Change the individual date range and occurrence limits for each report on ' +  <-- original line.  //kt 8/8/2007
+               memReport1.Text := DKLangConstW('fOptions_Change_the_individual_date_range_and_occurrence_limits_for_each_report_on') + //kt added 8/8/2007
+  //                             'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
+                                 DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
+  //           btnReports.caption := 'Set All Reports...';  <-- original line.  //kt 8/8/2007
+               btnReports.caption := DKLangConstW('fOptions_Set_All_Reportsxxx'); //kt added 8/8/2007
+  //           btnReport1.caption := 'Set Individual Reports...';  <-- original line.  //kt 8/8/2007
+               btnReport1.caption := DKLangConstW('fOptions_Set_Individual_Reportsxxx'); //kt added 8/8/2007
+               if User.IsReportsOnly then // For "Reports Only" users.
+                 begin
+                   tsCoverSheet.TabVisible := false;
+                   tsNotifications.TabVisible := false;
+                   tsOrderChecks.TabVisible := false;
+                   tsListsTeams.TabVisible := false;
+                   tsNotes.TabVisible := false;
+                   if (not User.ToolsRptEdit) then
+                   begin
+                     btnOK.visible := false;
+                     btnApply.visible := false;
+  //                 btnCancel.caption := 'Close';  <-- original line.  //kt 8/8/2007
+                     btnCancel.caption := DKLangConstW('fOptions_Close'); //kt added 8/8/2007
+                   end;
+                 end;
+               if (not User.ToolsRptEdit) then // For users with Reports settings edit parameter not set.
+                 begin
+  //               memReports.Text := 'View the default date range and occurrence limits for all reports on ' +  <-- original line.  //kt 8/8/2007
+                   memReports.Text := DKLangConstW('fOptions_View_the_default_date_range_and_occurrence_limits_for_all_reports_on') + //kt added 8/8/2007
+  //                                 'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
+                                     DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
+  //               memReport1.Text := 'View the individual date range and occurrence limits for each report on ' +  <-- original line.  //kt 8/8/2007
+                   memReport1.Text := DKLangConstW('fOptions_View_the_individual_date_range_and_occurrence_limits_for_each_report_on') + //kt added 8/8/2007
+  //                                 'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
+                                     DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
+  //               btnReports.caption := 'View All Report Settings...';  <-- original line.  //kt 8/8/2007
+                   btnReports.caption := DKLangConstW('fOptions_View_All_Report_Settingsxxx'); //kt added 8/8/2007
+  //               btnReport1.caption := 'View Individual Report Settings...';  <-- original line.  //kt 8/8/2007
+                   btnReport1.caption := DKLangConstW('fOptions_View_Individual_Report_Settingsxxx'); //kt added 8/8/2007
+                 end;
+             end;
+          end;
+        end;
+        actiontype := 0;
+        ResizeAnchoredFormToFont(frmOptions);
+        btnApply.Left := pagOptions.Left + pagOptions.Width - btnApply.Width;
+        btnCancel.Left := btnApply.Left - btnCancel.Width - PixelGapBetweenButtons;
+        btnOK.Left := btnCancel.Left - btnOK.Width - PixelGapBetweenButtons;
+        ShowModal;
+        actiontype := btnOK.Tag;
+      end;
+    finally
+      frmOptions.Release;
+    end;
+  end;
+
+  procedure TfrmOptions.FormCreate(Sender: TObject);
+  // initialize form
+  var i : integer;  //kt added 6/29/07
+  begin
+    LoadNotifications;
+    LoadOrderChecks;
+    FdirtyNotifications := false;
+    FdirtyOrderChecks := false;
+    FdirtyOtherStuff := false;
+    CheckApply;
+
+    if (Encounter.Provider = 0) and not IsCIDCProvider(User.DUZ) then
+        btnDiagnoses.Enabled := False;
+    if UseVistaWeb then rdoRDV.ItemIndex := 1;
+
+    //kt begin modification 6/29/07 ---------------
+
+    // Fill cbLanguage with available languages
+    // Note: LangManager was populated at form creation of fFrame
+    for i := 0 to LangManager.LanguageCount-1 do cbLanguage.Items.Add(LangManager.LanguageNames[i]);
+    //Index=0 always means the default language
+    cbLanguage.ItemIndex := LangManager.LanguageIndex;
+    //kt end modification 6/29/07 ---------------
+
+    cbSkinAtStartup.Checked := frmFrame.SkinAtStartup; //kt 9/8/08
+
+  end;
+
+  procedure TfrmOptions.FormDestroy(Sender: TObject);
+  // cleanup creation of objects
+  var
+    i: integer;
+  begin
+    for i := 0 to lvwOrderChecks.Items.Count - 1 do
+      lvwOrderChecks.Items.Item[i].SubItems.Objects[2].free;
+    for i := 0 to lvwNotifications.Items.Count - 1 do
+      lvwNotifications.Items.Item[i].SubItems.Objects[2].free;
+  end;
+
+  procedure TfrmOptions.btnCoverDaysClick(Sender: TObject);
+  // display Date Range Defaults on Cover Sheet
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsDays(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnCoverRemindersClick(Sender: TObject);
+  // display Clinical Reminder Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsReminders(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnOtherParametersClick(Sender: TObject);
+  // display Other Parameters Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, 40, leftsize, 40);
+    DialogOptionsOther(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnPatientSelectionClick(Sender: TObject);
+  // display Patient Selection Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsPatientSelection(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnPersonalListsClick(Sender: TObject);
+  // display Personal Lists Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsLists(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnTeamsClick(Sender: TObject);
+  // display Team Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsTeams(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnNotificationsRemoveClick(Sender: TObject);
+  // confirm before clearing notifications
+  begin
+  //if InfoBox('CAUTION: This will clear all the current notifications you have pending.'  <-- original line.  //kt 8/8/2007
+    if InfoBox(DKLangConstW('fOptions_CAUTIONx_This_will_clear_all_the_current_notifications_you_have_pendingx') //kt added 8/8/2007
+  //  + #13 + 'If you say YES, these changes will take place immediately.'  <-- original line.  //kt 8/8/2007
+      + #13 + DKLangConstW('fOptions_If_you_say_YESx_these_changes_will_take_place_immediatelyx') //kt added 8/8/2007
+  //  + #13 + 'Are you sure you want to erase all of your notifications?',  <-- original line.  //kt 8/8/2007
+      + #13 + DKLangConstW('fOptions_Are_you_sure_you_want_to_erase_all_of_your_notificationsx'), //kt added 8/8/2007
+  //  'Warning', MB_YESNO or MB_ICONWARNING) = IDYES then  <-- original line.  //kt 8/8/2007
+      DKLangConstW('fOptions_Warning'), MB_YESNO or MB_ICONWARNING) = IDYES then //kt added 8/8/2007
+      begin
+        rpcClearNotifications;
+      end;
+  end;
+
+  procedure TfrmOptions.Offset(var topnum: integer; topoffset: integer; var leftnum: integer; leftoffset: integer);
+  // get positions to display dialog
+  begin
+    // use these top and left values to display dialog
+    topnum := Top;
+    leftnum := Left;
+    topnum := topnum + topoffset;
+    if topnum < 0 then topnum := 0;
+    leftnum := leftnum + leftoffset;
+    if leftnum < 0 then leftnum := 0;
+  end;
+
+  procedure TfrmOptions.btnApplyClick(Sender: TObject);
+  // save actions without exiting
+  begin
+    if FdirtyNotifications then
+      ApplyNotifications;
+    if FdirtyOrderChecks then
+      ApplyOrderChecks;
+    if FdirtyOtherStuff then
+      ApplyOtherStuff;
+    CheckApply;
+    if Sender = btnOK then
+      Close;
+  end;
+
+  procedure TfrmOptions.LoadNotifications;
+  // load Notification tab
+  var
+    notifydefaults, surrogateinfo, flag, enableerase: string;
+  begin
+    LoadListView(lvwNotifications, rpcGetNotifications);
+    lvwNotificationsColumnClick(lvwNotifications, lvwNotifications.Column[0]); // make sure sorted
+    notifydefaults := rpcGetNotificationDefaults;
+    flag := Piece(notifydefaults, '^', 2);
+    enableerase := Piece(notifydefaults, '^', 3);
+    chkNotificationsFlagged.Checked := flag = '1';
+    btnNotificationsRemove.Enabled := enableerase = '1';
+    surrogateinfo := rpcGetSurrogateInfo;
+    btnSurrogate.Hint := surrogateinfo;
+    LabelSurrogate(surrogateinfo, lblNotificationsSurrogateText);
+  end;
+
+  procedure TfrmOptions.LoadOrderChecks;
+  // load Order Check tab
+  begin
+    LoadListView(lvwOrderChecks, rpcGetOrderChecks);
+    lvwOrderChecks.Checkboxes := true;
+  end;
+
+  procedure TfrmOptions.ApplyNotifications;
+  // save Notification changes
+  var
+    i: integer;
+    newonoff: string;
+    aRule: TRule;
+    aList: TStringList;
+  begin
+    aList := TStringList.Create;
+    for i := 0 to lvwNotifications.Items.Count - 1 do
     begin
-      with pagOptions do
+      aRule := TRule(lvwNotifications.Items.Item[i].SubItems.Objects[2]);
+  //  if lvwNotifications.Items.Item[i].SubItems[1] <> 'Mandatory' then  <-- original line.  //kt 8/8/2007
+      if lvwNotifications.Items.Item[i].SubItems[1] <> DKLangConstW('fOptions_Mandatory') then //kt added 8/8/2007
       begin
-        tsCoverSheet.TabVisible := false;
-        tsNotifications.TabVisible := false;
-        tsOrderChecks.TabVisible := false;
-        tsListsTeams.TabVisible := false;
-        case actiontype of
-        1: begin
-             tsCoverSheet.TabVisible := true;
-           end;
-        2: begin
-             tsNotifications.TabVisible := true;
-           end;
-        3: begin
-             tsOrderChecks.TabVisible := true;
-           end;
-        4: begin
-             tsListsTeams.TabVisible := true;
-           end;
-        else
-           begin
-             tsCoverSheet.TabVisible := true;
-             tsNotifications.TabVisible := true;
-             tsOrderChecks.TabVisible := true;
-             tsListsTeams.TabVisible := true;
-             ActivePage := tsCoverSheet;
-//           memReports.Text := 'Change the default date range and occurrence limits for all reports on ' +  <-- original line.  //kt 8/8/2007
-             memReports.Text := DKLangConstW('fOptions_Change_the_default_date_range_and_occurrence_limits_for_all_reports_on') + //kt added 8/8/2007
-//                             'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
-                               DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
-//           memReport1.Text := 'Change the individual date range and occurrence limits for each report on ' +  <-- original line.  //kt 8/8/2007
-             memReport1.Text := DKLangConstW('fOptions_Change_the_individual_date_range_and_occurrence_limits_for_each_report_on') + //kt added 8/8/2007
-//                             'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
-                               DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
-//           btnReports.caption := 'Set All Reports...';  <-- original line.  //kt 8/8/2007
-             btnReports.caption := DKLangConstW('fOptions_Set_All_Reportsxxx'); //kt added 8/8/2007
-//           btnReport1.caption := 'Set Individual Reports...';  <-- original line.  //kt 8/8/2007
-             btnReport1.caption := DKLangConstW('fOptions_Set_Individual_Reportsxxx'); //kt added 8/8/2007
-             if User.IsReportsOnly then // For "Reports Only" users.
-               begin
-                 tsCoverSheet.TabVisible := false;
-                 tsNotifications.TabVisible := false;
-                 tsOrderChecks.TabVisible := false;
-                 tsListsTeams.TabVisible := false;
-                 tsNotes.TabVisible := false;
-                 if (not User.ToolsRptEdit) then
-                 begin
-                   btnOK.visible := false;
-                   btnApply.visible := false;
-//                 btnCancel.caption := 'Close';  <-- original line.  //kt 8/8/2007
-                   btnCancel.caption := DKLangConstW('fOptions_Close'); //kt added 8/8/2007
-                 end;
-               end;
-             if (not User.ToolsRptEdit) then // For users with Reports settings edit parameter not set.
-               begin
-//               memReports.Text := 'View the default date range and occurrence limits for all reports on ' +  <-- original line.  //kt 8/8/2007
-                 memReports.Text := DKLangConstW('fOptions_View_the_default_date_range_and_occurrence_limits_for_all_reports_on') + //kt added 8/8/2007
-//                                 'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
-                                   DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
-//               memReport1.Text := 'View the individual date range and occurrence limits for each report on ' +  <-- original line.  //kt 8/8/2007
-                 memReport1.Text := DKLangConstW('fOptions_View_the_individual_date_range_and_occurrence_limits_for_each_report_on') + //kt added 8/8/2007
-//                                 'the CPRS Reports tab (excluding health summary reports) .';  <-- original line.  //kt 8/8/2007
-                                   DKLangConstW('fOptions_the_CPRS_Reports_tab_xexcluding_health_summary_reportsx_x'); //kt added 8/8/2007
-//               btnReports.caption := 'View All Report Settings...';  <-- original line.  //kt 8/8/2007
-                 btnReports.caption := DKLangConstW('fOptions_View_All_Report_Settingsxxx'); //kt added 8/8/2007
-//               btnReport1.caption := 'View Individual Report Settings...';  <-- original line.  //kt 8/8/2007
-                 btnReport1.caption := DKLangConstW('fOptions_View_Individual_Report_Settingsxxx'); //kt added 8/8/2007
-               end;
-           end;
+        newonoff := Uppercase(lvwNotifications.Items.Item[i].SubItems[0]);
+        if aRule.OriginalValue <> newonoff then
+        begin
+          //***showmessage(aRule.IEN + ' ' + aRule.OriginalValue + ' ' + newonoff);
+          aList.Add(aRule.IEN + '^' + newonoff);
+          aRule.OriginalValue := lvwNotifications.Items.Item[i].SubItems[0];
         end;
       end;
-      actiontype := 0;
-      ResizeAnchoredFormToFont(frmOptions);
-      btnApply.Left := pagOptions.Left + pagOptions.Width - btnApply.Width;
-      btnCancel.Left := btnApply.Left - btnCancel.Width - PixelGapBetweenButtons;
-      btnOK.Left := btnCancel.Left - btnOK.Width - PixelGapBetweenButtons;
-      ShowModal;
-      actiontype := btnOK.Tag;
-    end;
-  finally
-    frmOptions.Release;
-  end;
-end;
-
-procedure TfrmOptions.FormCreate(Sender: TObject);
-// initialize form
-var i : integer;  //kt added 6/29/07
-begin
-  LoadNotifications;
-  LoadOrderChecks;
-  FdirtyNotifications := false;
-  FdirtyOrderChecks := false;
-  FdirtyOtherStuff := false;
-  CheckApply;
-
-  if (Encounter.Provider = 0) and not IsCIDCProvider(User.DUZ) then
-      btnDiagnoses.Enabled := False;
-  if UseVistaWeb then rdoRDV.ItemIndex := 1;
-
-  //kt begin modification 6/29/07 ---------------
-
-  // Fill cbLanguage with available languages
-  // Note: LangManager was populated at form creation of fFrame
-  for i := 0 to LangManager.LanguageCount-1 do cbLanguage.Items.Add(LangManager.LanguageNames[i]);
-  //Index=0 always means the default language
-  cbLanguage.ItemIndex := LangManager.LanguageIndex;
-
-  //kt end modification 6/29/07 ---------------
-
-
-end;
-
-procedure TfrmOptions.FormDestroy(Sender: TObject);
-// cleanup creation of objects
-var
-  i: integer;
-begin
-  for i := 0 to lvwOrderChecks.Items.Count - 1 do
-    lvwOrderChecks.Items.Item[i].SubItems.Objects[2].free;
-  for i := 0 to lvwNotifications.Items.Count - 1 do
-    lvwNotifications.Items.Item[i].SubItems.Objects[2].free;
-end;
-
-procedure TfrmOptions.btnCoverDaysClick(Sender: TObject);
-// display Date Range Defaults on Cover Sheet
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsDays(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnCoverRemindersClick(Sender: TObject);
-// display Clinical Reminder Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsReminders(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnOtherParametersClick(Sender: TObject);
-// display Other Parameters Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, 40, leftsize, 40);
-  DialogOptionsOther(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnPatientSelectionClick(Sender: TObject);
-// display Patient Selection Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsPatientSelection(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnPersonalListsClick(Sender: TObject);
-// display Personal Lists Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsLists(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnTeamsClick(Sender: TObject);
-// display Team Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsTeams(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnNotificationsRemoveClick(Sender: TObject);
-// confirm before clearing notifications
-begin
-//if InfoBox('CAUTION: This will clear all the current notifications you have pending.'  <-- original line.  //kt 8/8/2007
-  if InfoBox(DKLangConstW('fOptions_CAUTIONx_This_will_clear_all_the_current_notifications_you_have_pendingx') //kt added 8/8/2007
-//  + #13 + 'If you say YES, these changes will take place immediately.'  <-- original line.  //kt 8/8/2007
-    + #13 + DKLangConstW('fOptions_If_you_say_YESx_these_changes_will_take_place_immediatelyx') //kt added 8/8/2007
-//  + #13 + 'Are you sure you want to erase all of your notifications?',  <-- original line.  //kt 8/8/2007
-    + #13 + DKLangConstW('fOptions_Are_you_sure_you_want_to_erase_all_of_your_notificationsx'), //kt added 8/8/2007
-//  'Warning', MB_YESNO or MB_ICONWARNING) = IDYES then  <-- original line.  //kt 8/8/2007
-    DKLangConstW('fOptions_Warning'), MB_YESNO or MB_ICONWARNING) = IDYES then //kt added 8/8/2007
+    end;
+    rpcSetNotifications(aList);
+    aList.free;
+    FdirtyNotifications := false;
+  end;
+
+  procedure TfrmOptions.ApplyOrderChecks;
+  // save Order Check changes
+  var
+    i: integer;
+    newonoff: string;
+    aRule: TRule;
+    aList: TStringList;
+  begin
+    aList := TStringList.Create;
+    for i := 0 to lvwOrderChecks.Items.Count - 1 do
     begin
-      rpcClearNotifications;
-    end;
-end;
-
-procedure TfrmOptions.Offset(var topnum: integer; topoffset: integer; var leftnum: integer; leftoffset: integer);
-// get positions to display dialog
-begin
-  // use these top and left values to display dialog
-  topnum := Top;
-  leftnum := Left;
-  topnum := topnum + topoffset;
-  if topnum < 0 then topnum := 0;
-  leftnum := leftnum + leftoffset;
-  if leftnum < 0 then leftnum := 0;
-end;
-
-procedure TfrmOptions.btnApplyClick(Sender: TObject);
-// save actions without exiting
-begin
-  if FdirtyNotifications then
-    ApplyNotifications;
-  if FdirtyOrderChecks then
-    ApplyOrderChecks;
-  if FdirtyOtherStuff then
-    ApplyOtherStuff;
-  CheckApply;
-  if Sender = btnOK then
-    Close;
-end;
-
-procedure TfrmOptions.LoadNotifications;
-// load Notification tab
-var
-  notifydefaults, surrogateinfo, flag, enableerase: string;
-begin
-  LoadListView(lvwNotifications, rpcGetNotifications);
-  lvwNotificationsColumnClick(lvwNotifications, lvwNotifications.Column[0]); // make sure sorted
-  notifydefaults := rpcGetNotificationDefaults;
-  flag := Piece(notifydefaults, '^', 2);
-  enableerase := Piece(notifydefaults, '^', 3);
-  chkNotificationsFlagged.Checked := flag = '1';
-  btnNotificationsRemove.Enabled := enableerase = '1';
-  surrogateinfo := rpcGetSurrogateInfo;
-  btnSurrogate.Hint := surrogateinfo;
-  LabelSurrogate(surrogateinfo, lblNotificationsSurrogateText);
-end;
-
-procedure TfrmOptions.LoadOrderChecks;
-// load Order Check tab
-begin
-  LoadListView(lvwOrderChecks, rpcGetOrderChecks);
-  lvwOrderChecks.Checkboxes := true;
-end;
-
-procedure TfrmOptions.ApplyNotifications;
-// save Notification changes
-var
-  i: integer;
-  newonoff: string;
-  aRule: TRule;
-  aList: TStringList;
-begin
-  aList := TStringList.Create;
-  for i := 0 to lvwNotifications.Items.Count - 1 do
-  begin
-    aRule := TRule(lvwNotifications.Items.Item[i].SubItems.Objects[2]);
-//  if lvwNotifications.Items.Item[i].SubItems[1] <> 'Mandatory' then  <-- original line.  //kt 8/8/2007
-    if lvwNotifications.Items.Item[i].SubItems[1] <> DKLangConstW('fOptions_Mandatory') then //kt added 8/8/2007
-    begin
-      newonoff := Uppercase(lvwNotifications.Items.Item[i].SubItems[0]);
+      aRule := TRule(lvwOrderChecks.Items.Item[i].SubItems.Objects[2]);
+      newonoff := Uppercase(lvwOrderChecks.Items.Item[i].SubItems[0]);
       if aRule.OriginalValue <> newonoff then
       begin
-        //***showmessage(aRule.IEN + ' ' + aRule.OriginalValue + ' ' + newonoff);
         aList.Add(aRule.IEN + '^' + newonoff);
-        aRule.OriginalValue := lvwNotifications.Items.Item[i].SubItems[0];
+        aRule.OriginalValue := lvwOrderChecks.Items.Item[i].SubItems[0];
       end;
     end;
-  end;
-  rpcSetNotifications(aList);
-  aList.free;
-  FdirtyNotifications := false;
-end;
-
-procedure TfrmOptions.ApplyOrderChecks;
-// save Order Check changes
-var
-  i: integer;
-  newonoff: string;
-  aRule: TRule;
-  aList: TStringList;
-begin
-  aList := TStringList.Create;
-  for i := 0 to lvwOrderChecks.Items.Count - 1 do
-  begin
-    aRule := TRule(lvwOrderChecks.Items.Item[i].SubItems.Objects[2]);
-    newonoff := Uppercase(lvwOrderChecks.Items.Item[i].SubItems[0]);
-    if aRule.OriginalValue <> newonoff then
+    rpcSetOrderChecks(aList);
+    aList.free;
+    FdirtyOrderChecks := false;
+  end;
+
+  procedure TfrmOptions.ApplyOtherStuff;
+  // save other changes
+  var
+    aString: string;
+  begin
+    aString := '';
+    if chkNotificationsFlagged.Checked then
+      aString := aString + '^1'
+    else
+      aString := aString + '^0';
+    rpcSetOtherStuff(aString);
+    FdirtyOtherStuff := false;
+  end;
+
+  procedure TfrmOptions.CheckApply;
+  // determine if Apply button is enabled
+  begin
+    btnApply.Enabled :=  FdirtyOrderChecks or FdirtyNotifications or FdirtyOtherStuff;
+  end;
+
+  procedure TfrmOptions.chkNotificationsFlaggedClick(Sender: TObject);
+  // set notification flagged status
+  begin
+    FdirtyOtherStuff := true;
+    CheckApply;
+  end;
+
+  procedure TfrmOptions.LoadListView(aListView: TListView; aList: TStrings);
+  // load a list view with: name, on/off, comment
+  var
+    i: integer;
+    aListItem: TListItem;
+    aRule: TRule;
+    rulenum, ruletext, ruleonoff, rulecomment: string;
+  begin
+    FuseCheckBoxes := false;
+    aListView.Items.Clear;
+    aListView.SortType := stNone; // if Sorting during load then potential error
+    with aList do
     begin
-      aList.Add(aRule.IEN + '^' + newonoff);
-      aRule.OriginalValue := lvwOrderChecks.Items.Item[i].SubItems[0];
-    end;
-  end;
-  rpcSetOrderChecks(aList);
-  aList.free;
-  FdirtyOrderChecks := false;
-end;
-
-procedure TfrmOptions.ApplyOtherStuff;
-// save other changes
-var
-  aString: string;
-begin
-  aString := '';
-  if chkNotificationsFlagged.Checked then
-    aString := aString + '^1'
-  else
-    aString := aString + '^0';
-  rpcSetOtherStuff(aString);
-  FdirtyOtherStuff := false;
-end;
-
-procedure TfrmOptions.CheckApply;
-// determine if Apply button is enabled
-begin
-  btnApply.Enabled :=  FdirtyOrderChecks or FdirtyNotifications or FdirtyOtherStuff;
-end;
-
-procedure TfrmOptions.chkNotificationsFlaggedClick(Sender: TObject);
-// set notification flagged status
-begin
-  FdirtyOtherStuff := true;
-  CheckApply;
-end;
-
-procedure TfrmOptions.LoadListView(aListView: TListView; aList: TStrings);
-// load a list view with: name, on/off, comment
-var
-  i: integer;
-  aListItem: TListItem;
-  aRule: TRule;
-  rulenum, ruletext, ruleonoff, rulecomment: string;
-begin
-  FuseCheckBoxes := false;
-  aListView.Items.Clear;
-  aListView.SortType := stNone; // if Sorting during load then potential error
-  with aList do
-  begin
-    for i := 0 to aList.Count - 1 do
+      for i := 0 to aList.Count - 1 do
+      begin
+        rulenum := Piece(aList[i], '^', 1);
+        ruletext := Piece(aList[i], '^', 2);
+        ruleonoff := Piece(aList[i], '^', 3);
+        rulecomment := Piece(aList[i], '^', 4);
+        aListItem := aListView.Items.Add;
+        with aListItem do
+        begin
+          Caption := ruletext;
+          SubItems.Add(ruleonoff);
+          if ruleonoff = 'On' then Checked := true;
+          SubItems.Add(rulecomment);
+        end;
+        aRule := TRule.Create;
+        with aRule do
+        begin
+          IEN := rulenum;
+          OriginalValue := ruleonoff;
+          ItemText := ruletext;
+        end;
+  //    aListItem.SubItems.AddObject('rule object', aRule);  <-- original line.  //kt 8/8/2007
+        aListItem.SubItems.AddObject(DKLangConstW('fOptions_rule_object'), aRule); //kt added 8/8/2007
+      end;
+    end;
+    aListView.SortType := stBoth;
+    FuseCheckBoxes := true;
+  end;
+
+  procedure TfrmOptions.lvwNotificationsChange(Sender: TObject;
+    Item: TListItem; Change: TItemChange);
+  // change on/off on checkmark
+  begin
+    if (Sender as TListView).ItemIndex = -1 then exit;
+    if not FuseCheckBoxes then exit;
+    if (Sender as TListView).Checkboxes = false then exit;
+  //if (Item.SubItems[1] = 'Mandatory') and not Item.Checked then begin  <-- original line.  //kt 8/8/2007
+    if (Item.SubItems[1] = DKLangConstW('fOptions_Mandatory')) and not Item.Checked then begin //kt added 8/8/2007
+      Item.Checked := True;
+      exit;
+    end;
+    if Item.Checked then
     begin
-      rulenum := Piece(aList[i], '^', 1);
-      ruletext := Piece(aList[i], '^', 2);
-      ruleonoff := Piece(aList[i], '^', 3);
-      rulecomment := Piece(aList[i], '^', 4);
-      aListItem := aListView.Items.Add;
-      with aListItem do
+      if Item.SubItems[0] <> 'On' then
+        ChangeOnOff(Sender as TListView, Item);
+      Item.SubItems[0] := 'On';
+    end
+    else
+    begin
+  //  if Item.SubItems[0] <> 'Off' then  <-- original line.  //kt 8/8/2007
+      if Item.SubItems[0] <> DKLangConstW('fOptions_Off') then //kt added 8/8/2007
+        ChangeOnOff(Sender as TListView, Item);
+  //  Item.SubItems[0] := 'Off';  <-- original line.  //kt 8/8/2007
+      Item.SubItems[0] := DKLangConstW('fOptions_Off'); //kt added 8/8/2007
+    end;
+  end;
+
+  procedure TfrmOptions.lvwNotificationsColumnClick(Sender: TObject;
+    Column: TListColumn);
+  // toggle sort
+  begin
+    if FsortCol = Column.Index then
+      FsortAscending := not FsortAscending
+    else
+      FsortAscending := true;
+    FsortCol := Column.Index;
+    (Sender as TListView).AlphaSort;
+  end;
+
+  procedure TfrmOptions.lvwNotificationsCompare(Sender: TObject; Item1,
+    Item2: TListItem; Data: Integer; var Compare: Integer);
+  //  sort columns
+  begin
+    if not(Sender is TListView) then exit;
+    if FsortAscending then
+    begin
+      if FsortCol = 0 then
+        Compare := CompareStr(Item1.Caption, Item2.Caption)
+      else
+        Compare := CompareStr(Item1.SubItems[FsortCol - 1],
+          Item2.SubItems[FsortCol - 1]);
+    end
+    else
+    begin
+      if FsortCol = 0 then
+        Compare := CompareStr(Item2.Caption, Item1.Caption)
+      else
+        Compare := CompareStr(Item2.SubItems[FsortCol - 1],
+          Item1.SubItems[FsortCol - 1]);
+    end;
+  end;
+
+  procedure TfrmOptions.lvwNotificationsDblClick(Sender: TObject);
+  // toggle check marks with double click
+  var
+    aListItem: TListItem;
+  begin
+    with (Sender as TListView) do
+    begin
+      if Checkboxes = false then exit;
+      if Selected = nil then exit;
+  //  if Selected.SubItems[1] = 'Mandatory' then exit;  <-- original line.  //kt 8/8/2007
+      if Selected.SubItems[1] = DKLangConstW('fOptions_Mandatory') then exit; //kt added 8/8/2007
+      if Selected <> FLastClickedItem then exit;
+      aListItem := Selected;
+      aListItem.Checked := not aListItem.Checked;
+      ChangeOnOff(Sender as TListView, aListItem);
+
+      if aListItem.Checked then
+        aListItem.SubItems[0] := 'On'
+      else
+  //    aListItem.SubItems[0] := 'Off';  <-- original line.  //kt 8/8/2007
+        aListItem.SubItems[0] := DKLangConstW('fOptions_Off'); //kt added 8/8/2007
+    end;
+  end;
+
+  procedure TfrmOptions.ChangeOnOff(aListView: TListView; aListItem: TListItem);
+  // check if list items were edited
+  begin
+    if aListView = lvwNotifications then FdirtyNotifications := true;
+    if aListView = lvwOrderChecks then FdirtyOrderChecks := true;
+    CheckApply;
+  end;
+
+  procedure TfrmOptions.btnSurrogateClick(Sender: TObject);
+  // display Surrogate Options
+  var
+    topsize, leftsize: integer;
+    surrogateinfo: string;
+  begin
+    surrogateinfo := btnSurrogate.Hint;
+    Offset(topsize, -30, leftsize, -30);
+    DialogOptionsSurrogate(topsize, leftsize, Font.Size, surrogateinfo);
+    LabelSurrogate(surrogateinfo, lblNotificationsSurrogateText);
+    btnSurrogate.Hint := surrogateinfo;
+  end;
+
+  procedure TfrmOptions.btnCombinationsClick(Sender: TObject);
+  // display Combination List Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsCombinations(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnNotesNotesClick(Sender: TObject);
+  // display Notes Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsNotes(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnNotesTitlesClick(Sender: TObject);
+  // display Titles Options
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsTitles(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnReportsClick(Sender: TObject);
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, 90, leftsize, 23);
+    DialogOptionsHSDefault(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.btnReport1Click(Sender: TObject);
+  var
+    topsize, leftsize, value: integer;
+  begin
+    value := 0;
+    Offset(topsize, -18, leftsize, -15);
+    DialogOptionsHSCustom(topsize, leftsize, Font.Size, value);
+  end;
+
+  procedure TfrmOptions.lvwNotificationsEnter(Sender: TObject);
+  begin
+    with Sender as TListView do begin
+      if (Selected = nil) and (Items.Count > 0) then
+        Selected := Items[0];
+    end;
+  end;
+
+  procedure TfrmOptions.lvwNotificationsMouseDown(Sender: TObject;
+    Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
+  begin
+    FLastClickedItem := (Sender as TListView).GetItemAt(X,Y);
+  end;
+
+  procedure TfrmOptions.btnDiagnosesClick(Sender: TObject);
+  // display Personal Diagnoses List
+  var
+    topsize, leftsize, value: integer;
+  begin
+    if IsCIDCProvider(User.DUZ) then    //(hds7564)
+    begin
+       value := 0;
+       Offset(topsize, -60, leftsize, -60);
+       DialogOptionsDiagnoses(topsize, leftsize, Font.Size, value);
+    end;
+  end;
+
+  procedure TfrmOptions.btnGraphSettingsClick(Sender: TObject);
+  // display GraphSettings
+  var
+    actiontype: boolean;
+    topsize, leftsize: integer;
+  begin
+    actiontype := false;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsGraphSettings(topsize, leftsize, Font.Size, actiontype);
+  end;
+
+  procedure TfrmOptions.btnGraphViewsClick(Sender: TObject);
+  // display Graph Views
+  var
+    actiontype: boolean;
+    topsize, leftsize: integer;
+  begin
+    actiontype := false;
+    Offset(topsize, -60, leftsize, -60);
+    DialogOptionsGraphProfiles(topsize, leftsize, Font.Size, actiontype);
+  end;
+
+  procedure TfrmOptions.rdoRDVClick(Sender: TObject);
+  var
+    iIndex: integer;
+  begin
+    iIndex := rdoRDV.ItemIndex;
+     with frmFrame do
+     if iIndex = 0 then
       begin
-        Caption := ruletext;
-        SubItems.Add(ruleonoff);
-        if ruleonoff = 'On' then Checked := true;
-        SubItems.Add(rulecomment);
+        ChangeVistaWebParam('0');
+        lblCIRN.Caption := ' Remote';
+        lblCIRNData.Caption := 'Data';
+        lblCIRNAvail.Caption := '';
+        lblCIRN.Width := 43;
+        lblCIRNData.Width := 43;
+        lblCIRNData.Alignment := taCenter;
+        lblCIRN.Alignment := taCenter;
+        lstCIRNLocations.Clear;
+        SetUpCIRN;
+      end
+    else
+      begin
+        ChangeVistaWebParam('1');
+        lblCIRN.Caption := 'Remote';
+        lblCIRNData.Caption := 'Data*';  //VistaWeb On
+        lblCIRN.Width := 43;
+        lblCIRNData.Width := 43;
+        lblCIRNData.Alignment := taCenter;
+        lblCIRN.Alignment := taCenter;
+        lblCIRN.Enabled     := True;
+        lblCIRNData.Enabled := True;
+        pnlCIRN.TabStop     := True;
+        if ColorToRGB(clWindowText) = ColorToRGB(clBlack) then
+          begin
+            lblCIRN.Font.Color  := clBlue;
+            lblCIRNData.Font.Color  := clBlue;
+            lblCIRNAvail.Font.Color := clBlue;
+            lstCIRNLocations.Font.Color  := clBlue;
+          end
+        else
+          begin
+            lblCIRN.Font.Color  := clWindowText;
+            lblCIRNData.Font.Color  := clWindowText;
+            lblCIRNAvail.Font.Color := clWindowText;
+            lstCIRNLocations.Font.Color  := clWindowText;
+          end;
       end;
-      aRule := TRule.Create;
-      with aRule do
-      begin
-        IEN := rulenum;
-        OriginalValue := ruleonoff;
-        ItemText := ruletext;
-      end;
-//    aListItem.SubItems.AddObject('rule object', aRule);  <-- original line.  //kt 8/8/2007
-      aListItem.SubItems.AddObject(DKLangConstW('fOptions_rule_object'), aRule); //kt added 8/8/2007
-    end;
-  end;
-  aListView.SortType := stBoth;
-  FuseCheckBoxes := true;
-end;
-
-procedure TfrmOptions.lvwNotificationsChange(Sender: TObject;
-  Item: TListItem; Change: TItemChange);
-// change on/off on checkmark
-begin
-  if (Sender as TListView).ItemIndex = -1 then exit;
-  if not FuseCheckBoxes then exit;
-  if (Sender as TListView).Checkboxes = false then exit;
-//if (Item.SubItems[1] = 'Mandatory') and not Item.Checked then begin  <-- original line.  //kt 8/8/2007
-  if (Item.SubItems[1] = DKLangConstW('fOptions_Mandatory')) and not Item.Checked then begin //kt added 8/8/2007
-    Item.Checked := True;
-    exit;
-  end;
-  if Item.Checked then
-  begin
-    if Item.SubItems[0] <> 'On' then
-      ChangeOnOff(Sender as TListView, Item);
-    Item.SubItems[0] := 'On';
-  end
-  else
-  begin
-//  if Item.SubItems[0] <> 'Off' then  <-- original line.  //kt 8/8/2007
-    if Item.SubItems[0] <> DKLangConstW('fOptions_Off') then //kt added 8/8/2007
-      ChangeOnOff(Sender as TListView, Item);
-//  Item.SubItems[0] := 'Off';  <-- original line.  //kt 8/8/2007
-    Item.SubItems[0] := DKLangConstW('fOptions_Off'); //kt added 8/8/2007
-  end;
-end;
-
-procedure TfrmOptions.lvwNotificationsColumnClick(Sender: TObject;
-  Column: TListColumn);
-// toggle sort
-begin
-  if FsortCol = Column.Index then
-    FsortAscending := not FsortAscending
-  else
-    FsortAscending := true;
-  FsortCol := Column.Index;
-  (Sender as TListView).AlphaSort;
-end;
-
-procedure TfrmOptions.lvwNotificationsCompare(Sender: TObject; Item1,
-  Item2: TListItem; Data: Integer; var Compare: Integer);
-//  sort columns
-begin
-  if not(Sender is TListView) then exit;
-  if FsortAscending then
-  begin
-    if FsortCol = 0 then
-      Compare := CompareStr(Item1.Caption, Item2.Caption)
-    else
-      Compare := CompareStr(Item1.SubItems[FsortCol - 1],
-        Item2.SubItems[FsortCol - 1]);
-  end
-  else
-  begin
-    if FsortCol = 0 then
-      Compare := CompareStr(Item2.Caption, Item1.Caption)
-    else
-      Compare := CompareStr(Item2.SubItems[FsortCol - 1],
-        Item1.SubItems[FsortCol - 1]);
-  end;
-end;
-
-procedure TfrmOptions.lvwNotificationsDblClick(Sender: TObject);
-// toggle check marks with double click
-var
-  aListItem: TListItem;
-begin
-  with (Sender as TListView) do
-  begin
-    if Checkboxes = false then exit;
-    if Selected = nil then exit;
-//  if Selected.SubItems[1] = 'Mandatory' then exit;  <-- original line.  //kt 8/8/2007
-    if Selected.SubItems[1] = DKLangConstW('fOptions_Mandatory') then exit; //kt added 8/8/2007
-    if Selected <> FLastClickedItem then exit;
-    aListItem := Selected;
-    aListItem.Checked := not aListItem.Checked;
-    ChangeOnOff(Sender as TListView, aListItem);
-
-    if aListItem.Checked then
-      aListItem.SubItems[0] := 'On'
-    else
-//    aListItem.SubItems[0] := 'Off';  <-- original line.  //kt 8/8/2007
-      aListItem.SubItems[0] := DKLangConstW('fOptions_Off'); //kt added 8/8/2007
-  end;
-end;
-
-procedure TfrmOptions.ChangeOnOff(aListView: TListView; aListItem: TListItem);
-// check if list items were edited
-begin
-  if aListView = lvwNotifications then FdirtyNotifications := true;
-  if aListView = lvwOrderChecks then FdirtyOrderChecks := true;
-  CheckApply;
-end;
-
-procedure TfrmOptions.btnSurrogateClick(Sender: TObject);
-// display Surrogate Options
-var
-  topsize, leftsize: integer;
-  surrogateinfo: string;
-begin
-  surrogateinfo := btnSurrogate.Hint;
-  Offset(topsize, -30, leftsize, -30);
-  DialogOptionsSurrogate(topsize, leftsize, Font.Size, surrogateinfo);
-  LabelSurrogate(surrogateinfo, lblNotificationsSurrogateText);
-  btnSurrogate.Hint := surrogateinfo;
-end;
-
-procedure TfrmOptions.btnCombinationsClick(Sender: TObject);
-// display Combination List Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsCombinations(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnNotesNotesClick(Sender: TObject);
-// display Notes Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsNotes(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnNotesTitlesClick(Sender: TObject);
-// display Titles Options
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsTitles(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnReportsClick(Sender: TObject);
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, 90, leftsize, 23);
-  DialogOptionsHSDefault(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.btnReport1Click(Sender: TObject);
-var
-  topsize, leftsize, value: integer;
-begin
-  value := 0;
-  Offset(topsize, -18, leftsize, -15);
-  DialogOptionsHSCustom(topsize, leftsize, Font.Size, value);
-end;
-
-procedure TfrmOptions.lvwNotificationsEnter(Sender: TObject);
-begin
-  with Sender as TListView do begin
-    if (Selected = nil) and (Items.Count > 0) then
-      Selected := Items[0];
-  end;
-end;
-
-procedure TfrmOptions.lvwNotificationsMouseDown(Sender: TObject;
-  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
-begin
-  FLastClickedItem := (Sender as TListView).GetItemAt(X,Y);
-end;
-
-procedure TfrmOptions.btnDiagnosesClick(Sender: TObject);
-// display Personal Diagnoses List
-var
-  topsize, leftsize, value: integer;
-begin
-  if IsCIDCProvider(User.DUZ) then    //(hds7564)
-  begin
-     value := 0;
-     Offset(topsize, -60, leftsize, -60);
-     DialogOptionsDiagnoses(topsize, leftsize, Font.Size, value);
-  end;
-end;
-
-procedure TfrmOptions.btnGraphSettingsClick(Sender: TObject);
-// display GraphSettings
-var
-  actiontype: boolean;
-  topsize, leftsize: integer;
-begin
-  actiontype := false;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsGraphSettings(topsize, leftsize, Font.Size, actiontype);
-end;
-
-procedure TfrmOptions.btnGraphViewsClick(Sender: TObject);
-// display Graph Views
-var
-  actiontype: boolean;
-  topsize, leftsize: integer;
-begin
-  actiontype := false;
-  Offset(topsize, -60, leftsize, -60);
-  DialogOptionsGraphProfiles(topsize, leftsize, Font.Size, actiontype);
-end;
-
-procedure TfrmOptions.rdoRDVClick(Sender: TObject);
-var
-  iIndex: integer;
-begin
-  iIndex := rdoRDV.ItemIndex;
-   with frmFrame do
-   if iIndex = 0 then
+
+  end;
+
+  procedure TfrmOptions.cbLanguageChange(Sender: TObject);  //kt added 6/29/07
+  var iIndex: Integer;
+  CPRSChartINI: TINIFile;
+  begin
+    iIndex := cbLanguage.ItemIndex;
+    if iIndex<0 then iIndex := 0; // When there's no valid selection in cbLanguage we use the default language (Index=0)
+    try
+      LangManager.LanguageID := LangManager.LanguageIDs[iIndex];
+    except
+      on EReadError do begin
+        //do nothing.  Ignore error.
+      end
+    end;
+    frmFrame.Caption := TX_IN_USE + MixedCase(User.Name) + '  (' + RPCBrokerV.Server + ')';  //kt added
+    frmFrame.RenameTabs;  //Resets names of tabs to correct translation  //kt
+    frmFrame.mnuFileRefreshClick(self); //elh 6/23/08
+    CPRSChartINI := TINIFile.Create(ExtractFilePath(ParamStr(0)) + 'CPRSChart.ini');  // Write to INI  elh  6/23/08
+    CPRSChartINI.WriteInteger('Options','Language',LangManager.LanguageID);
+    CPRSChartINI.Free;
+  end;
+
+  procedure TfrmOptions.Button1Click(Sender: TObject);
+  begin
+    MessageDlg('For a given language to be available, a *.lng (e.g. spanish.lng) '+
+               'must be in the same directory as CPRSchart.exe.  This *.lng file '+
+               'may be created at any time by users by working with the CPRSchart.dklng '+
+               'file with the free language editor found at:  '+
+               'http://www.dk-soft.org/products/dklang/',mtInformation,[mbOK],0);
+  end;
+
+  procedure TfrmOptions.btnApplySkinClick(Sender: TObject);   //kt added
+  var fileS : String;
+  begin
+    {$IFDEF USE_SKINS}
+    fileS := '';
+    if lbSkins.ItemIndex > -1 then fileS := lbSkins.Items [lbSkins.ItemIndex];
+    frmFrame.CurrentSkinFile := 'TMG_Extra\Skins\' +fileS;
+    frmFrame.ActivateCurrentSkin;
+    {$ELSE}
+    MessageDlg('Use of skins has been disabled at compile time.',mtInformation,[mbOK],0);
+    {$ENDIF}
+  end;
+
+  procedure TfrmOptions.btnMoreSkinsClick(Sender: TObject);    //kt added
+  begin
+    ShellExecute (Handle, 'open', 'http://www2.wincustomize.com/Skins.aspx?LibID=12&view=1&sortby=9&sortdir=DESC&p=1&advanced=0&mode=1&u=0', nil, nil, SW_SHOWNORMAL);
+  end;
+
+  procedure TfrmOptions.FillSkinList;  //kt added
+  var
+    SRec : TSearchRec;
+    R : Integer;
+  begin
+    lbSkins.Items.Clear;
+    R := FindFirst (ExtractFilePath (Application.ExeName) + 'TMG_Extra\Skins\*.ipz', faAnyFile, SRec);
+    while R = 0 do
     begin
-      ChangeVistaWebParam('0');
-      lblCIRN.Caption := ' Remote';
-      lblCIRNData.Caption := 'Data';
-      lblCIRNAvail.Caption := '';
-      lblCIRN.Width := 43;
-      lblCIRNData.Width := 43;
-      lblCIRNData.Alignment := taCenter;
-      lblCIRN.Alignment := taCenter;
-      lstCIRNLocations.Clear;
-      SetUpCIRN;
-    end
-  else
-    begin
-      ChangeVistaWebParam('1');
-      lblCIRN.Caption := 'Remote';
-      lblCIRNData.Caption := 'Data*';  //VistaWeb On
-      lblCIRN.Width := 43;
-      lblCIRNData.Width := 43;
-      lblCIRNData.Alignment := taCenter;
-      lblCIRN.Alignment := taCenter;
-      lblCIRN.Enabled     := True;
-      lblCIRNData.Enabled := True;
-      pnlCIRN.TabStop     := True;
-      if ColorToRGB(clWindowText) = ColorToRGB(clBlack) then
-        begin
-          lblCIRN.Font.Color  := clBlue;
-          lblCIRNData.Font.Color  := clBlue;
-          lblCIRNAvail.Font.Color := clBlue;
-          lstCIRNLocations.Font.Color  := clBlue;
-        end
-      else
-        begin
-          lblCIRN.Font.Color  := clWindowText;
-          lblCIRNData.Font.Color  := clWindowText;
-          lblCIRNAvail.Font.Color := clWindowText;
-          lstCIRNLocations.Font.Color  := clWindowText;
-        end;
-    end;
-
-end;
-
-procedure TfrmOptions.cbLanguageChange(Sender: TObject);  //kt added 6/29/07
-var iIndex: Integer;
-CPRSChartINI: TINIFile;
-begin
-  iIndex := cbLanguage.ItemIndex;
-  if iIndex<0 then iIndex := 0; // When there's no valid selection in cbLanguage we use the default language (Index=0)
-  try
-    LangManager.LanguageID := LangManager.LanguageIDs[iIndex];
-  except
-    on EReadError do begin
-      //do nothing.  Ignore error.
-    end
-  end;
-  frmFrame.Caption := TX_IN_USE + MixedCase(User.Name) + '  (' + RPCBrokerV.Server + ')';  //kt added
-  frmFrame.RenameTabs;  //Resets names of tabs to correct translation  //kt
-  frmFrame.mnuFileRefreshClick(self); //elh 6/23/08
-  CPRSChartINI := TINIFile.Create(ExtractFilePath(ParamStr(0)) + 'CPRSChart.ini');  // Write to INI  elh  6/23/08
-  CPRSChartINI.WriteInteger('Options','Language',LangManager.LanguageID);
-  CPRSChartINI.Free;
-
-end;
-
-procedure TfrmOptions.Button1Click(Sender: TObject);
-begin
-  MessageDlg('For a given language to be available, a *.lng (e.g. spanish.lng) '+
-             'must be in the same directory as CPRSchart.exe.  This *.lng file '+
-             'may be created at any time by users by working with the CPRSchart.dklng '+
-             'file with the free language editor found at:  '+
-             'http://www.dk-soft.org/products/dklang/',mtInformation,[mbOK],0);
-end;
+      lbSkins.Items.Add (SRec.Name);
+      R := FindNext (SRec);
+    end;
+    lbSkins.Sorted := true;
+    lbSkins.ItemIndex := 0;
+  end;
+
+  procedure TfrmOptions.FormShow(Sender: TObject);  //kt added
+  begin
+    FillSkinList;
+  end;
+
+  procedure TfrmOptions.lbSkinsKeyPress(Sender: TObject; var Key: Char); //kt added
+  begin
+    if Key = #13 then btnApplySkinClick (Self);
+  end;
+
+  procedure TfrmOptions.btnDisableSkinClick(Sender: TObject); //kt added
+  begin
+    frmFrame.InactivateSkin;
+  end;
 
 end.

cprs/branches/tmg-cprs/CPRS-Chart/fFrame.pas

@@ -17 +17 @@
   OleCtrls, VERGENCECONTEXTORLib_TLB, ComObj, AppEvnts, inifiles,
   //kt mod 6/29/07 -----
+  {$IFDEF USE_SKINS}
+  ipSkinManager,//kt 9/7/08
+  {$ENDIF}
   fWebTab,
   DKLang, TntForms, TntStdCtrls, TntSystem, TntSysUtils;
@@ -369 +372 @@
   public
     EnduringPtSelSplitterPos: integer;
+    SkinAtStartup : boolean; //kt 9/8/08
+    CurrentSkinFile : string; //kt 9/8/08
+    {$IFDEF USE_SKINS}
+    SkinManager : TipSkinManager;
+    {$ENDIF}
+    procedure ActivateCurrentSkin; //kt 9/8/08
+    procedure InactivateSkin; //kt 9/8/08
     procedure SetBADxList;
-
     function PageIDToTab(PageID: Integer): Integer;
     procedure ShowHideChartTabMenus(AMenuItem: TMenuItem);
@@ -815 +824 @@
   if tempPosition > tpRight then tempPosition := tpBottom;
   fOptionsOther.SetTabPosition(tempPosition);
+  {$IFDEF USE_SKINS}
+  SkinManager := TipSkinManager.Create(self);
+  {$ENDIF}
+  SkinAtStartup := CPRSChartINI.ReadBool('Skin','Load At Startup',false);
+  CurrentSkinFile := CPRSChartINI.ReadString('Skin','Default Skin','TMG_Extra\Skins\ICQ_Longhorn_v.1.2.ipz');
+  if SkinAtStartup then ActivateCurrentSkin;
   //kt -- end mod --
 
@@ -986 +1001 @@
   CPRSChartINI.Free;  //kt added 8/8/08
 end;
+
+procedure TfrmFrame.ActivateCurrentSkin;
+begin
+  {$IFDEF USE_SKINS}
+  SkinManager.SkinFile := ExtractFilePath (Application.ExeName) + CurrentSkinFile;
+  if FileExists(SkinManager.SkinFile)=false then begin
+    SkinManager.SkinFile := '';
+  end;
+  if SkinManager.SkinFile <>'' then begin
+    try
+      SkinManager.Active := true;
+    except
+      on EInvalidOperation do begin
+        MessageDlg('Error Applying Skin.  Please try another.',mtInformation,[mbOK],0);
+      end;
+      else  begin
+        MessageDlg('Error Applying Skin.  Please try another.',mtInformation,[mbOK],0);
+      end;
+    end;
+  end else begin
+    SkinManager.Active := false;
+  end;
+  {$ENDIF}
+end;
+
+procedure TfrmFrame.InactivateSkin;
+begin
+  {$IFDEF USE_SKINS}
+  SkinManager.Active := false;
+  {$ENDIF}
+end;
+
 
 procedure TfrmFrame.RenameTabs;    //kt added entire function;