ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/design/IBDBReg.pas

Comparing ibx/trunk/design/IBDBReg.pas (file contents):
Revision 126 by tony, Mon Jan 22 16:21:31 2018 UTC vs.
Revision 143 by tony, Fri Feb 23 12:11:21 2018 UTC

#	Line 27 | Line 27
27		{    IBX For Lazarus (Firebird Express)                                  }
28		{    Contributor: Tony Whyman, MWA Software http://www.mwasoftware.co.uk }
29		{    Portions created by MWA Software are copyright McCallum Whyman      }
30	<	{    Associates Ltd 2011                                                 }
30	>	{    Associates Ltd 2011 - 2018                                               }
31		{************************************************************************}
32
33		unit IBDBReg;
#	Line 447 | Line 447 | begin
447		TIBBlockFormatOut,TIBCSVDataOut,TIBInsertStmtsOut]);
448		if FirebirdAPI.HasServiceAPI  then
449		RegisterComponents(IBPalette2, [TIBConfigService, TIBBackupService,
450	<	TIBRestoreService, TIBValidationService, TIBStatisticalService,
450	>	TIBRestoreService, TIBValidationService, TIBOnlineValidationService, TIBStatisticalService,
451		TIBLogService, TIBSecurityService, TIBServerProperties]);
452
453
#	Line 499 | Line 499 | begin
499		RegisterPropertyEditor(TypeInfo(string), TIBTreeView, 'TextField', TIBTreeViewFieldProperty);
500		RegisterPropertyEditor(TypeInfo(string), TIBTreeView, 'ParentField', TIBTreeViewFieldProperty);
501		RegisterPropertyEditor(TypeInfo(string), TIBTreeView, 'HasChildField', TIBTreeViewFieldProperty);
502	+	RegisterPropertyEditor(TypeInfo(string), TIBTreeView, 'ImageIndexField', TIBTreeViewFieldProperty);
503	+	RegisterPropertyEditor(TypeInfo(string), TIBTreeView, 'SelectedIndexField', TIBTreeViewFieldProperty);
504
505		IBGUIInterface :=  TIBDSLCLInterface.Create;
506		end;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines