kif писал(а):не знаю, что у тебя за работа с картинками. Я сталкивался с тем что классы или ocx для сохранения в jpg не освобождают память и через некоторое время программа занимает больше сотни метров. Проследи этот вариант.
kif писал(а):за savepicture я такого не замечал, а в jpg они же в основном самопальные (кто как мог так и написал)
tyomitch писал(а):SINED, на vbrussian.com в разделе "Контролы" таких кнопок навалом...
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = ImageList1.ListImages(3).Picture
End Sub
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = ImageList1.ListImages(2).Picture
End Sub
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = ImageList1.ListImages(2).Picture
End Sub
Private Sub Form_Load()
Command1.Picture = ImageList1.ListImages(1).Picture
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = ImageList1.ListImages(1).Picture
End Sub
Сейчас этот форум просматривают: Yandex-бот и гости: 195