Полноэкранное приложение и масштабирование 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,...

Новые блоги и статьи Все статьи Все блоги /
GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	День 5 из 28: Codex подсказывает следующий запрос and_y87 12.10.2026 9 октября 2026 года OpenAI запустила бету Composer predictions — подсказок следующего сообщения в текущем диалоге Codex. Это помощь с формулировкой запроса, а не автоматическое продолжение задачи. . . .	Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .

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

	Полноэкранное приложение и масштабирование Image 22.12.2011, 21:41. Показов 7279. Ответов 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