Нужно скоратить выражение

[prikolist]

Здравствуйте! Подскажите пожалуйста,что лучше использовать,чтоб сократить вот это выражение:

//Проверка на вводимость данных в поле Edit1..Edit5
if((Edit1->Text).Length() == 0)
{
ShowMessage("Ведите значение -> а");
return;
}
if((Edit2->Text).Length() == 0)
{
ShowMessage("Ведите значение -> b");
return;
}
if((Edit3->Text).Length() == 0)
{
ShowMessage("Ведите значение -> c");
return;
}
if((Edit4->Text).Length() == 0)
{
ShowMessage("Ведите значение -> d");
return;
}
if((Edit5->Text).Length() == 0)
{
ShowMessage("Ведите значение -> h");
return;
}

[vvviperrr]

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

[Sazary]

Вот такой способ еще есть:

for(int i=1;i<6;i++)
 {
 TControl * a = (TControl*)FindChildControl("Edit"+IntToStr(i));
 if(a->GetTextLen()==0)
  {
   ShowMessage("Введите значение");
   return;
  }
 }

Или вот так (даже лучше, наверное).

for(int i=1;i<6;i++)
 {
 TEdit *b = dynamic_cast<TEdit*>(FindChildControl("Edit"+IntToStr(i)));
 if(b->Text.Length()==0)
  {
   ShowMessage("Введите значение");
   b->SetFocus();
   return;
  }
 }

[vvviperrr]

2Sazary точно, этож билдер) хотя по хорошему контролам имена надо задавать логически соответствующие содержанию, тогда такой способ не прокатит)

[Sazary]

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

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

Ну у prikolist'а 5 эдитов под переменные. Поэтому если и изменять стандартные имена, то будет логично дать им похожие имена (какое-нибудь n1, n2...).

Ну а так, да, согласен )

[prikolist]

Скажите,правильно ли я понял эту строку,если что не так,поправьте пож.

TEdit *b = dynamic_cast<TEdit*>(FindChildControl("Edit"+IntToStr(i)));
 if(b->Text.Length()==0)

Переменной b, указателю на переменную TEdit

[Sazary]

Переменной b, указателю на переменную TEdit

о_О Вообще не понял )

Есть указатель на TEdit - b.
Ищем элемент TControl с именем Edit1 (или Edit2, Edit3...)
Пытаемся его преобразовать к TEdit.
Т.к. мы знаем, что точно найдем TEdit, то проверку можно не добавлять (хотя это было бы более правильно). И этот указатель на TEdit присваиваем b.
Дальше работаем с b также, как и с обычным TEdit*.

[prikolist]

Подскажите,а что делает FindChildControl

[vvviperrr]

2prikolist ну этож явно. find - искать, child - дочерний. а контрол он и в африке контрол. функция ищет дочерний контрол на форме по заданному имени контрола.