diff --git a/src/ce_miniexplorer.lfm b/src/ce_miniexplorer.lfm index f18d21a0..1f63fef3 100644 --- a/src/ce_miniexplorer.lfm +++ b/src/ce_miniexplorer.lfm @@ -180,11 +180,11 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget Top = 2 Width = 329 ButtonWidth = 23 - NumGlyphs = 1 Flat = True Align = alClient BorderSpacing.Left = 180 BorderSpacing.Around = 2 + NumGlyphs = 1 MaxLength = 0 TabOrder = 0 OnButtonClick = lstFilterButtonClick diff --git a/src/ce_miniexplorer.pas b/src/ce_miniexplorer.pas index 365b9b58..b8bebe6a 100644 --- a/src/ce_miniexplorer.pas +++ b/src/ce_miniexplorer.pas @@ -704,7 +704,10 @@ var begin p := treeFolders.Root.extractFileDir; if p.dirExists then + begin treeFolders.Root := p; + subjMnexDirectoryChanged(fMnxSubj, p); + end; end; procedure TCEMiniExplorerWidget.lstFilesDblClick(Sender: TObject);