Changeset 57

Timestamp:

Nov 16, 2012, 7:30:04 AM (12 years ago)

Author:

chronos

Message:

• Added: Test module for platform testing purpose.

Location:

trunk

Files:

• Application/URegistredModules.pas (modified) (2 diffs)
• ChronIS.lpi (modified) (3 diffs)
• ChronIS.lpr (modified) (2 diffs)
• Languages/ChronIS.cs.po (modified) (1 diff)
• Languages/ChronIS.po (modified) (1 diff)
• Modules/Test (added)
• Modules/Test/UModuleTest.lfm (added)
• Modules/Test/UModuleTest.pas (added)

trunk/Application/URegistredModules.pas

@@ -15 +15 @@
 
 uses
-  UModuleAttendance, UModuleChiyuAccessControlers;
+  UModuleAttendance, UModuleChiyuAccessControlers, UModuleTest;
 
 procedure RegisterModules(ModuleManager: TModuleManager);
@@ -23 +23 @@
   try
     Modules.BeginUpdate;
+    RegisterModule(TModuleTest.Create(nil));
     RegisterModule(TModuleAttendance.Create(nil));
     RegisterModule(TModuleChiyuAccessControlers.Create(nil));

trunk/ChronIS.lpi

@@ -106 +106 @@
       </Item8>
     </RequiredPackages>
-    <Units Count="16">
+    <Units Count="17">
       <Unit0>
         <Filename Value="ChronIS.lpr"/>
@@ -213 +213 @@
         <UnitName Value="UModuleChiyuAccessControlers"/>
       </Unit15>
+      <Unit16>
+        <Filename Value="Modules/Test/UModuleTest.pas"/>
+        <IsPartOfProject Value="True"/>
+        <ComponentName Value="DataModuleTest"/>
+        <ResourceBaseClass Value="DataModule"/>
+        <UnitName Value="UModuleTest"/>
+      </Unit16>
     </Units>
   </ProjectOptions>
@@ -222 +229 @@
     <SearchPaths>
       <IncludeFiles Value="$(ProjOutDir)"/>
-      <OtherUnitFiles Value="Forms;Application;Modules/Attendance;Modules/ChiyuAccessControlers"/>
+      <OtherUnitFiles Value="Forms;Application;Modules/Attendance;Modules/ChiyuAccessControlers;Modules/Test"/>
       <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>

trunk/ChronIS.lpr

@@ -12 +12 @@
   URegistredModules, TemplateGenerics, synapse, TEditExtensions,
   UFormConnection, UModuleAttendance, UDataModel, UFormVirtualTerminal,
-UAccessControler, UModuleChiyuAccessControlers;
+UAccessControler, UModuleChiyuAccessControlers, UModuleTest;
 
 {$R *.res}
@@ -35 +35 @@
   Application.CreateForm(TFormSetting, FormSetting);
   Application.CreateForm(TFormConnection, FormConnection);
+  Application.CreateForm(TDataModuleTest, DataModuleTest);
   Application.Run;
 end.

trunk/Languages/ChronIS.cs.po

@@ -542 +542 @@
 msgstr ""
 
+#: umoduletest.stest
+msgid "Test"
+msgstr ""
+
+#: umoduletest.stestdescription
+msgid "Test of various platform features during development"
+msgstr ""
+

trunk/Languages/ChronIS.po

@@ -520 +520 @@
 msgstr ""
 
+#: umoduletest.stest
+msgid "Test"
+msgstr ""
+
+#: umoduletest.stestdescription
+msgid "Test of various platform features during development"
+msgstr ""
+