Форум: "Базы";
Поиск по всему сайту: 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.054 c
14-57853          Лана Розанова         2002-03-08 13:40  2002.04.18  
ISE5


14-57854          Dimedrol              2002-03-11 11:43  2002.04.18  
2 винта - 2 системы. Как ?


3-57606           AndrewK               2002-03-27 13:47  2002.04.18  
CommandTimeOut - HELP !!!


14-57855          MBo                   2002-03-11 13:41  2002.04.18  
Занятно.


1-57698           sammy                 2002-04-08 09:23  2002.04.18  
Создание H