Resource Allocation Chart FAQ 27

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;