Aleksandar Ružičić: recimo, prvo sto mi bode oci to je ona For petlja u DrawRectangle proceduri, koja moze ovako da se napise:
Code:
Private Sub DrawRectangle(aPictureBox As PictureBox, Rec As Rectangle)
aPictureBox.Cls
aPictureBox.DrawWidth = Rec.Width
aPictureBox.Line (Rec.x, Rec.y)-(Rec.x, Rec.y + Rec.Height)
End Sub
sto je mnogo brze (nema petlje, i nema dodatne promenljive)
ostalo sto bih menjao, bi izmenilo algoritam, a to si rekao da "ne moze" :D