Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Конь
-
- Постоялец
-
-
- Сообщения: 650
- Зарегистрирован: 02.06.2006 (Пт) 6:49
- Откуда: г. Красноярск
-
Конь » 14.01.2007 (Вс) 1:44
Значит проблема такая. Нужно уменьшить (увеличить) размер изображения (ширина, высота). И такое измененное изображение записать в файл. Как можно это реализовать?
Подпись находится в стадии разработки...
-
Конь
-
- Постоялец
-
-
- Сообщения: 650
- Зарегистрирован: 02.06.2006 (Пт) 6:49
- Откуда: г. Красноярск
-
Конь » 14.01.2007 (Вс) 1:50
Так и предполагал
А не подскажешь, какие функции использовать?
Подпись находится в стадии разработки...
-
Alexanbar
-
- Продвинутый гуру
-
-
- Сообщения: 1727
- Зарегистрирован: 13.04.2004 (Вт) 23:04
- Откуда: Волгоградская обл.
-
Alexanbar » 14.01.2007 (Вс) 2:17
Можно и через gdi без плюса.
см. StretchBlt
В GDI+ можно использовать GdipGetImageThumbnail для получения миниатюр изображения.
См. также информацию по GDI+
http://www.com.it-berater.org/GdiPlus/GdiPlus.htm
-
-=TsA=-
-
- Продвинутый пользователь
-
-
- Сообщения: 142
- Зарегистрирован: 21.09.2004 (Вт) 14:32
- Откуда: Татарстан, Заинск
-=TsA=- » 14.01.2007 (Вс) 20:47
На вскидку:
На форму бросаем PictureBox,
- Код: Выделить всё
With Picture1
.ScaleMode = vbPixels
'Выставляем требуемый размер
.Height=120
.Width=160
'Загружаем рисунок:
.PaintPicture LoadPicture(FileNamePicture), 0, 0, .ScaleWidth, .ScaleHeight
'Сохроняем измененый рисунок
SavePicture(.Image, NewFileNamePicture)
End With
-
BV
-
- Thinker
-
-
- Сообщения: 3987
- Зарегистрирован: 12.09.2004 (Вс) 0:55
- Откуда: Молдавия, г. Кишинёв
-
BV » 14.01.2007 (Вс) 23:15
Ох уж этот GDI+
Вначале делаем как
здесь, потом сохраняем (например, просто через SavePicture) в файл.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: Google-бот, Mail.ru [бот], Yandex-бот и гости: 51