You've already forked lazarus-ccr
jvcllaz: Add TJvDBTreeView (incl demo)
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6250 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@@ -15,7 +15,8 @@ implementation
|
||||
{$R ../../resource/jvdbreg.res}
|
||||
|
||||
uses
|
||||
Classes, JvDsgnConsts, {JvDBSearchCombobox,} JvDBSearchEdit, JvDBHTLabel; //, JvDBTreeView;
|
||||
Classes, JvDsgnConsts, //JvDBSearchCombobox,
|
||||
JvDBSearchEdit, JvDBTreeView, JvDBHTLabel;
|
||||
|
||||
procedure Register;
|
||||
const
|
||||
@@ -39,15 +40,14 @@ begin
|
||||
RegisterComponents(RsPaletteJvclDB, [ // was: TsPaletteDBVisual
|
||||
TJvDBSearchEdit,
|
||||
// TJvDBSearchCombobox,
|
||||
// TJvDBTreeView,
|
||||
TJvDBTreeView,
|
||||
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.
|
||||
|
Reference in New Issue
Block a user