Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Вниз

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


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]

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



Lord Warlock   (2002-03-28 15:10) [4]

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



Lord Warlock   (2002-03-28 15:47) [5]

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




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.02 c
3-57634           MAxiMum               2002-03-26 12:29  2002.04.18  
Работа с Interbase


3-57615           sysoper               2002-03-28 07:10  2002.04.18  
Ошибка в IB5.6 +Win2000 server+sp2


3-57599           Vlad_Leon             2002-03-27 09:13  2002.04.18  
Как узнать пароль?


1-57735           Дмитрий Д.            2002-04-04 10:39  2002.04.18  
Дерево каталогов с возможностью выборки


1-57818           Demon Ltd             2002-04-07 01:27  2002.04.18  
Повторное обращение с помощью с Меню