ZOOM

@Romich41 · Регистрация: 01.11.2009

Студворк — интернет-сервис помощи студентам

Кароче замутил ЗУМ изображения, но при увеличении и уменьшении почему-то искажается изображение=(((
Гляньте плиз...почему и как это устранить???

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
void __fastcall TForm13::Button1Click(TObject *Sender)
{
Graphics::TBitmap *TmpBitmap;
TmpBitmap = new Graphics::TBitmap();
TmpBitmap->Width=Form1->Image1->Picture->Width*z;
TmpBitmap->Height=Form1->Image1->Picture->Height*z;
TmpBitmap->Canvas->StretchDraw(
TRect(0,0,TmpBitmap->Width,TmpBitmap->Height),Form1->Image1->Picture->Graphic);
Form1->Image1->Picture->Graphic=TmpBitmap;
Form1->Image1->Refresh();
delete TmpBitmap;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm13::Button2Click(TObject *Sender)
{
Graphics::TBitmap *TmpBitmap;
TmpBitmap = new Graphics::TBitmap();
TmpBitmap->Width=Form1->Image1->Picture->Width/z;
TmpBitmap->Height=Form1->Image1->Picture->Height/z;
TmpBitmap->Canvas->StretchDraw(
TRect(0,0,TmpBitmap->Width,TmpBitmap->Height),Form1->Image1->Picture->Graphic);
Form1->Image1->Picture->Graphic=TmpBitmap;
Form1->Image1->Refresh();
delete TmpBitmap;

Добавлено через 10 минут
Всё решена проблема...ПРОСТО коефмциент был маленький..а 2-ка всамый раз=)

Добавлено через 2 минуты
Но всё же!!! при уменьшени , а потом увелечении изображение искажается, что делать???

@mirso · 02.05.2010, 18:36

Сообщение от Romich41

2-ка всамый раз

Меняется сама картинка.
Romich41, и с двойкой,
после 10 раз уменьшения<->увеличения - появляются искажения.

Что бы масштабировать картинку без потерь ее нужно хранить во временном буфере.

@Romich41 · 02.05.2010, 18:53 **[ТС]**

и как мне это осуществить...что добавить нужно в мой код???

@mirso · 02.05.2010, 18:57

можно в ресурс запихнуть

или просто так

C++
1
2
    Graphics::TBitmap *TmpBitmap = new Graphics::TBitmap();
    TmpBitmap->LoadFromFile("b_m_p.bmp");

@Romich41 · 02.05.2010, 19:12 **[ТС]**

Чета не пашет=) написал как ты сказал

C++
1
2
3
4
5
6
7
8
9
Graphics::TBitmap *TmpBitmap = new Graphics::TBitmap();
TmpBitmap->LoadFromFile("Versiya1.bmp");
TmpBitmap->Width=Form1->Image1->Picture->Width*z;
TmpBitmap->Height=Form1->Image1->Picture->Height*z;
TmpBitmap->Canvas->StretchDraw(
TRect(0,0,TmpBitmap->Width,TmpBitmap->Height),Form1->Image1->Picture->Graphic);
Form1->Image1->Picture->Graphic=TmpBitmap;
Form1->Image1->Refresh();
delete TmpBitmap;

где Versiya1.bmp - это изображение которое сохраняется при активации зума=)

@mirso · 02.05.2010, 19:29

а так z += 0.1;

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
double z = 1.1;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Graphics::TBitmap *TmpBitmap = new Graphics::TBitmap();
    TmpBitmap->LoadFromFile("Versiya1.bmp");
 
    TmpBitmap->Width   = TmpBitmap->Width*z;
    TmpBitmap->Height  = TmpBitmap->Height*z;
 
    TmpBitmap->Canvas->StretchDraw(
    TRect(0,0,TmpBitmap->Width*z,TmpBitmap->Height*z),Form1->Image1->Picture->Graphic);
    Form1->Image1->Picture->Graphic=TmpBitmap;
    Form1->Image1->Refresh();
    delete TmpBitmap;
 
    z += 0.1;
}
//---------------------------------------------------------------------------

или так
Image1->Picture->LoadFromFile("Versiya1.bmp");
а далее z += 0.1;

@Romich41 · 02.05.2010, 19:40 **[ТС]**

не-а=( чушь получается

Добавлено через 2 минуты
при уменьшении ИЗОБРАЖЕНИЕ обрезается

@mirso · 02.05.2010, 19:44

и так

z -= 0.1;

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
double z = 1.;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Image1->Picture->LoadFromFile("Versiya1.bmp");
    z += 0.1;
    Graphics::TBitmap *TmpBitmap;
TmpBitmap = new Graphics::TBitmap();
TmpBitmap->Width=Form1->Image1->Picture->Width*z;
TmpBitmap->Height=Form1->Image1->Picture->Height*z;
TmpBitmap->Canvas->StretchDraw(
TRect(0,0,TmpBitmap->Width,TmpBitmap->Height),Form1->Image1->Picture->Graphic);
Form1->Image1->Picture->Graphic=TmpBitmap;
Form1->Image1->Refresh();
delete TmpBitmap;
 
    
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    Image1->Picture->LoadFromFile("Versiya1.bmp");
    z -= 0.1;
    Graphics::TBitmap *TmpBitmap;
TmpBitmap = new Graphics::TBitmap();
TmpBitmap->Width=Form1->Image1->Picture->Width*z;
TmpBitmap->Height=Form1->Image1->Picture->Height*z;
TmpBitmap->Canvas->StretchDraw(
TRect(0,0,TmpBitmap->Width,TmpBitmap->Height),Form1->Image1->Picture->Graphic);
Form1->Image1->Picture->Graphic=TmpBitmap;
Form1->Image1->Refresh();
delete TmpBitmap;
    
}
//---------------------------------------------------------------------------

Сообщение от Romich41

при уменьшении ИЗОБРАЖЕНИЕ обрезается

всмысле?

@Romich41 · 02.05.2010, 20:06 **[ТС]**

Да пипец...все равно обрезает..эта переменная Z она чета все время увеличивается, при нажатии на уменьшение ваще изображение обрезается.

Добавлено через 16 секунд
искажене также присутствуют

Добавлено через 9 минут
ОБРЕЗАЕТ - кусок изображения тока отстается=)

Новые блоги и статьи Все статьи Все блоги /
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .

@Romich41 16 / 16 / 1 Регистрация: 01.11.2009 Сообщений: 188
	02.05.2010, 18:53 [ТС]
	и как мне это осуществить...что добавить нужно в мой код??? 0

@Romich41 16 / 16 / 1 Регистрация: 01.11.2009 Сообщений: 188
	02.05.2010, 19:40 [ТС]
	не-а=( чушь получается Добавлено через 2 минуты при уменьшении ИЗОБРАЖЕНИЕ обрезается 0

@Romich41 16 / 16 / 1 Регистрация: 01.11.2009 Сообщений: 188
	02.05.2010, 20:06 [ТС]
	Да пипец...все равно обрезает..эта переменная Z она чета все время увеличивается, при нажатии на уменьшение ваще изображение обрезается. Добавлено через 16 секунд искажене также присутствуют Добавлено через 9 минут ОБРЕЗАЕТ - кусок изображения тока отстается=) 0