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: the issue with incorrect direction when drawing rectangles/ellipses in ViewerForm

Browse source
This commit is contained in:
rich2014 2026-05-18 18:19:08 +08:00
commit e7d8c81a34
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/fviewer.pas
View file

@ -1375,15 +1375,15 @@ begin
vptPen: LineTo (x,y);
vptRectangle, vptEllipse:
begin
if (startX>x) and (startY<y) then
if (UndoSX>UndoEX) and (UndoSY<UndoEY) then
CopyRect( Rect(UndoEX-tmp,UndoSY-tmp,UndoSX+tmp,UndoEY+tmp),
tmp_all.canvas,
Rect(UndoEX-tmp,UndoSY-tmp,UndoSX+tmp,UndoEY+tmp) )
else if (startX<x) and (startY>y) then
else if (UndoSX<UndoEX) and (UndoSY>UndoEY) then
CopyRect( Rect(UndoSX-tmp,UndoEY-tmp,UndoEX+tmp,UndoSY+tmp),
tmp_all.canvas,
Rect(UndoSX-tmp,UndoEY-tmp,UndoEX+tmp,UndoSY+tmp) )
else if (startX>x) and (startY>y) then
else if (UndoSX>UndoEX) and (UndoSY>UndoEY) then
CopyRect( Rect(UndoEX-tmp,UndoEY-tmp,UndoSX+tmp,UndoSY+tmp),
tmp_all.canvas,
Rect(UndoEX-tmp,UndoEY-tmp,UndoSX+tmp,UndoSY+tmp) )