You must create an instance of TFPCustomDrawBrush and assign it to the canvas.
Same with pen. Michael. On Thu, 4 Nov 2010, Felipe Monteiro de Carvalho wrote:
Hello, It is just me or is a brush and pen implementation for pixel canvas missing? The standard brush does nothing: function TFPPixelCanvas.DoCreateDefaultBrush : TFPCustomBrush; begin result := TFPEmptyBrush.Create; with result do begin Style := bsClear; end; end; And I couldn't find any class descending from TFPCustomDrawBrush which implements a pixel brush. The final issue that I am trying to solve is that this paints nothing: procedure TCDGroupBoxDrawerWinCE.DrawToIntfImage(ADest: TFPImageCanvas; CDGroupBox: TCDGroupBox); begin ADest.Brush.FPColor := colRed; ADest.Rectangle(0, 0, CDGroupBox.Width, CDGroupBox.height); end; thanks, -- Felipe Monteiro de Carvalho _______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
_______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
