| Вопрос: Помогите с поворотом изображения | Добавлено: 09.03.06 08:17 |
Автор вопроса:  Игорь | Web-сайт: shop-ec.com
|
| Как повернуть изображения(на 90 градусов) в элементах PictureBox,Image |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа: [root] Вопросов: 45 Ответов: 1212 |
Web-сайт: Профиль | | #1 | Добавлено: 09.03.06 09:12 |
|
Option Explicit
Private Sub Command1_Click() ' нормальное копирование Picture2.Cls Picture2.PaintPicture Picture1.Picture, 0, 0, _ Picture1.Width, Picture1.Height, 0, 0, _ Picture1.Width, Picture1.Height, vbSrcCopy End Sub Private Sub Command2_Click() 'поворот по горизонтали Picture2.Cls Picture2.PaintPicture Picture1.Picture, 0, 0, _ Picture1.Width, Picture1.Height, Picture1.Width, _ 0, -Picture1.Width, Picture1.Height, vbSrcCopy End Sub Private Sub Command3_Click() ' поворот по вертикали Picture2.Cls Picture2.PaintPicture Picture1.Picture, 0, 0, _ Picture1.Width, Picture1.Height, 0, Picture1.Height, _ Picture1.Width, -Picture1.Height, vbSrcCopy End Sub Private Sub Command4_Click() 'поворот по горизонтали и вертикали Picture2.Cls Picture2.PaintPicture Picture1.Picture, 0, 0, _ Picture1.Width, Picture1.Height, Picture1.Width, _ Picture1.Height, -Picture1.Width, -Picture1.Height, vbSrcCopy End Sub |
||
|
Номер ответа: 2 Автор ответа:  Страшный Сон Вопросов: 46 Ответов: 848 |
Профиль | | #2 | Добавлено: 09.03.06 16:32 |
| Вообще-то спрашивалось про поворот на 90 градусов. | ||
|
Номер ответа: 3 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #3 | Добавлено: 09.03.06 20:40 |
| Опять-таки vbaccelerator.com - FOREVER | ||
Страница: 1 |