setting TCanvas.Clipping/ClipRect does nothing
Original Reporter info from Mantis: BeniBela @benibela
-
Reporter name: Benito van der Zander
Description:
You can assign something to TCanvas.Clipping and ClipRect, but this has no effect.
A method like this should be added:
procedure TCanvas.SetClipRect(const AValue: TRect); //override;
begin
FClipRect:=AValue;
SelectClipRGN(Handle,0);
IntersectClipRect(Handle,FClipRect.Left,FClipRect.Top,FClipRect.Right,FClipRect.Bottom);
end;
Mantis conversion info:
-
Mantis ID: 13418
-
Build: r19033
-
Fixed in version: 0.9.27 (SVN)
-
Fixed in revision: 19687 (#76a007d9), 19742 (#6df88346), 20703 (#2bbd8ddb)
-
Monitored by: » bruce (Bruce Tulloch)
-
Target version: 0.9.28