Eli pientä kuvankäsittely ohjelmaa olisin väkräämässä VB6:lla ja kysymys kuuluu: Miten voin käydä epäsymmetrisen alueen läpi pixeli kerrallaan? Kaikkien kulmien kordinaatit annetaan PointApi taulukossa siis:
Private Type PointApi X As Integer Y As Integer End Type Dim Piste() As PointApi Sub Alueen_Tarkistus() 'Annetaan pisteiden kordinaatit Piste(0).X = 18: Piste(0).Y = 19 Piste(1).X = 37: Piste(1).Y = 43 Piste(2).X = 23: Piste(2).Y = 65 Piste(3).X = 81: Piste(3).Y = 66 Piste(4).X = 72: Piste(4).Y = 15 'Alueen läpikäyminen, mutta miten se tehdään! End Sub
En tiedä ihan suoraa vastausta, mutta jos itse yrittäisin tuota, niin varmaankin lähtisin ensin jakamaan aluetta kolmioiksi, ja sitten kävisin läpi kolmiot yksi kerrallaan.
Aihe on jo aika vanha, joten et voi enää vastata siihen.