Lazarus

Programming => LCL => Topic started by: jamie on June 06, 2018, 03:58:54 am

Title: TControlBar, duplicate CANVAS with BandPaint event
Post by: jamie on June 06, 2018, 03:58:54 am
The TControlBar.OnBandPaint when created via the OI generates a definition that can't be compiled.
Code: Pascal  [Select]
  1.     procedure ControlBar1BandPaint(Sender: TObject; Control: TControl;
  2.       Canvas: TCanvas; var ARect: TRect; var Options: TBandPaintOptions);
  3.     // ^^^^^
  4.  

If I rename "CANVAS" to aCANVAS then it compiles otherwise it complains about the duplicate "CANVAS" found in
CONTROLS unit..

This is with 1.8.4-Laz Windows 10-64bit
Title: Re: TControlBar, duplicate CANVAS with BandPaint event
Post by: wp on June 06, 2018, 07:05:49 am
Fixed in Laz trunk r58149 (will be backported to Laz 1.8.6)