Скачать: CL | DM;

Группы   Найти похожие ветки 

← →
Son!K   (2003-02-01 22:28) [0]

У меня такой вопрос:
К примеру у меня в программе много объектов типа едит, надо проверять их на заполненость в нескольких функциях, можно ли объеденить их в группу и проверять так:
if group.text = "" then
...
else
MessageDlg("Вы не заполнили необходимые поля",....);
Что-нибудь на подобии, помогите пожалуйста :)

---

← →
Юрий Зотов ©   (2003-02-01 23:19) [1]

Таких групп нет. Нужно идти в цикле по списку компонентов формы.

for i := 0 to ComponenrCount - 1 do
if (Components[i] is TEdit) and (TEdit(Components[i]).Text = "") then
begin
MessageDlg(...);
TEdit(Components[i]).SetFocus;
Break
end

---

← →
shodan   (2003-02-01 23:59) [2]

---

← →
shodan   (2003-02-02 00:05) [3]

много писать ..
я по почте скопирую текст....
проверь почту
Sorry мало времени...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c