[fpc-devel] fcl-image lacking brush and pen?

Felipe Monteiro de Carvalho felipemonteiro.carvalho at gmail.com
Thu Nov 4 18:00:04 CET 2010


Hello,

Aha, now it works! =D

The default style is bsClear, just changing to bsSolid works.
(although the default should probably be bsSolid)

procedure TCDGroupBoxDrawerWinCE.DrawToIntfImage(ADest: TFPImageCanvas;
  CDGroupBox: TCDGroupBox);
begin
  ADest.Brush.FPColor := colRed;
  ADest.Brush.Style:=bsSolid;
  ADest.Rectangle(0, 0, CDGroupBox.Width, CDGroupBox.height);
end;

No idea how it works exactly, probably it only uses the brush
functions if it isn't the trivial case: bsSolid

I've been having issues with the debugger, so I couldn't properly step into ...

Very good that 2.4.2 rc2 is being built by the way =) The broken
generics in rc1 made it problematic =(

thanks,
-- 
Felipe Monteiro de Carvalho



More information about the fpc-devel mailing list