Форум: "Базы";
Поиск по всему сайту: 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
1-57813           SeF                   2002-04-02 02:57  2002.04.18  
Getclassname


4-57912           skywalker             2002-02-15 11:33  2002.04.18  
Какие правильные параметры для OpenProcess?


4-57926           Ura!                  2001-12-21 17:48  2002.04.18  
ReadEventLog


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


14-57842          VuDZ                  2002-03-10 13:06  2002.04.18  
SQL Request - помогите, а то всё забыл