DrawEdgePath

procedure DrawEdgePath(img: TImage32; const path: TPathD; topLeftColor, bottomRightColor: TColor32; penWidth: double = 1.0);