Полноэкранное приложение и масштабирование Image

@fghjk · Регистрация: 04.12.2011

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

Можно ли сделать форму vcl form application полноэкранной?
и примерный код если не сложно пожалуста

@QWIPQ · 22.12.2011, 23:11

по идее все что ты нарисовал какой-то функцией на канве должно было наложиться на рисунок и с ним сохраниться... хм...

@fghjk · 22.12.2011, 23:28 **[ТС]**

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

по идее все что ты нарисовал какой-то функцией на канве должно было наложиться на рисунок и с ним сохраниться... хм...

сорь я тупанул.... дада он сохранился... кажется это решает мою задачу ... спасибо!

Добавлено через 6 минут
блин вот а попроще бы... как бы сделать это тока несохраняя в файл... а то как то туповато мне кажется

Image1->Picture->SaveToFile("123.bmp");
Image1->Picture->LoadFromFile("123.bmp");

и после этого работает

cpp_developer · 22.12.2011, 23:44

почитайте про TMemoryStream ...

C++
1
Image1->Picture->Bitmap->SaveToStream(ms);

и пользуйте без сохранения в файл

C++
1
Image1->Picture->Bitmap->LoadFromStream(ms);

.

@fghjk · 23.12.2011, 00:02 **[ТС]**

можно тогда ещё вопрос.... как вставлять изображение в Image1->Picture с заданными коордионатами x,y ?

и не знаете случайно, почему при ходе работы программы когда у меня на канве имейджа рисуется что нибудь то имейдж почему то может мерцать?
как это можно было бы исправить?

cpp_developer · 23.12.2011, 00:16

1. Копия картинки

C++
1
Image1->Canvas->Draw(x,y,bitmap); //копируем рисунок на Image

2.

C++
1
Form1->DoubleBuffered = true;

Можно в Инспекторе объектов.

@QWIPQ · 23.12.2011, 00:21

мерцает - обновление и всего-то... так происходит например когда используешь Refresh(), у тебя эт прорисовка

@fghjk · 23.12.2011, 00:31 **[ТС]**

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

мерцает - обновление и всего-то... так происходит например когда используешь Refresh(), у тебя эт прорисовка

ну я понял, а как это убрать? я ведь меняю только кусочками канву на имейдже

@QWIPQ · 23.12.2011, 00:38

если ты хочешь посмотреть что изменилось допустим в этой теме и дали тебе ответ на твой вопрос ты что делаешь? нажимаешь F5 или обновить... чтоб обновилась инфа нужная тебе, тут такой же принцип... он может и нарисует тебе, но без обновления ты эт не увидишь... и это встроено в методы прорисовки... понял?

проще говоря эт нужно

cpp_developer · 23.12.2011, 00:41

не понятно, какое собітие используется, в общем, рисовать гламурно в OnPaint, также можно на время ваших махинаций с рисованием запретить, а после - разрешить перерисовку формы/контрола:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
// запретить
SendMessage(Control->Handle,WM_SETREDRAW,0,0);
// махинации...
// разрешить
SendMessage(Control->Handle,WM_SETREDRAW, 1, 0);
RedrawWindow(Control->Handle,
             NULL,
             0,
             RDW_ERASE|
             RDW_FRAME|
             RDW_INVALIDATE|
             RDW_ALLCHILDREN)
;

@fghjk · 23.12.2011, 00:49 **[ТС]**

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

не понятно, какое собітие используется, в общем, рисовать гламурно в OnPaint, также можно на время ваших махинаций с рисованием запретить, а после - разрешить перерисовку формы/контрола:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
// запретить
SendMessage(Control->Handle,WM_SETREDRAW,0,0);
// махинации...
// разрешить
SendMessage(Control->Handle,WM_SETREDRAW, 1, 0);
RedrawWindow(Control->Handle,
             NULL,
             0,
             RDW_ERASE|
             RDW_FRAME|
             RDW_INVALIDATE|
             RDW_ALLCHILDREN)
;

не работает
на Control ругается
Undefined symbol 'Control'

cpp_developer · 23.12.2011, 00:59

все работает, если не отключать мозги
естественно, там должен быть нужный вам контрол, например,

C++
1
Form1->Handle

или

C++
1
Image1->Handle

- отвыкайте от негламурного копипейста

@QWIPQ · 23.12.2011, 01:06

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

было очень неприличное слово

))

даж плюшку поставлю)))) сам думал уже над этим)))

cpp_developer · 23.12.2011, 01:09

плюшки - это хорошо

)))

@fghjk · 23.12.2011, 01:24 **[ТС]**

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

все работает, если не отключать мозги
естественно, там должен быть нужный вам контрол, например,

C++
1
Form1->Handle

или

C++
1
Image1->Handle

- отвыкайте от негламурного копипейста

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
  HWND retrf;
  retrf=GetForegroundWindow();
  SendMessage(retrf,WM_SETREDRAW,0,0);
  Image2->Canvas->Draw(x*15,y*15,F);
  Image2->Canvas->Draw(x*15,y*15,BIT);
  SendMessage(retrf,WM_SETREDRAW,1,0);
  RedrawWindow(retrf,
               NULL,
               0,
               RDW_ERASE|
               RDW_FRAME|
               RDW_INVALIDATE|
               RDW_ALLCHILDREN);

