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

FIX: Shift+Drag icon from main toolbar to middle toolbar error (fixes #1403)

Browse source 
(cherry picked from commit 50e61222c3)
This commit is contained in:
Alexander Koblov 2023-12-20 18:19:10 +03:00
commit 950623ee14
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/fmain.pas
View file

@ -1606,6 +1606,11 @@ begin
FreeAndNil(aFile);
end;
end;
if (Source is TKASToolButton) and (Toolbar <> TKASToolButton(Source).ToolBar) then
begin
Accept := False;
Exit;
end;
if (NumberOfMoveButton <> (Sender as TSpeedButton).Tag) then
begin
Draging := True;