forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix #266 - Search widget not shown when tabbed and CTRL+F

This commit is contained in:
Basile Burg 2018-03-07 03:57:59 +01:00
parent 230562fdb4
commit d8b7e640ab
1 changed files with 1 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/ce_main.pas
View File

@ -2697,17 +2697,11 @@ begin
end; end;
procedure TCEMainForm.actEdFindExecute(Sender: TObject); procedure TCEMainForm.actEdFindExecute(Sender: TObject);
var
win: TAnchorDockHostSite;
str: string; str: string;
begin begin
if fDoc.isNil then if fDoc.isNil then
exit; exit;
win := DockMaster.GetAnchorSite(fFindWidg); fFindWidg.showWidget;
if win.isNil then
exit;
win.Show;
win.BringToFront;
if fDoc.SelAvail then if fDoc.SelAvail then
str := fDoc.SelText str := fDoc.SelText