Мой Прогресс

[Mleha]

Писал свой прогресс и обнаружил такую интересную штуку: StretchBlt может разворачивать рисунки

Код: Выделить всё

StretchBlt hdc, p.Width, p.Height, -1 * p.Width, -1 * p.Height, p.hdc, 0, 0, p.Width, p.Height, vbSrcCopy
StretchBlt hdc, p.Width, p.Height, p.Width, -1 * p.Height, p.hdc, 0, 0, p.Width, p.Height, vbSrcCopy
StretchBlt hdc, p.Width * 3, 0, -1 * p.Width, p.Height, p.hdc, 0, 0, p.Width, p.Height, vbSrcCopy
StretchBlt hdc, p.Width * 3, 0, p.Width, p.Height, p.hdc, 0, 0, p.Width, p.Height, vbSrcCopy

p - PictureBox



протестите прогресс

[KDima]

Тема Квадра - отстой.
Кликаем по параму VЧёто выбираем горизонтальный... он прогресс становится вертикальным!

Теперь смотрим автоматически ли у тебя генерится фон... потом закрываем UserContol ой тема опять Kvadra!!!
Кстати в начале я забыл, что это прогресс и думал, что это кнопка...

[Mleha]

:)
Кстати в начале я забыл, что это прогресс и думал, что это кнопка...

Хорошая шутка
Кнопки каждый писал, хочется что то новое и свое.
Я для чего исходник выложил(если юзер заинтересуется, то чтоб под сябя заделал)
Если в OCX заделать то все должно быть нормально
А главное же RunTime

[KDima]

Гы!