Рисунок в Timage

@Vergil · Регистрация: 11.11.2009

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

Здравствуйте. Суть в том, что создаются динамически Timage, сколько задает пользователь. При нажатии image должен заполнятся картинкой в зависимости от выбранного с помощью RadioButton'a.

Вот сделанное.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{for (int i = 0; i < 81; i++)
{ if (i%9==0 && i!=0) { X=X+60; Y=-51;}
 dynImages[i] = new TImage(this);
 dynImages[i]->Parent = this;
 dynImages[i]->Tag = i;
 dynImages[i]->BringToFront();
 dynImages[i]->Picture->LoadFromFile(AnsiString().sprintf("f.bmp",i+1));
 dynImages[i]->Left = X;
 Y=Y+59;
 dynImages[i]->Top = Y;
 dynImages[i]->OnClick = ImClick;}}
//---------------------------------------------------------------------------
void __fastcall TForm1::ImClick(TObject *Sender)
{int pushedId = -1;
if(Form1->RadioButton1->Checked){};
((TImage*)FindComponent("Image"+String(Tag)))->Picture->LoadFromFile("1.bmp");}
//---------------------------------------------------------------------------

Но не знаю, как закончить. Как реализовать заполнение. в таком коде появляется ошибка и ничего не меняется.
Если использовать ShowMessage(Name); Выдает Form1

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
void __fastcall
TForm1::SpeedButton1Click(TObject *Sender)
{
 if(dynamic_cast<TSpeedButton *>(Sender))
 {
  int i=((TSpeedButton *)(Sender))->Tag;
  switch(i)
  {
   case 0:
    .... //Код для кнопки 1
   break;
   case 1:
    .... //Код для кнопки 2   
   break;
  }
  .......// Общий код
 }
}

И как правильно удалить Image?

@Vergil · 27.05.2013, 18:27 **[ТС]**

Все решил.

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::ImClick(TObject *Sender)
{pushedId = ((TImage*)Sender)->Tag;
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("1.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("2.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("3.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("s.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("s1.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("p.bmp");}
 //---------------------------------------------------------------------------

Есть ли способ как-то оптимизировать RadioButton? Что бы не такая громоздкая конструкция с условиями получалась?

AntonChik · 28.05.2013, 10:16

оптимизировать можно создавая RadioButton-ы тоже динамически, хотя можно перебрать и все статичные.
а здесь

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

if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("1.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("2.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("3.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("s.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("s1.bmp");
if (Form1->RadioButton1->Checked)dynImages[pushedId]->Picture->LoadFromFile("p.bmp");}

на результат повлияет только последняя строка

@nick42 · 28.05.2013, 11:44

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

Есть ли способ как-то оптимизировать RadioButton?

Используйте RadioGroup__

C++
1
2
3
  String Fl[]= { "1","2","3","s","s1","p" };
  int dx = RadioGroup1->ItemIndex ;
  dynImages[dx]->Picture->LoadFromFile(Fl[dx]+".bmp");

@Vergil · 29.05.2013, 13:32 **[ТС]**

Забыл Поменять номера) Спасибо за подсказку. Буду осваивать группу.
Кто мне объяснит почему мои темы переносят из раздела для начинающих? Я бы не сказал, что тут есть что-то сложное... Просто еще недостаток знаний связанный с тем, что сам учусь. А хорошей книги с примерами еще не нашел.

cpp_developer · 29.05.2013, 19:38

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

Кто мне объяснит почему мои темы переносят

- потому, что для реализации используется билдер:

C++
1
2
3
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// и дальше, по тексту

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

А хорошей книги с примерами еще не нашел.

Вам - сюда:
Библиотека VCL и сопутствующие материалы
Путеводитель по книжкам про C++ Builder

@Vergil · 21.06.2013, 06:58 **[ТС]**

Столкнулся все же с нужностью удаления сего чуда. Точнее пересоздание. Допустим нажимаю на кнопку, и если такие Image существуют, то их удалить и снова создаем... Подскажите, как реализовать.

AntonChik · 21.06.2013, 08:09

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

и если такие Image существуют

такие это какие?
удалять так же как создавать, только вместо

C++
1
dynImages[i] = new TImage(this);

так

C++
1
delete dynImages[i];

хотя может и не надо их удалять(и пересоздавать), можно просто грузить в них новые картинки

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

@Vergil 43 / 37 / 17 Регистрация: 11.11.2009 Сообщений: 246
	29.05.2013, 13:32 [ТС]
	Забыл Поменять номера) Спасибо за подсказку. Буду осваивать группу. Кто мне объяснит почему мои темы переносят из раздела для начинающих? Я бы не сказал, что тут есть что-то сложное... Просто еще недостаток знаний связанный с тем, что сам учусь. А хорошей книги с примерами еще не нашел. 0

@Vergil 43 / 37 / 17 Регистрация: 11.11.2009 Сообщений: 246
	21.06.2013, 06:58 [ТС]
	Столкнулся все же с нужностью удаления сего чуда. Точнее пересоздание. Допустим нажимаю на кнопку, и если такие Image существуют, то их удалить и снова создаем... Подскажите, как реализовать. 0

Рисунок в Timage

Решение