Kirjautuminen
Tehtävät
Kilpailu
4. kierros:
7.11. klo 18 – 9.11. klo 23
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 SubEn 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.