jvcllaz: Add JvDBSearchEdit (incl demo)

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

components/jvcllaz/design/JvDB/JvDBReg.pas

@@ -5,7 +5,7 @@ unit JvDBReg;
 interface
 
 uses
-  SysUtils;
+  SysUtils, PropEdits, DBPropEdits;
 
 procedure Register;
 
@@ -14,14 +14,38 @@ implementation
 {$R ../../resource/jvdbreg.res}
 
 uses
-  Classes, JvDsgnConsts, JvDBHTLabel;
+  Classes, JvDsgnConsts, JvDBSearchEdit, JvDBHTLabel; //, JvDBTreeView;
 
 procedure Register;
+const
+//  cDataField = 'DataField';
+//  cKeyField = 'KeyField';
+//  cListField = 'ListField';
+//  cDisplayField = 'DisplayField';
+//  cListKeyField = 'ListKeyField';
+  cMasterField = 'MasterField';
+  cDetailField = 'DetailField';
+  cIconField = 'IconField';
+  cItemField = 'ItemField';
+//  cLookupField = 'LookupField';
+// cSectionField = 'SectionField';
+//  cValueField = 'ValueField';
+//  cEditControls = 'EditControls';
+//  cSortedField = 'SortedField';
+//  cSortMarker = 'SortMarker';
+
 begin
-  RegisterComponents(RsPaletteJvclDB, [
+  RegisterComponents(RsPaletteJvclDB, [     // was: TsPaletteDBVisual
+    TJvDBSearchEdit,
     TJvDBHtLabel
+  //  TJvDBTreeView
   ]);
-  //RegisterComponents(RsPaletteDBVisual, [TJvDBHTLabel]);
+                (*
+  RegisterPropertyEditor(TypeInfo(string), TJvDBTreeView, cItemField, TFieldProperty); //TJvDataFieldProperty);
+  RegisterPropertyEditor(TypeInfo(string), TJvDBTreeView, cMasterField, TFieldProperty); //TJvDataFieldProperty);
+  RegisterPropertyEditor(TypeInfo(string), TJvDBTreeView, cDetailField, TFieldProperty); //TJvDataFieldProperty);
+  RegisterPropertyEditor(TypeInfo(string), TJvDBTreeView, cIconField, TFieldProperty); //TJvDataFieldProperty);
+  *)
 end;
 
 end.

components/jvcllaz/design/JvDB/images/images.txt

@@ -1 +1,4 @@
 tjvdbhtlabel.bmp
+tjvdbsearchcombobox.bmp
+tjvdbsearchedit.bmp
+tjvdbtreeview.bmp