Страница: 1 |
<p><img border="0" src="http://gifs.ru/clipart/animated/garfield-1.gif" width="100" height="140"></p> Господа, вопрос: Поставил на форму ImageBox, свойство Stretch = True При ресайзе формы: Private Sub Form_Resize() Image1.Width=Me.ScaleWidth Image1.Height=Me.ScaleHeight End Sub Так вот, при ресайзе картинка в ImageBox мигает. Как это убрать? Заранее благодарен!
Ни фига! Не получается Ян, понимаешь, мне нужен прозрачный контейнер для рисунка. Я пишу программу - альтернативу ACDSee. Да, кстати, при ресайзе формы рисунок становится в центре формы, и он мигает. Вот код: --------------------------------------------------- Private Sub Form_Resize() On Error GoTo err If Frame1.Visible = False Then 'фрейм - это панель инструментов. Image1.Visible = False 'пытаюсь избавится от миганий Image1.Left = (Me.ScaleWidth - Image1.Width) / 2 Image1.Top = (Me.ScaleHeight - Image1.Height) / 2 Frame1.Width = Me.ScaleWidth Image1.Visible = True Else Image1.Visible = False Image1.Left = (Me.ScaleWidth - Image1.Width) / 2 Image1.Top = (Me.ScaleHeight - Image1.Height + Frame1.Height) / 2 Frame1.Width = Me.ScaleWidth Image1.Visible = True End If err: Exit Sub End Sub Спасибо Ян, немного помог в другом! Страница: 1 |
Вопрос: ImageBox
Добавлено: 25.10.02 20:22
Автор вопроса: Mister U | Web-сайт:
Ответы
Всего ответов: 7
Номер ответа: 1
Автор ответа:
Slepoy
Вопросов: 6
Ответов: 22
Профиль | | #1
Добавлено: 25.10.02 22:31
Картинка мигает потому-что постоянно перерисовывается, избавься от отого, ну например сначала измени размер контейнера, а потом прорисуй картинку по координатам контейнера.
Номер ответа: 2
Автор ответа:
Mister U
ICQ: 809526
Вопросов: 49
Ответов: 63
Web-сайт:
Профиль | | #2
Добавлено: 25.10.02 22:58
Номер ответа: 3
Автор ответа:
Ян
ICQ: 816105
Вопросов: 38
Ответов: 198
Web-сайт:
Профиль | | #3
Добавлено: 25.10.02 23:10
Лучше используй PictureBox.
Номер ответа: 4
Автор ответа:
Mister U
ICQ: 809526
Вопросов: 49
Ответов: 63
Web-сайт:
Профиль | | #4
Добавлено: 26.10.02 13:13
Номер ответа: 5
Автор ответа:
Ян
ICQ: 816105
Вопросов: 38
Ответов: 198
Web-сайт:
Профиль | | #5
Добавлено: 27.10.02 00:34
Посмотри мой пример: http://yansoft.nm.ru/vb/samples/imgviewer.zip, может чем поможет
Номер ответа: 6
Автор ответа:
Ян
ICQ: 816105
Вопросов: 38
Ответов: 198
Web-сайт:
Профиль | | #6
Добавлено: 27.10.02 00:34
Посмотри мой пример: http://yansoft.nm.ru/vb/samples/imgviewer.zip, может чем поможет
Номер ответа: 7
Автор ответа:
Mister U
ICQ: 809526
Вопросов: 49
Ответов: 63
Web-сайт:
Профиль | | #7
Добавлено: 28.10.02 08:57