вопросы про picturebox

[BOO]

Из-за чего у меня порой в моей программе очищается picturebox, например я дабовляю в него другой объект(в сам picturebox),а картинка pictureboxa исчезает?

Да че такое autoredraw?
Если это эвто перерисовка можно ли сменить интервал в нем?

[Ducis]

autoredraw работает без интервалов
Это св-во характеризует способность Picture Box-а сохранять изображение в контексте (кажется так называется) при потере формой фокуса. Т.е., например ты рисуешь в п.боксе что-либо, что бы оно сохранилось при потере формой фокуса надо сделать autoredraw=true. А если ты загружаешь в п.бокс другое изображение, то предыдущее ес-но удалится. При наложении изображений друг на друга надо использовать ф-ции копирования изображений.

[BOO]

Спасибо теперь я разобрался с этим но тут еще пара свойств которые не описываются ни в книгах ни в FAQах:
hds-непойму че это такое и как его узнать у image

[Ducis]

Picture1.hDC

Дескриптор контекста устройства,на котором будет что-либо происходить

Дескриптор
Уникальное целое число, которое присваивается объекту под Windows. Дескрипторы могут идентифицировать большинство видов объекта, включая ключи системного реестра, файлы, блоки памяти, окна.

Контекст устройства
В Windows поверхность, на которой вы рисуете, называется контекстом устройства. Доступ к нему обеспечивает дескриптор hDC. Получив дескриптор контекста устройства, можно вызывать API-функции для вывода графики(точки, линии, окружности, текст).

У Image на прямую узнать дескриптор нельзя, просто он не предназначен для рисования. Нужно через API.

[BOO]

вот еще одно можноли сделать(если можно то как чтобы) перематывать содержимое picturebox спомощью скролов, заранее благодарю

[Ducis]

Самое быстрое и простое средство:
Помести на форму два picturebox-а. Первый большой (pic1) с образцом рисунка второй меньше (picTwo) в котором будет прокручиваться картинка. В этом примере picTwo должен быть меньше pic1 по высоте и ширине. Возле picTwo установи два скрола - вертикальный (vcb1) и горизонтальный (hsb1).
А вот код модуля формы:

Option Explicit

Private Sub Form_Load()
hsb1.Max = pic1.ScaleWidth - picTwo.ScaleWidth
hsb1.LargeChange = hsb1.Max \ 10
hsb1.SmallChange = hsb1.Max \ 25
vcb1.Max = pic1.ScaleHeight - picTwo.ScaleHeight
vcb1.LargeChange = vcb1.Max \ 10
vcb1.SmallChange = vcb1.Max \ 25
picTwo.Picture = pic1.Picture
End Sub

Private Sub hsb1_Change()
UpdatePicTwo
End Sub

Private Sub hsb1_Scroll()
hsb1_Change
End Sub

Private Sub vcb1_Change()
UpdatePicTwo
End Sub

Private Sub vcb1_Scroll()
vcb1_Change
End Sub

Private Sub UpdatePicTwo()
On Error Resume Next
picTwo.Picture = LoadPicture("")
picTwo.PaintPicture pic1.Picture, 0, 0, _
picTwo.ScaleWidth, picTwo.ScaleHeight, _
hsb1.Value, vcb1.Value, _
picTwo.ScaleWidth, picTwo.ScaleHeight, _
vbSrcCopy
End Sub

[BOO]

Спасибо за ответ!