MapWinGIS:AxMap ClearDrawing

This is a back-up of the WIKI.
Not all links might work
We're working on a new wiki.

Main Page | Recent changes | View source | Page history | Log in / create account |

Printable version | Disclaimers | Privacy policy

ClearDrawing

Clears all drawings on the drawing layer specified.


VB.NET Usage

Sub ClearDrawing(DrawHandle As Integer)

            Parameters

DrawHandle

Drawing handle of the drawing layer for which all drawings are to be cleared.

Sample Code

    Private Sub ClearDrawing()
        Dim draw_hndl As Integer
        'Create new drawing layer on map
        draw_hndl = Map1.NewDrawing(MapWinGIS.tkDrawReferenceList.dlScreenReferencedList)
        'Draw filled red circle at x = 100, y = 100, with radius 50
        Map1.DrawCircle(100, 100, 50, System.Convert.ToUInt32(RGB(255, 0, 0)), True)
        'Allow user to see circle before it is cleared
        MsgBox ("Circle drawn")
        'Clear drawing we just made above
        Map1.ClearDrawing(draw_hndl)
    End Sub
  

VB 6 Usage
Sub ClearDrawing(DrawHandle As Long)
            Parameters

DrawHandle

Drawing handle of the drawing layer for which all drawings are to be cleared.

Sample Code

    Private Sub ClearDrawing()
        Dim draw_hndl As Long
        Dim fill As Boolean
        Dim col As OLE_COLOR
        'Set color to be red
        col = RGB(255, 0, 0)
        'Set circle to be filled
        fill = True
        'Create new drawing layer on map
        draw_hndl = Map1.NewDrawing(dlSpatiallyReferencedList)
        'Draw filled red circle at x = 100, y = 100, with radius 50
        Map1.DrawCircle 100, 100, 50, col, True
        'Allow user to see circle before it is cleared
        MsgBox ("Circle drawn")
        'Clear drawing we just made above
        Map1.ClearDrawing (draw_hndl)
    End Sub

Retrieved from "http://mapwindow.org/wiki/index.php/MapWinGIS:AxMap_ClearDrawing"

This page has been accessed 2,231 times. This page was last modified on 9 November 2005, at 18:43.