27/04/08 9:59
GrG
Ciao a tutti!
Ho 2 picturebox(picture1 e picture2) con il seguente codice:
Con questo codice riesco a mettere l'imagine della picture2 in un qualsiasi punto ke voglio nella picture1. Fino a qui nn ci sono problemi...Solo ke ho dei problemi a salvare l'immagine ottenuta...
Io uso:
Solo ke l'immagine salvata è tutta bianca!
perchè? come posso rimediare?
Grazie a coloro ke risponderanno...(se ce n'è qualkuno )
Ho 2 picturebox(picture1 e picture2) con il seguente codice:
Dim PosizioneX as single Dim PosizioneY as single Private Sub picture1_DblClick() If Option1 = True Then Picture1.PaintPicture Picture2.Picture, PosizioneX, PosizioneY End If End Sub Private Sub picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) PosizioneX = X PosizioneY = Y Label1.Caption = "X: " & PosizioneX & " " & "Y: " & PosizioneY End Sub
Con questo codice riesco a mettere l'imagine della picture2 in un qualsiasi punto ke voglio nella picture1. Fino a qui nn ci sono problemi...Solo ke ho dei problemi a salvare l'immagine ottenuta...
Io uso:
Private Sub Command1_Click() SavePicture Picture1.Image, "C:\Screen.jpg" End Sub
Solo ke l'immagine salvata è tutta bianca!
perchè? come posso rimediare?
Grazie a coloro ke risponderanno...(se ce n'è qualkuno )
Ultima modifica effettuata da GrG 27/04/08 10:00
aaa