VPF::Обрезать картинку.. - Форум программистов

Santilka85

Дата 23.8.2007, 06:05 (ссылка)

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

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 202
Регистрация: 8.6.2007
Где: Новосибирск

Репутация: 0
Всего: 1

Здрасьте всем smile

..

тема такова....
на форму загружается картинка в Image.. как бы эту картинку при нажатии на кнопку сжимать... необходимого размера и сохранить в отдельный файл?
допутим было 640*480 а надо 64*48.... smile

Добавлено через 6 минут и 43 секунды
может не Image использовать?! smile

?!

Это сообщение отредактировал(а) Santilka85 - 23.8.2007, 06:11

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

Снегоболотоходы WP8X8 всего за 480000 рублей и аксессуары к ним.

Lazin

Дата 23.8.2007, 08:13 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 3820
Регистрация: 11.12.2006
Где: paranoid oil empi re

Репутация: 18
Всего: 154

Можно это сделать ф-й ...->Canvas->StretchDraw(...);
Создаёшь временный битмап копируешь на него и в файл

Код


std::auto_ptr<Graphics::TBitmap> bmp(new Graphics::TBitmap);
bmp->Height = Image->Picture->Bitmap->Height/4;
bmp->Width  = Image->Picture->Bitmap->Width/4;
bmp->Camvas->StretchDraw(bmp->ClipRect, Image->Picture->Bitmap);
bmp->SaveToFile("file.bmp");

При сильном масштабировании изображение будет оч. хренового качества

Это сообщение отредактировал(а) Lazin - 23.8.2007, 08:21

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

C++ is the steampunk of programming languages: modern ideas realized with victorian technology.

SenkraD

Дата 23.8.2007, 08:13 (ссылка)

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

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 933
Регистрация: 3.2.2006
Где: Украина::Киев

Репутация: 9
Всего: 23

Santilka85, вот тебе пример:

Код


    Graphics::TBitmap *pBmp;

    pBmp        = new Graphics::TBitmap();
    pBmp->Width    = 64;
    pBmp->Height    = 48;

    StretchBlt(pBmp->Canvas->Handle, 0, 0, pBmp->Width, pBmp->Height,  Image1->Canvas->Handle, 0, 0, Image1->Width, Image1->Height,  SRCCOPY);

    Image1->Canvas->FillRect(Image1->ClientRect);
    BitBlt(Image1->Canvas->Handle, 0, 0, pBmp->Width, pBmp->Height, pBmp->Canvas->Handle, 0, 0, SRCCOPY);


    pBmp->SaveToFile("C:\\Scale.bmp");

    delete pBmp;

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

Имеющий язык - да не убоится спросить!

Santilka85

Дата 23.8.2007, 08:22 (ссылка)

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

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 202
Регистрация: 8.6.2007
Где: Новосибирск

Репутация: 0
Всего: 1

Пасип, ребята..попробую, отпишусь.. smile

пока некада..на работе:(

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

Снегоболотоходы WP8X8 всего за 480000 рублей и аксессуары к ним.

Santilka85

Дата 30.8.2007, 06:32 (ссылка)

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

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 202
Регистрация: 8.6.2007
Где: Новосибирск

Репутация: 0
Всего: 1

Спасибо всем...работаит....пришлось маленько переделать smile

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

Снегоболотоходы WP8X8 всего за 480000 рублей и аксессуары к ним.

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