powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ну в чем ошибка!!!!!!!!!!!!
13 сообщений из 13, страница 1 из 1
Ну в чем ошибка!!!!!!!!!!!!
    #33392684
air1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну в чем ошибка!!!!! Это написано в гриде на кейпресс
IF nKeyCode = 121 AND nShiftAltCtrl=0
SELECT reestr
APPEND blank
thisform.grid1.Refresh()
ENDIF
Не добавляет строку и все
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392697
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в ДНК
у грида нет KeyPress() - есть у контрола колонки. Поэтому либа ты не в этой колонке торчишь, либа одно из двух.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392733
air1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это абсолютно не смешно:
1) когда сидишь над задачей уже 4 часа, тот тут уже ваще не смешно
2) У колонки в гриде нет никакого keypress() он является методом gridа
3)За ДНК спорить не возьмусь, но вот уже 4 часа прошу людей с нормальным ДНК совета и никто мне не ответил, а то что отвечают либо шутка либо не работает либо не то что нужно.
А я хочу всего лишь, чтобы по нажатию клавиши "у" добавлялась строчка в гриде.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392759
Финансист
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
air1Ну в чем ошибка!!!!! Это написано в гриде на кейпресс
IF nKeyCode = 121 AND nShiftAltCtrl=0
SELECT reestr
APPEND blank
thisform.grid1.Refresh()
ENDIF
Не добавляет строку и все

Это надо в keypress формы засунуть, или установить у грида AllowCellSelection = .F.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392777
air1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Финансист air1Ну в чем ошибка!!!!! Это написано в гриде на кейпресс
IF nKeyCode = 121 AND nShiftAltCtrl=0
SELECT reestr
APPEND blank
thisform.grid1.Refresh()
ENDIF
Не добавляет строку и все

Это надо в keypress формы засунуть, или установить у грида AllowCellSelection = .F.
Так тоже не получилось
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392786
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
IF nKeyCode =  121  AND nShiftAltCtrl= 0 
      SELECT reestr
      APPEND blank
      thisform.grid1.Refresh() 
      NODEFAULT
ENDIF
вот этот кусок кода должен быть в KeyPress() _контрола_колоноки_
либа в каждом _контроле_колоноки_
Код: plaintext
this.Parent.Parent.KeyPress(nKeyCode, nShiftAltCtrl)
а верхний в KeyPress() грида
ЗЫ звиняй, у тя наверна версия постарше 6. Там небыло на гриде
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392805
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
air1 Финансист air1Ну в чем ошибка!!!!! Это написано в гриде на кейпресс
IF nKeyCode = 121 AND nShiftAltCtrl=0
SELECT reestr
APPEND blank
thisform.grid1.Refresh()
ENDIF
Не добавляет строку и все

Это надо в keypress формы засунуть, или установить у грида AllowCellSelection = .F.
Так тоже не получилось

ключевое слов - NODEFAUL перед ENDIF и frm.KeyPreview=.T.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33392824
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
http://www.sql.ru/forum/actualthread.aspx?tid=237039&pg=2#2095461

Зачем топики плодить?! :-(
Не лучше ли любимые книги почитать?

HELPIf the AllowCellSelection property for a grid is set to True (.T.), Visual FoxPro disregards the Grid KeyPress event and uses the event at the individual cell level.

P.S. Во те и "финансист"... И как токо он успевает "финансить", "фоксить" и выпендриваться? :-)
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33393235
GrayFox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Dobav formu CommandButton v click napishi:

PUBLIC nRecn
nRecn =RECNO()
SELECT table1
GO bottom
APPEND BLANK
Thisform.Grid1.Refresh

A v avtoRowColChange napishi

Thisform.command1.Click I ne zabivay v Init formu napisat
Thisform.command1.Visible = .F.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33393304
sanya_tir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пиши все в keypress формы, только поставь на форме keypreview = .t., и учти что сочетания с CTRL не будут обрабатываться, используй ALT.

и еще, вставь туда контрольные сообщения типа messagebox('Нажата клавиша...'), так быстрее разберешься когда у тебя срабатывает условие и добавляется строка, а когда нет...
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33393333
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Странный способ слушать советы...
http://www.sql.ru/forum/actualthread.aspx?tid=237487#2095441
Сделайте ТАК и забудьте о "проблемах"!
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33393982
air1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Когда я делаю так как мне все советуют, да я уже могу по нажатию "У" добавлять строку, но проблема состоит в том что таким образом я перехватываю событие: нажатие на клавишу. И с этого момента у меня вообще не работает нажатие на другие клавиши, то есть я не могу редактировать.
...
Рейтинг: 0 / 0
Ну в чем ошибка!!!!!!!!!!!!
    #33394548
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ещё раз форму сюда! (с кусочком таблички желательно)
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Ну в чем ошибка!!!!!!!!!!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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