Имя текущего поля

← →
Alxn (2002-03-28 14:22) [0]

На форме несколько DBGRID и DBEDIT. Как узнать имя поля-таблицы на котором фокус ввода. Затем использовать их для поиска в locate "по текущему полю".

← →
Lord Warlock © (2002-03-28 14:31) [1]

if ActiveControl is TDBEdit then
s:=TDBEdit(ActiveControl).Field.Name;
if ActiveControl is TCustomDBGrid then
s:=TCustomDBGrid(ActiveControl).SelectedField.Name;

← →
Alxn (2002-03-28 14:57) [2]

Но есть еще кнопка "Поиск". На ее нажимают... Эти команды (s:=) не выполняются.

← →
Val © (2002-03-28 15:02) [3]

тогда уберите проверку на активный контрол

Можно пойти извратным путем, заведи приватную переменную типа
TWinControl,
напиши обработчик OnClick допустим, и нем этой приватной пере-
менной назначай Sender, а в клике на Поиск замени ActiveControl на эту приватную переменную.

Да, OnClick назначь всем, от кого хочешь получать имена полей

Имя текущего поля Найти похожие ветки