Форум: "Базы";
Поиск по всему сайту: 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.018 c
1-57687           AMQ                   2002-04-07 18:00  2002.04.18  
Borland Delphi 7 Release


3-57582           Dimulka-9             2002-03-26 12:32  2002.04.18  
Перенос данных из Access в IB6


1-57755           LLong                 2002-04-04 20:41  2002.04.18  
Проблема с MDI


1-57667           vlv                   2002-04-04 21:32  2002.04.18  
Проблема с MDIForm


4-57921           skywalker             2002-02-14 15:54  2002.04.18  
CeateToolHelp32SnapShot на NT работает?