![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Если выбран (focus) edit, то...
Вопрос © (2004-07-25 18:43:00)Такой вопрос:
У меня на форме несколько элементов (edit'ов). Нужно сделать условный оператор
if (выбран любой edit на форме) then
...
else
...
Как проверить на чём в данный момент фокус? Неужели пробегать все элементы на форме и проверять - выбран он (выделен) или нет?
Вопрос (2004-07-25 19:47:00) [1]вот спасибо доброму человеку! то, что нужно, по-моему.
Простите за моё чайничество. Надеюсь, не много времени отобрал.
P.N.P. (2004-07-25 19:40:00) [2]if ActiveControl is TEdit then
Вопрос (2004-07-25 19:30:00) [3]? Чуть по подробнее если можно. Дело в том, что я не профессиональный программер... так - чуть-чуть.
поэтому конкретный пример был бы очень кстати....
Anatoly Podgoretsky (2004-07-25 19:27:00) [4]Вопрос (25.07.04 18:51) [2]
Есть еще умение просматривать список
Вопрос (2004-07-25 19:02:00) [5]>>За пару секунд по справке находится, что это ActiveControl"
Да, находится... Вот что: "Specifies the control that has focus on the form."
И примерчик:
"procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Interval := 100;
if ActiveControl <> nil then
ActiveControl.Left := ActiveControl.Left + 1;
end;"
Но как это может помочь именно моей проблеме?
Вопрос (2004-07-25 18:51:00) [6]если уметь искать или знать хоть что искать:) Ладно, теперь есть ключевое слово. Спасибо, пошёл смотреть. Если будут вопросы - я сюда ещё загляну.
Anatoly Podgoretsky (2004-07-25 18:50:00) [7]За пару секунд по справке находится, что это ActiveControl