(VB6)
ciao a tutti
Con questo posso disegnare un numero di punti a piacere su una picture
e con con tasto destro li cancello.
----------
Private Sub Form_Load()
Picture1.DrawWidth = 10
Picture1.ForeColor = vbRed
End Sub
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Picture1.PSet (X, Y)
End If
End Sub
------------
questo va bene. Ma io volevo che i punti disegnati lampeggiassero.
Ho provato con
Private Sub Timer1_Timer()
picture1.pset.visible=Not picture1.pset.visible
End Sub
ma commetto errore.
qual'é la giusta sintassi?
grazie
melandro