powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Методы в GRID .column1.text1.keypress
9 сообщений из 9, страница 1 из 1
Методы в GRID .column1.text1.keypress
    #36185908
Местами администратор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
имеется класс, основанный на GRID, заранее не известно кол-во столбцов (зависит от кол-ва полей в dbf во время загрузки определяется кол-во столбцов в GRID), хочу в .text1.keypress у всех column поместить некоторый код. Как это сделать?
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #36185918
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: Местами администратор
> имеется класс, основанный на GRID, заранее не известно кол-во столбцов (зависит от кол-ва полей в dbf во время
> загрузки определяется кол-во столбцов в GRID), хочу в .text1.keypress у всех column поместить некоторый код. Как это
> сделать?

Сделать свой класс производный от TextBox, в кейпресс поместить нужный код и в после присвоения источника данных к гриду
поменять контролы грида на тексты своего класса


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #36187285
Beresnev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно и по другому
В метод Init() формы вписываете следующий код
*!* Назначение обработчиков события KeyPress
LOCAL i, loRef
FOR i = 1 TO THISFORM.Grid1.ColumnCount
loRef = EVALUATE("THISFORM.Grid1.Column" + TRANSFORM(i) + ".Text1")
BINDEVENT(loRef,"KeyPress",THISFORM,"On_KeyPress")
ENDFOR
где On_KeyPress() - это дополнительный метод формы, код которого несет нужную функциональность в ответ на событие KeyPress.
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #36187290
Beresnev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно и по другому
В метод Init() формы вписываете следующий код
*!* Назначение обработчиков события KeyPress
LOCAL i, loRef
FOR i = 1 TO THISFORM.Grid1.ColumnCount
loRef = EVALUATE("THISFORM.Grid1.Column" + TRANSFORM(i) + ".Text1")
BINDEVENT(loRef,"KeyPress",THISFORM,"On_KeyPress")
ENDFOR
где On_KeyPress() - это дополнительный метод формы, код которого несет нужную функциональность в ответ на событие KeyPress.
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #36244116
Местами администратор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Beresnev - решение просто супер!!! Все гениальное просто - собственно говоря конкретно эта задача была решена по-другому, переделывать пожалуй, уже не буду. Однако была проблема - как привязаться к Click в Header столбцов, собственно тему открыл, предложения были толковые, но времени требовали не мало (строить собственный класс Grid с нуля), немного модифицировал предложенную идею - и Click заработал!!! - времени заняло всего-то 2 минуты.
Спасибо огромное!!!
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Методы в GRID .column1.text1.keypress
    #37837453
9IKOB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите, пожалуйста, как создать дополнительный метод формы On_KeyPress(), код которого несет нужную функциональность в ответ на событие KeyPress?
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #37837464
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
9IKOB,

а чем вам родной Keypress не угодил?
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #37837470
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ааа, вот вы о чём... открываете форму, потом в меню "Form"-"New method...".
...
Рейтинг: 0 / 0
Методы в GRID .column1.text1.keypress
    #37837481
9IKOB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я уже сам разобрался. Спасибо
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Методы в GRID .column1.text1.keypress
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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