ну вот как бы
только всёравно мерцает

cpp_developer · 23.12.2011, 01:46

при чем здесь GetForegroundWindow();?

C++
1
 retrf=ВашаФормаИлиКонтрол->Handle;

чем плохо ?

@fghjk · 23.12.2011, 19:18 **[ТС]**

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

при чем здесь GetForegroundWindow();?

C++
1
 retrf=ВашаФормаИлиКонтрол->Handle;

чем плохо ?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
HWND retrf;
retrf=Form2->Handle;
SendMessage(retrf,WM_SETREDRAW,0,0);
  Image2->Canvas->Draw(x*15,y*15,F);
  y--;
  Image2->Canvas->Draw(x*15,y*15,BIT);
  SendMessage(retrf,WM_SETREDRAW, 1, 0);
  RedrawWindow(retrf,
                     NULL,
                     0,
                     RDW_ERASE|
                     RDW_FRAME|
                     RDW_INVALIDATE|
                     RDW_ALLCHILDREN);

всё равно мерцает

Добавлено через 1 час 51 минуту

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

2.

C++
1
Form1->DoubleBuffered = true;

Можно в Инспекторе объектов.

о вот это помогло спасибо

Добавлено через 15 минут
а можно вывести на имейдж изображение сразу в масштабированом варианте?

Добавлено через 5 часов 17 минут
хелп!! проблема не решена
можно выводить изображение на имейдж кусками и сразу же масштабировать его?

@NiTan · 23.12.2011, 19:54

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

а можно вывести на имейдж изображение сразу в масштабированом варианте?
Добавлено через 5 часов 17 минут
хелп!! проблема не решена
можно выводить изображение на имейдж кусками и сразу же масштабировать его?

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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
Graphics::TBitmap *b;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   Image1->Canvas->StretchDraw(RECT(0,0,Image1->Width,Image1->Height),b);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 *b=new Graphics::TBitmap;
 b->Width=800;
 b->Height=640;
}
//---------------------------------------------------------------------------

И соотсветственно у формы:

C++
1
2
BorderStyle = bsNone;
WindowState = wsMaximized;

и компонента Image1:

C++
1
Image1->Align = alClient;

cpp_developer · 23.12.2011, 20:20

fghjk, вам довольно хорошо все разжевали - масштабируете bitmap , и уже сам bitmap выводите в Image.

Судя по этому вопросу, и по этому:

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

C++
1
Form1->DoubleBuffered = true;

о вот это помогло

- вы просто не читаете ответы на свои вопросы в своей же теме, так что отвечать вам как бы и смысла нет.

@fghjk · 23.12.2011, 22:17 **[ТС]**

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

Судя по этому вопросу, и по этому:- вы просто не читаете ответы на свои вопросы в своей же теме, так что отвечать вам как бы и смысла нет.

невнимательность

ну я же патом увидел это

Добавлено через 18 минут
немного не понял... вот через это только масштабировать

C++
1
Image1->Canvas->StretchDraw(RECT(указать масштаб),b);

а если я хочу вывести в какуюто определённую область? как вот например

C++
1
Image2->Canvas->Draw(коордионаты,b);

cpp_developer · 23.12.2011, 22:24

как вы думаете, для чего там два первых нолика?

C++
1
StretchDraw(RECT(0,0,...

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@fghjk 3 / 3 / 2 Регистрация: 04.12.2011 Сообщений: 76

	Полноэкранное приложение и масштабирование Image 22.12.2011, 21:41. Показов 7251. Ответов 44 Метки нет (Все метки) Можно ли сделать форму vcl form application полноэкранной? и примерный код если не сложно пожалуста 0

@QWIPQ 144 / 123 / 14 Регистрация: 10.10.2011 Сообщений: 366 Записей в блоге: 2
	22.12.2011, 23:11
	по идее все что ты нарисовал какой-то функцией на канве должно было наложиться на рисунок и с ним сохраниться... хм... 1

@fghjk 3 / 3 / 2 Регистрация: 04.12.2011 Сообщений: 76
	23.12.2011, 00:02 [ТС]
	можно тогда ещё вопрос.... как вставлять изображение в Image1->Picture с заданными коордионатами x,y ? и не знаете случайно, почему при ходе работы программы когда у меня на канве имейджа рисуется что нибудь то имейдж почему то может мерцать? как это можно было бы исправить? 0

@QWIPQ 144 / 123 / 14 Регистрация: 10.10.2011 Сообщений: 366 Записей в блоге: 2
	23.12.2011, 00:21
	мерцает - обновление и всего-то... так происходит например когда используешь Refresh(), у тебя эт прорисовка 0

@QWIPQ 144 / 123 / 14 Регистрация: 10.10.2011 Сообщений: 366 Записей в блоге: 2
	23.12.2011, 00:38
	если ты хочешь посмотреть что изменилось допустим в этой теме и дали тебе ответ на твой вопрос ты что делаешь? нажимаешь F5 или обновить... чтоб обновилась инфа нужная тебе, тут такой же принцип... он может и нарисует тебе, но без обновления ты эт не увидишь... и это встроено в методы прорисовки... понял? проще говоря эт нужно 1

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	23.12.2011, 01:09
	плюшки - это хорошо ))) 0