mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Enter key behavior in search result list box

Browse source
This commit is contained in:
Alexander Koblov 2012-06-03 10:48:26 +00:00
commit e2f74ff291
1 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/fFindDlg.pas
View file

@ -4,7 +4,7 @@
Find dialog, with searching in thread
Copyright (C) 2003-2004 Radek Cervinka (radek.cervinka@centrum.cz)
Copyright (C) 2006-2010 Koblov Alexander (Alexx2000@mail.ru)
Copyright (C) 2006-2012 Koblov Alexander (Alexx2000@mail.ru)
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@ -897,6 +897,8 @@ var
NewPage: TFileViewPage;
FileView: TFileView;
begin
StopSearch;
FileList := TFileTree.Create;
for i := 0 to lsFoundedFiles.Items.Count - 1 do
begin
@ -1211,8 +1213,11 @@ begin
VK_RETURN:
begin
btnGoToPathClick(Sender);
Key := 0;
if not FSearchingActive then
begin
btnGoToPathClick(Sender);
Key := 0;
end;
end;
end;
end;