| Вопрос: Изменение размера картинки? | Добавлено: 11.06.06 20:05 |
Автор вопроса:  Andrey | Web-сайт: e-magazine.alfaspace.net
|
| Как написать программу, чтобы она брала картинку , например 1.jpg, с разрешением например 100х100, изменяла расрешение на 30х30 и сохраняла??? |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  HOOLIGAN Вопросов: 0 Ответов: 1066 |
Профиль | | #1 | Добавлено: 11.06.06 20:49 |
|
С разрешением или с размером?
Если речь о размерах, то используй PaintPicture или StretchBlt. |
||
|
Номер ответа: 2 Автор ответа:  Серёга ICQ: 262809473 Вопросов: 17 Ответов: 561 |
Web-сайт: Профиль | | #2 | Добавлено: 13.06.06 02:21 |
|
Private Sub Form_Load()
'кинь на форму PictureBox и Image 'при запуске проги картинка будет 'загружаться в Image, 'копироваться в PictureBox 'и сохраняться с размерами PictureBox'a 'Me.ScaleMode = 3 Picture1.ScaleMode = Me.ScaleMode Picture1.Appearance = 0 Picture1.BorderStyle = 0 Picture1.AutoRedraw = True Picture1.Height = 30 Picture1.Width = 30 Image1.Appearance = 0 Image1.BorderStyle = 0 Image1.Stretch = False Image1.Picture = LoadPicture("c:\1.gif" 
Picture1.PaintPicture Image1.Picture, 0, 0, Picture1.Width, Picture1.Height, 0, 0, Image1.Width, Image1.Height, &HCC0020 SavePicture Picture1.Image, "c:\1.bmp" End Sub |
||
Страница: 1 |