How to highlight selected allocations.
This example uses the allocation's Selected property, but you could use any criteria to choose the pen and brush to use to display each allocation.
procedure TForm1.RACAllocationDraw(Sender: TObject; Resource: TssResource; Allocation: TssResourceAllocation; Pen: TPen; Brush: TBrush); begin if Allocation.Selected then begin Pen.Color := clRed; Pen.Width := 2; // or draw selected allocations using a bitmap brush // Brush.Bitmap := FSelectedBitmap; end; end;
- Screen Shots
- FAQ & Getting Started
- User Comments
- Support Forum
- Change History
|What People Say|
This is a great component. I've been using it for a year. It's well written, performance is top notch, and the couple of time I've asked for support, I've gotten it right away from the author.