ClearImage COM Server Send comments on this topic.
DeleteLines Method
See Also  Example
Direction
bRepair

Description

Delete lines and reconnect intersected objects

Syntax

Visual Basic
Public Sub DeleteLines( _
   ByVal Direction As ELineDirection, _
   Optional ByVal bRepair As EBoolean = ciTrue _
)

Parameters

Direction
ValueDescription
ciLineUnknownUnknown
ciLineVertVertical lines
ciLineHorzHorizontal lines
ciLineVertAndHorzBoth vertical and horizontal lines
bRepair
ValueDescription
ciFalseValue is false (0)
ciTrueValue is true (-1)

Example

VB Example (Visual Basic)Copy Code
Public Sub T_DeleteHorzLines(ByRef Rep As CiRepair)
  Rep.pLineCurvature = ciCurvHigh
  Rep.pMaxLineAngle = 5
  Rep.pMaxLineGap = 5
  Rep.pMinLineLength = 200
  Rep.DeleteLines ciLineHorz, ciFalse
End Sub

Public Sub T_DeleteAndRepairLines(ByRef Rep As CiRepair)
  Rep.pLineCurvature = ciCurvHigh
  Rep.pMaxLineAngle = 5
  Rep.pMaxLineGap = 5
  Rep.pMinLineLength = 200
  Rep.DeleteLines ciLineVertAndHorz, ciTrue
End Sub

See Also