VPF::Использование PictureBox - Форум программистов

Wanderer2019

Дата 4.12.2006, 11:25 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 937
Регистрация: 3.12.2004
Где: Санкт-Петербург/П рага

Репутация: нет
Всего: 17

Всем привет!
Есть такая проблема...
На форме есть PictureBox. У меня есть изображение.
Я подтягиваю это изображение в PictureBox

Код


Picture1.ScaleMode = vbPixels
  Picture1.ScaleHeight = A.PixelHeight
  Picture1.ScaleWidth = A.PixelWidth
  Picture1.Picture = A.Picture

Затем сохраняю изображение -

Код


SavePicture Picture1.Picture, "C:\0.bmp"

Размер получился вполне корректный.

Далее делаю некую правку. и Сохраняю снова... Предварительно сделав

Код


Picture1.Picture = Picture1.Image

и повторяю

Код


SavePicture Picture1.Picture, "C:\1.bmp"

Здесь размер получается в 3 раза большим!!! как с этим бороться????

всем откликнувшимся спасибо!

BorisVorontsov

Дата 4.12.2006, 14:50 (ссылка)

(нет голосов)

Загрузка ...

Thinker

Профиль
Группа: Комодератор
Сообщений: 714
Регистрация: 3.11.2005
Где: Молдавия, г. Киши нёв

Репутация: 5
Всего: 10

Во-первых, открой для себя PaintPicture. Во-вторых, не надо делать "Picture1.Picture = Picture1.Image"... ССЗБ.

--------------------

[code=cpp]
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;
[/code]

Wanderer2019

Дата 4.12.2006, 14:58 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 937
Регистрация: 3.12.2004
Где: Санкт-Петербург/П рага

Репутация: нет
Всего: 17

Цитата(BorisVorontsov @ 4.12.2006, 14:50

)

Во-первых, открой для себя PaintPicture. Во-вторых, не надо делать "Picture1.Picture = Picture1.Image"... ССЗБ.

Чем же PaintPicture отличается от присвоения???

и почему не надо делать Picture1.Picture = Picture1.Image???
Если я так не сделаю, то сохраняя Picture1.Picture я получаю все без моих изменений.

BorisVorontsov

Дата 4.12.2006, 16:57 (ссылка)

(нет голосов)

Загрузка ...

Thinker

Профиль
Группа: Комодератор
Сообщений: 714
Регистрация: 3.11.2005
Где: Молдавия, г. Киши нёв

Репутация: 5
Всего: 10

Цитата(Wanderer2019 @ 4.12.2006, 14:58

)

Чем же PaintPicture отличается от присвоения???

Тем, что не меняет масштаба PictureBox.

Цитата(Wanderer2019 @ 4.12.2006, 14:58

)

и почему не надо делать Picture1.Picture = Picture1.Image???

Потому что ты этим самым присваиваешь свойству Picture ту картинку, которую видишь (с теми же размерами).

Цитата(Wanderer2019 @ 4.12.2006, 14:58

)

Если я так не сделаю, то сохраняя Picture1.Picture я получаю все без моих изменений.

Тогда создай временный DC/PictureBox и рисуй картинку в оригинальном масштабе и с изменениями там. Т.е.:

Код


    Picture2.PaintPicture Picture1.Image, 0, 0, Picture1.Width, Picture1.Height, _
        0, 0, OriginalWidth, OriginalHeight, vbSrcCopy

--------------------

[code=cpp]
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;
[/code]

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »