Про форму

[nik936ta]

Скиньте пожалуйста исходник с объяснениями как обрезать рисунок по форме. Пожалуйста???

[Juriev]

Такой примерчик поможет?
Изменяя все восемь или часть значений можно растягивать, уменьшать, обрезать

'form1.autoredraw=true

Private Sub Picture1_Click()
Picture1.Visible = False
Form1.PaintPicture Picture1.Picture, _
0, 0, Form1.ScaleWidth, Form1.ScaleHeight, _
0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight
End Sub

[A.A.Z.]

В этом примере помимо определения контуров рисунка есть еще и обрезание формы по нему.