pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Minor cosmetic changes

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6364 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-05-01 10:29:50 +00:00
parent 499efd7b8c
commit dfea328594
2 changed files with 3 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/jvcllaz/design/JvCustomControls/jvoutlookbarform.lfm
View File

@ -51,12 +51,12 @@ object FrmOLBEditor: TFrmOLBEditor
Style = tbsDivider
end
object BtnUp: TToolButton
Left = 118
Left = 120
Top = 2
Action = AcMoveUp
end
object BtnDown: TToolButton
Left = 148
Left = 150
Top = 2
Action = AcMoveDown
end

12
components/jvcllaz/design/JvCustomControls/jvoutlookbarform.pas
View File

@ -154,16 +154,6 @@ begin
popNew.Images := AlActions.Images;
popForm.Images := AlActions.Images;
popToolbar.Images := AlActions.Images;
(*
if Assigned(GlobalDesignHook) then
begin
// GlobalDesignHook.AddHandlerComponentRenamed(@OnComponentRenamed);
GlobalDesignHook.AddHandlerPersistentDeleting(@OnPersistentDeleting);
GlobalDesignHook.AddHandlerGetSelection(@OnGetSelection);
GlobalDesignHook.AddHandlerSetSelection(@OnSetSelection);
GlobalDesignHook.AddHandlerPersistentAdded(@OnPersistentAdded);
end;
*)
end;
procedure TFrmOLBEditor.AcDeleteExecute(Sender: TObject);
@ -281,7 +271,7 @@ end;
procedure TFrmOLBEditor.AlActionsUpdate(AAction: TBasicAction; var Handled: Boolean);
var
Sel: Boolean;
Sel: Boolean;
begin
Sel := TvItems.Selected <> nil;
AcNewButton.Enabled := Sel;