Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как объеденить одинаковые свойства для всех edit? [D6, Win2k]

PTE © (2002-06-17 20:57:00)
Как объеденить одинаковые свойства для всех edit?
для всех едитов на форме установлено менять цвет формы при
procedure TForm1.Edit1Enter(Sender: TObject); begin Form1.Edit1.Color :=clWhite; end;
и
procedure TForm1.Edit1Exit(Sender: TObject); begin Form1.Edit1.Color :=$00B6A79A; end;
Ведь наверное можно для них всех объеденить как-то эти свойства? а не писать для каждого каждый раз одно и то же
подскажите?

Skyle (2002-06-18 13:42:00) [1]
1) Есть такая вещь, как обработчик события. Создаёшь процедурку какую-нить (допустим Edit1OnEnter, хотя я бы сделал сам что-нить типа Repaint) а потом всем её назначаешь в соответствующем месте.
Теперь более конкретно... Пусть ты создаёшь обработчик для первого едита, в котором пишешь:

procedure TMySuperForm.Edit1OnEnter(Sender: TObject); begin IF (Sender as TEdit).Color = Color1 then (Sender as TEdit).Color := Color2 else (Sender as TEdit).Color := Color1; end;

Потом назначаешь этот обработчик всем своим едитам и живёшь счастливо...%)
Можно ещё и экшн создать...Тогда ваще супер всё будет:)
Потом просто

PTE (2002-06-18 12:22:00) [2]
так вот учусь пользоваться , я же вверхем своем вопросе показываю как я обрабатываю для каждого, хотел узнать как можно короче это дело описать сразу для всех

Kaban (2002-06-18 10:13:00) [3]
Ты вообще пользовался когда нибудь Object Inspector. Там можно обработчики событий назначать

PTE (2002-06-18 10:05:00) [4]
в какую сторону рыть то? подскажите

Anatoly Podgoretsky (2002-06-17 21:19:00) [5]
А когда?

PTE (2002-06-17 21:14:00) [6]
а как сразу всем назначить?

Anatoly Podgoretsky (2002-06-17 21:03:00) [7]
Конечно, назначь всем один и тот же обработчик

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »