Если выбран (focus) edit, то...

← →
Вопрос (2004-07-25 18:43) [0]

Такой вопрос:
У меня на форме несколько элементов (edit"ов). Нужно сделать условный оператор
if (выбран любой edit на форме) then
...
else
...

Как проверить на чём в данный момент фокус? Неужели пробегать все элементы на форме и проверять - выбран он (выделен) или нет?

← →
Anatoly Podgoretsky © (2004-07-25 18:50) [1]

За пару секунд по справке находится, что это ActiveControl

← →
Вопрос (2004-07-25 18:51) [2]

если уметь искать или знать хоть что искать:) Ладно, теперь есть ключевое слово. Спасибо, пошёл смотреть. Если будут вопросы - я сюда ещё загляну.

← →
Вопрос (2004-07-25 19:02) [3]

>>За пару секунд по справке находится, что это 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;"

Но как это может помочь именно моей проблеме?

← →
Anatoly Podgoretsky © (2004-07-25 19:27) [4]

Вопрос (25.07.04 18:51) [2]
Есть еще умение просматривать список

← →
Вопрос (2004-07-25 19:30) [5]

? Чуть по подробнее если можно. Дело в том, что я не профессиональный программер... так - чуть-чуть.

поэтому конкретный пример был бы очень кстати....

if ActiveControl is TEdit then

← →
Вопрос (2004-07-25 19:47) [7]

вот спасибо доброму человеку! то, что нужно, по-моему.

Простите за моё чайничество. Надеюсь, не много времени отобрал.

Если выбран (focus) edit, то... Найти похожие ветки