Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Добавление записей в грид / 25 сообщений из 33, страница 1 из 2
21.11.2005, 15:08:49
    #33390297
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
У меня в грид выводится таблица. Мне надо при необходимости добавлять туда записи ручками. Когда я стою на последней записи я не могу опуститься на следующую и начать её редактировать. Подскажите как мне это сделать?
...
Рейтинг: 0 / 0
21.11.2005, 15:11:00
    #33390302
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
И еще вопрос где мне написать COUNT TO thisform.text1.value, что бы при изменении количества записей в гриде менялось соответственно и количество записей в текстовом поле. Заранее спасибо.
...
Рейтинг: 0 / 0
21.11.2005, 15:17:08
    #33390322
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1У меня в грид выводится таблица. Мне надо при необходимости добавлять туда записи ручками. Когда я стою на последней записи я не могу опуститься на следующую и начать её редактировать. Подскажите как мне это сделать?

Сделай перед этим append blank. Либо выноси редактирование в отдельные компоненты (text, edit...)
...
Рейтинг: 0 / 0
21.11.2005, 15:23:26
    #33390340
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1И еще вопрос где мне написать COUNT TO thisform.text1.value, что бы при изменении количества записей в гриде менялось соответственно и количество записей в текстовом поле. Заранее спасибо.

тебе нужно в какой-то момент делать append blank, либо delete... вот там и пиши...
...
Рейтинг: 0 / 0
21.11.2005, 15:26:43
    #33390351
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
А перед чем и где мне сделать append blank. Мне же надо добавлять не одну, а 500 записей
...
Рейтинг: 0 / 0
21.11.2005, 15:29:58
    #33390360
GrayFox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
*!*AfterRowColChange

IF LASTKEY() = 13
SELECT table1
APPEND blank
ENDIF
thisform.grid1.Refresh
***********
Count table1.kod to thisform.text1.value
thisform.text1.Refresh
...
Рейтинг: 0 / 0
21.11.2005, 15:36:48
    #33390385
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1А перед чем и где мне сделать append blank. Мне же надо добавлять не одну, а 500 записей

так все зависит от интерфейса в данном случае... вообще не думаю что красиво будет заполнять грид прямо в нем же... обычно при нажатии на кнопку "Добавить" открывается форма в котором заполняются нужные поля и при нажатии в ней "Записать" данные попадают в твой грид.

если все же решили заполнять прямо в гриде то
1. наипростейший.
Сделать кнопку на click которой прописать
например
Код: plaintext
1.
2.
3.
sele mytable
append blank
go bottom
thisform.grid1.setfocus

2. посложнее, но красивее
в keypress обрабатывать нажатие вниз, и если recno('') до и после нажатия совпадают, то запустить тот же код, указанный выше.
...
Рейтинг: 0 / 0
21.11.2005, 15:39:11
    #33390394
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
GrayFox*!*AfterRowColChange

IF LASTKEY() = 13
SELECT table1
APPEND blank
ENDIF
thisform.grid1.Refresh
***********
Count table1.kod to thisform.text1.value
thisform.text1.Refresh

и он в итоге будет плодить пустые записи после каждого ENTER... нехорошо.
...
Рейтинг: 0 / 0
21.11.2005, 15:56:54
    #33390455
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Когда я так делаю у меня первый раз получается, а потом когдая кликаю вдруг левой кнопочкой мышки у меня добовляется еще куча записей
...
Рейтинг: 0 / 0
21.11.2005, 16:27:12
    #33390561
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1Когда я так делаю у меня первый раз получается, а потом когдая кликаю вдруг левой кнопочкой мышки у меня добовляется еще куча записей
ну рассказывай что сделал???
...
Рейтинг: 0 / 0
21.11.2005, 16:28:43
    #33390568
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
sanya_tir air1Когда я так делаю у меня первый раз получается, а потом когдая кликаю вдруг левой кнопочкой мышки у меня добовляется еще куча записей
ну рассказывай что сделал???
простите ... сделаЛА...
...
Рейтинг: 0 / 0
21.11.2005, 16:53:02
    #33390649
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Значит делаю следующее:в гриде на afterRowColChange пишу:
IF LASTKEY() = 13
SELECT reestr
APPEND blank
ENDIF
thisform.grid1.Refresh()
Count to thisform.text1.value
thisform.text1.Refresh()
Изночально у меня вообще грид readonly, но если я начинаю кликать мышкой у меня появляются пустые строки, хотя грид все таки readonly.
...
Рейтинг: 0 / 0
21.11.2005, 17:32:49
    #33390770
