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: simplify drawing Rectangle/Ellipse

Browse source
This commit is contained in:
rich2014 2026-05-18 22:24:43 +08:00
commit acf007f698
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

@ -1380,14 +1380,14 @@ begin
vptRectangle, vptEllipse:
begin
CopyRect( getUndoRect(tmp), tmp_all.canvas, getUndoRect(tmp) );
setUndoRect( StartX, StartY, X, Y );
case TViewerPaintTool(btnPenMode.Tag) of
vptRectangle: Rectangle(Rect(StartX,StartY,X,Y));
vptEllipse:Ellipse(StartX,StartY,X,Y);
vptRectangle: Rectangle( getUndoRect(0) );
vptEllipse:Ellipse( getUndoRect(0) );
end;
end;
end;
setUndoRect( StartX, StartY, X, Y );
end;
end;
if not (btnHightlight.Down) and not (btnPaint.Down) then