jvcllaz: Add captions to SiM objects. New colors for SIMLight. New connector types for SIMConnector. Scale hard-coded sizes in SIM controls (not complete).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6244 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/jvcllaz/design/JvJans/images/images.txt

@@ -9,3 +9,8 @@ tjvsimbutton.bmp
 tjvsimreverse.bmp
 tjvsimlight.bmp
 tjvlogic.bmp
+tjvcsvbase.bmp
+tjvcsvcheckbox.bmp
+tjvcsvcombobox.bmp
+tjvcsvedit.bmp
+tjvcsvnavigator.bmp

components/jvcllaz/design/JvJans/jvjansreg.pas

@@ -16,6 +16,7 @@ implementation
 uses
   Classes, JvDsgnConsts,
   JvYearGrid,
+  //JvCSVData, JvCSVBaseControls, //JvCsvBaseEditor,
   JvSimScope, JvSimIndicator, JvSimPID, JvSimPIDLinker, JvSimLogic;
 
 procedure Register;
@@ -29,6 +30,16 @@ begin
     TJvSimScope, TJvSimIndicator, TJvSimPID,
     TJvSimPIDLinker, TJvSimConnector, TJvLogic, TJvSimButton, TJvSimLight,
     TJvSimLogicBox, TJvSimReverse]);
+                     (*
+  // CSV Components
+  RegisterComponents('Data Access', [TJvCSVDataset]);
+  RegisterComponents(RsPaletteJansCsv, [TJvCSVBase, TJvCSVEdit, TJvCSVComboBox,
+    TJvCSVCheckBox, TJvCSVNavigator]);
+//  RegisterPropertyEditor(TypeInfo(string), TJvCSVBase, cCSVFieldName, TJvCSVFileNameProperty);
+//  RegisterPropertyEditor(TypeInfo(string), TJvCSVEdit, cCSVField, TJvCSVFieldProperty);
+//  RegisterPropertyEditor(TypeInfo(string), TJvCSVComboBox, cCSVField, TJvCSVFieldProperty);
+//  RegisterPropertyEditor(TypeInfo(string), TJvCSVCheckBox, cCSVField, TJvCSVFieldProperty);
+*)
 
 end;
 

components/jvcllaz/run/JvCore/JvJCLUtils.pas

@@ -63,6 +63,7 @@ const
     // Note: the else is on purpose, VCL is not defined for a console application
 ******************** NOT CONVERTED *)
   NullHandle = 0;
+  USDecimalSeparator = '.';
 
 (******************** NOT CONVERTED
 {$IFDEF UNIX}