From 100954c7a4f1c9bb79daa90f58a439834c5ad2d6 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Wed, 25 Apr 2018 07:47:38 +0000 Subject: [PATCH] jvcllaz: Cosmetic changes in TJvOutlookBar component/property editor unit git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6353 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- .../JvCustomControls/JvOutlookBarEditors.pas | 20 +++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/components/jvcllaz/design/JvCustomControls/JvOutlookBarEditors.pas b/components/jvcllaz/design/JvCustomControls/JvOutlookBarEditors.pas index 6de4e9503..b9ca998b1 100644 --- a/components/jvcllaz/design/JvCustomControls/JvOutlookBarEditors.pas +++ b/components/jvcllaz/design/JvCustomControls/JvOutlookBarEditors.pas @@ -51,16 +51,6 @@ type procedure SetValue(const Value: string); override; end; - TJvOutlookBarEditor = class(TComponentEditor) - protected - function GetOutlookBar: TJvCustomOutlookBar; - procedure OpenEditor; - public - procedure ExecuteVerb(Index: Integer); override; - function GetVerb(Index: Integer): string; override; - function GetVerbCount: Integer; override; - end; - TJvOutlookBarPagesProperty = class(TPropertyEditor) private function GetOutlookBar: TJvCustomOutlookBar; @@ -83,6 +73,16 @@ type function GetImageList: TCustomImageList; override; end; + TJvOutlookBarEditor = class(TComponentEditor) + protected + function GetOutlookBar: TJvCustomOutlookBar; + procedure OpenEditor; + public + procedure ExecuteVerb(Index: Integer); override; + function GetVerb(Index: Integer): string; override; + function GetVerbCount: Integer; override; + end; + implementation