Как сделать несколько полей edit одного цвета

@1mat · Регистрация: 15.08.2013

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

Есть 10 полей edit (или кубов из GLScene), как можно свойство ->Color применить сразу ко всем (Edit1,...,Edit10) или только к некоторым (Edit1, Edit3, Edit5) при выполнении какого либо условия.

C++
1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int a1 = StrToInt(Edit1->Text);
if (a1>0) {
  Edit1->Color=clYellow;// (Edit1,...,Edit10)->Color=clYellow;
  GLCube1->Material->FrontProperties->Emission->Color=clrYellow; // (GLCube1,...,GLCube10)->Material...->Color=clrYellow;
 // if (Edit1->Color=clYellow) {
  // GLCube1->Material->FrontProperties->Emission->Color=clrYellow;
 // }
}
}

@Kulgar · 12.05.2014, 09:40

Как сделать цветной конус из полей Edit / C++ Builder

Тайна

Поиск спасёт мир.

@D1973 · 13.05.2014, 07:55

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  for(int i = 0; i < Form1->ControlCount; i++)
   {
     if(Form1->Controls[i]->ClassNameIs("TEdit"))
      if(StrToInt(((TEdit *)(Form1->Controls[i]))->Text) > 0)
       ((TEdit *)(Form1->Controls[i]))->Color = clYellow;
   }
}

@volvo · 13.05.2014, 10:04

D1973, зачем делать несколько приведений, если можно обойтись одним:

C++
1
2
3
4
5
6
    for (int i = 0; i < Form1->ControlCount; i++)
    {
        TEdit *edit = dynamic_cast<TEdit*>(Form1->Controls[i]);
        if (edit && StrToIntDef(edit->Text, -1) > 0)
            edit->Color = clYellow;
    }

?

@D1973 · 14.05.2014, 10:59

UI, у меня в Builder XE3 этот код, естественно, cработает. А будет он работать в Builder 6? Под рукой нет - проверить не на чем

@Kulgar · 14.05.2014, 11:03

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

А будет он работать в Builder 6?

Зря Вы вспомнили про "динозавра".

Котэ его не любит.

Проверил.

Работает.
И чего бы ему не работать?)

@D1973 · 14.05.2014, 11:58

Не по теме:

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

Котэ его не любит

Во кося-а-а-ак

Новые блоги и статьи Все статьи Все блоги /
Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .

@Kulgar 511 / 196 / 26 Регистрация: 07.08.2013 Сообщений: 814
	12.05.2014, 09:40
	Как сделать цветной конус из полей Edit / C++ Builder Тайна Поиск спасёт мир. 0

@D1973 Модератор 9929 / 6466 / 2457 Регистрация: 21.01.2014 Сообщений: 27,420 Записей в блоге: 3
	14.05.2014, 10:59
	UI, у меня в Builder XE3 этот код, естественно, cработает. А будет он работать в Builder 6? Под рукой нет - проверить не на чем 0