Results 1 to 24 of 24

Thread: Draw region and fill the closed regions with a color

Threaded View

  1. #1

    Thread Starter
    Lively Member
    Join Date
    May 2006
    Posts
    120

    Draw region and fill the closed regions with a color

    Code:
    Private Sub Form_Load()
        Me.Font.Bold = True
            With Picture1
            .ScaleMode = 3
            .AutoRedraw = True
            .ScaleLeft = 99.7
            .ScaleWidth = 101.46667 - 99.7
            .ScaleTop = 4.0166694
            .ScaleHeight = 2.85667 - 4.0166694
        End With
    End Sub
    i have set the picture1 with the scale above. Now, i need to draw region using the coordinates from the "testDepthArea.txt".

    format "testDepthArea.txt" is like below:
    START 42, L, 87=2;88=5
    101.28147000 3.20742000
    101.27951000 3.20788000
    101.27933000 3.20833000
    101.27951000 3.20865000
    101.28088000 3.20978000
    101.28121000 3.21074000
    STOP
    START 42, A, 87=5;88=10
    101.28147000 3.20742000
    101.27951000 3.20788000
    101.27933000 3.20833000
    101.27951000 3.20865000
    101.28088000 3.20978000
    101.28121000 3.21074000
    101.28121000 3.21074000
    101.28147000 3.20742000
    STOP

    i want use the coordinates between the "Start line" and "Stop line" to create a region, then the color to fill the region is refer to the value after 87=XX
    maybe need to set the color first.
    for example
    set 87=5 ----->5 as red
    set 87=2------>2 as yellow
    Attached Files Attached Files

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width