diff --git a/src/ce_main.lfm b/src/ce_main.lfm index b97e3366..f662fcc2 100644 --- a/src/ce_main.lfm +++ b/src/ce_main.lfm @@ -2380,7 +2380,7 @@ object CEMainForm: TCEMainForm object ApplicationProperties1: TApplicationProperties OnActivate = ApplicationProperties1Activate OnException = ApplicationProperties1Exception - left = 72 + left = 64 top = 1 end end diff --git a/src/ce_main.pas b/src/ce_main.pas index cc0c5323..16f1b1d9 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -2500,8 +2500,8 @@ procedure TCEMainForm.actProjOpenContFoldExecute(Sender: TObject); begin if not assigned(fProject) or not fProject.filename.fileExists then exit; - DockMaster.GetAnchorSite(fExplWidg).Show; getExplorer.browse(fProject.filename.extractFilePath); + fExplWidg.showWidget; end; procedure TCEMainForm.actFileNewExecute(Sender: TObject); @@ -3305,8 +3305,8 @@ procedure TCEMainForm.actFileOpenContFoldExecute(Sender: TObject); begin if fDoc.isNil or not fDoc.fileName.fileExists then exit; - DockMaster.GetAnchorSite(fExplWidg).Show; getExplorer.browse(fDoc.fileName.extractFilePath); + fExplWidg.showWidget; end; procedure TCEMainForm.actProjCompileExecute(Sender: TObject);