User (Legacy) Posted July 14, 2003 Report Share Posted July 14, 2003 I'd like to draw Series Legend on Other Place. But I can't get Brush Info only When Schema is 'BW Pattern' or 'Color Pattern'. How can I get All of Brush Information ?? procedure ChartFX1PrePaintMarker(Sender: TObject; nSerie: Smallint; nPoint: Integer; var nRes: Smallint); var hDeviceC, hOldBrush : HDC; nHBrush :HBRUSH; nLogBrush: TLOGBRUSH; begin inherited; hDeviceC := ChartFX1.PaintInfo(CPI_GETDC); hOldBrush := SelectObject(hDeviceC, GetStockObject(NULL_BRUSH)); GetObject(hOldBrush, SizeOf(nLogBrush), @nLogBrush ); if HBRUSHArray[nSerie] <> 0 then DeleteObject(HBRUSHArray[nSerie]); HBRUSHArray[nSerie] := CreateBrushIndirect( nLogBrush ); SelectObject(hDeviceC, hOldBrush); end; Quote Link to comment Share on other sites More sharing options...
Software FX Posted July 15, 2003 Report Share Posted July 15, 2003 Sorry but this type of low-level information is not exposed. -- FP Software FX, Inc. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.