ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Узнать имя TcxGridDBColumn в событии OnPopup
18 сообщений из 18, страница 1 из 1
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490046
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
Есть 2 очень похожие колонки типа PopupEdit. только выбирается в них разные данные - из разных таблиц.
Я не вижу смысла пилить 2 разных события.
В PopupEdit нужно показать разное содержимое в зависимости от того, по какой колонке кликнули. Редактирование непосредственно в таблице.
Но проблема в том, что
Код: pascal
1.
TcxPopupEdit(sender).name


возвращает пустую строку.

Не соображу, как добраться до имени самой колонки или до свойства TAG, например.

Код: sql
1.
TcxPopupEdit(sender).parent


возвращает TcxGridSite.
...
Рейтинг: 0 / 0
17.07.2017, 11:46:46
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490072
Фотография JayDi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
JayDi
Участник
HitTest, GetHitTest у грида/трилиста
...
Рейтинг: 0 / 0
17.07.2017, 12:06:04
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490086
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
т.е .в само событии OnPopup никак?
...
Рейтинг: 0 / 0
17.07.2017, 12:19:34
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490090
Фотография JayDi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
JayDi
Участник
X11,

прямо в этом событии и вызывать, чтобы узнать, что сейчас под мышкой находится (какая колонка, запись, нод).
...
Рейтинг: 0 / 0
17.07.2017, 12:23:18
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490101
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
Код: pascal
1.
2.
3.
4.
5.
 var Point: TPoint;
begin
 GetCursorPos(Point);

 TcxGridSite(TcxPopupEdit(sender).Parent).ViewInfo.GetHitTest(Point).ClassName


возвращает 'TcxGridViewNoneHitTest'



чтобы было понятнее, я щёлкаю по "NewItemRow", такой результат и должен быть?

Или я координаты неправильно передаю?
...
Рейтинг: 0 / 0
17.07.2017, 12:38:06
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490110
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
ага, переделал так:

Код: pascal
1.
2.
 GetCursorPos(Point);
 point := ScreenToClient(Point);


теперь 'TcxGridRecordCellHitTest'
...
Рейтинг: 0 / 0
17.07.2017, 12:42:49
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490113
ma1tus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ma1tus
Участник
X11,

проверить просто View.Controller.FocusedItem или FocusedColumn - совсем нет?
...
Рейтинг: 0 / 0
17.07.2017, 12:43:20
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490118
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
В общем, вот что получилось:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
 Point: TPoint;
 HitTest: TcxCustomGridHitTest;
begin
 GetCursorPos(Point);
 point := ScreenToClient(Point);
 HitTest := TcxGridSite(TcxPopupEdit(sender).Parent).ViewInfo.GetHitTest(Point);
 if HitTest is TcxGridRecordCellHitTest then
   s := TcxGridDBColumn(TcxGridRecordCellHitTest(HitTest).Item).Name;



спасибо
...
Рейтинг: 0 / 0
17.07.2017, 12:46:25
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490120
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
ma1tusX11,

проверить просто View.Controller.FocusedItem или FocusedColumn - совсем нет?

Код: pascal
1.
TcxGridSite(TcxPopupEdit(sender).Parent).GridView.Controller.


здесь нет ничего, связанного с "Focused..."
...
Рейтинг: 0 / 0
17.07.2017, 12:49:03
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490124
ma1tus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ma1tus
Участник
X11здесь нет ничего, связанного с "Focused..."X11по какой колонке кликнулиХм, ладно )
...
Рейтинг: 0 / 0
17.07.2017, 12:52:47
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490138
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
бред какой-то :(

Код: pascal
1.
2.
3.
4.
 if HitTest is TcxGridRecordCellHitTest then
   col := TcxGridDBColumn(TcxGridRecordCellHitTest(HitTest).Item)
 else
   col := nil;



щёлкаю в одном и том же месте, а col принимает то одну, то вторую колонку
...
Рейтинг: 0 / 0
17.07.2017, 13:18:00
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490150
ma1tus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ma1tus
Участник
X11ничего, связанного с "Focused..."Привести к типу, TcxGridTableController(...).Focused...
...
Рейтинг: 0 / 0
17.07.2017, 13:30:10
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490161
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
Код: pascal
1.
2.
3.
4.
procedure TForm1.cxEditRepository1PopupItem1PropertiesPopup(Sender: TObject);
begin
  ShowMessage(TcxgridTableView(TcxPopupEdit(Sender).Owner).Controller.EditingItem.Name);
end;
...
Рейтинг: 0 / 0
17.07.2017, 13:47:38
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490206
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
DimaBr, спасибо

как же я забыл про owner
...
Рейтинг: 0 / 0
17.07.2017, 14:41:03
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490209
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
Причём тут Owner ?
...
Рейтинг: 0 / 0
17.07.2017, 14:42:58
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490210
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
потому что я упёрся в parent, поэтому не мог найти Controller
...
Рейтинг: 0 / 0
17.07.2017, 14:44:30
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490221
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
Вот тебе Parent, какая разница ?
Код: pascal
1.
2.
3.
4.
procedure TForm1.cxGrid1TableView1Column1PropertiesPopup(Sender: TObject);
begin
  Caption := TcxCustomGridTableController(TcxGridSite(TcxPopupEdit(Sender).Parent).GridView.Controller).EditingItem.Name
end;
...
Рейтинг: 0 / 0
17.07.2017, 14:54:10
| Ответить | Цитировать | Написать  
Узнать имя TcxGridDBColumn в событии OnPopup
    #39490226
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
X11
Участник
спасибо :)
...
Рейтинг: 0 / 0
17.07.2017, 14:59:09
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Узнать имя TcxGridDBColumn в событии OnPopup
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39490161&tid=2042026]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 165ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 227ms
total:  490ms
созд. / загр.: 490ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]