Region: Is there a way to set the weight of the line (shape) around a region.

rbuser

For a TppLine object, I can set
ppLine.Weight := dWeight;

Is there an equivalent for a TppRegion?

I need to make my lines and the box around a region match

Thanks

digitalmetaphors

The region is drawn on the page with a TppDrawShape draw command object. You
can hook into the region's OnDrawCommandCreate event. Then get a handle to
the region's draw command. Type cast it as a TppDrawShape and change its Pen
property.

procedure TForm1.ppRegion1DrawCommandCreate(Sender, aDrawCommand: TObject);
var
lDrawRegion: TppDrawShape;
begin

lDrawRegion := TppDrawShape(aDrawCommand);

lDrawRegion.Pen.Width := 10;
lDrawRegion.Pen.Color := clRed;

end;



Cheers,

Jim Bennett
Digital Metaphors