Redrik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Код: plaintext
1.
2.
3.
4.
IF nKeyCode= 145 
   SELECT TmpTovar
   APPEND BLANK
   THISFORM.Refresh
ENDIF
Засуньте это в тот же After... и объясните юзеру, что новые записи добавляются по одной осмысленным нажатием Ctrl+DnArrow...
P.S. Вы же пошутили насчет 500 записей? ;-)
...
Рейтинг: 0 / 0
21.11.2005, 17:34:27
    #33390774
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Да нет не пошутила
...
Рейтинг: 0 / 0
21.11.2005, 17:36:41
    #33390781
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Все равно когда кликаю мышкой добавляет записи. Как этого избежать?
...
Рейтинг: 0 / 0
21.11.2005, 17:44:23
    #33390810
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
должен быть readonly не грид а его column-ы. тогда править нельзя будет...
...
Рейтинг: 0 / 0
21.11.2005, 17:47:37
    #33390821
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1Все равно когда кликаю мышкой добавляет записи. Как этого избежать?

при клике мышью по ячейкам грида, срабатывает afterrowcolchange. только тут непонятно почему срабатывает append blank... хотя по идее не должен. Запусти отладку, может прояснится что-то...
...
Рейтинг: 0 / 0
21.11.2005, 17:54:13
    #33390838
sanya_tir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
хотя все правильно!!!
если последнее что вы нажали было ENTER или по новому CTRL+ENTER, то lastkey всегда будет возвращать именно это значение, поэтому при срабатывании afterrowcolchange (кликанье по ячейкам). будут добавляться записи.
Думаю что правильнее будет отлавливвать CTRL+стрелка вниз (как указано выше), только вставить надо это в keypress.
...
Рейтинг: 0 / 0
21.11.2005, 20:15:23
    #33391019
Redrik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1Да нет не пошутила
Я в смысле одновременного их добавления! ;-)
Короче, мой предыдущий пример кода - именно для KeyPress! Почему Вы не хотите попробовать?
...
Рейтинг: 0 / 0
22.11.2005, 11:52:07
    #33391938
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Очень хочу и сейчас попробую. Я надеюсь Вы будете со мной на связи
...
Рейтинг: 0 / 0
22.11.2005, 12:12:55
    #33392021
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Не, не работает. Пишу на keypress:
nKeyCode=INKEY()
IF nKeyCode = 14
SELECT reestr
APPEND blank
ENDIF
thisform.grid1.Refresh()
Count to thisform.text1.value
thisform.text1.Refresh()
НЕ РАБОТАЕТ
...
Рейтинг: 0 / 0
22.11.2005, 12:27:36
    #33392086
Redrik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
air1
Код: plaintext
nKeyCode=INKEY()

Это зачем?

air1
Код: plaintext
IF nKeyCode =  14 

Ctrl+N ?

air1
Код: plaintext
1.
2.
thisform.grid1.Refresh() 
Count to thisform.text1.value
thisform.text1.Refresh() 	

Код: plaintext
1.
thisform.text1.value=RECCOUNT("Reestr")
THISFORM.Refresh
И достаточно...

P.S. Может Вы свою формочку сюда выложите? Так будет быстрее и проще!
...
Рейтинг: 0 / 0
22.11.2005, 12:35:00
    #33392116
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
...
Рейтинг: 0 / 0
22.11.2005, 13:54:03
    #33392395
air1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Ну так что, никто мне не подскажет как сделать, чтобы по нажатию стрелочки вниз (если дальше идет не пустая строка, то просто переходитьна стрелочку вниз, а если дальше нет строк, то добавляется пустая строка)
...
Рейтинг: 0 / 0
22.11.2005, 14:06:09
    #33392441
GrayFox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление записей в грид
Tvoyu Zip file ne vozmojno otkrit.Esli mojno yeshyo raz prekiley.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Добавление записей в грид / 25 сообщений из 33, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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