Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сортировка в Гриде / 10 сообщений из 10, страница 1 из 1
18.02.2005, 11:20
    #32922651
uho
uho
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
Таблица проиндексирована
В событие grid1.header1.DblClick прописано
set order to tag1
thisForm.refresh

в grid1.header2.DblClick
set order to tag2
thisForm.refresh

Сортировка идет удачно, однако, если встать на определенную запись в Grid, а затем пересортировать, то нужная запись теряется.
Пробовала запоминать, а после сортировки делать seek(..)
Не получается, подскажите, что я упустила из виду?
...
Рейтинг: 0 / 0
18.02.2005, 11:26
    #32922674
leaf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
зачем seek если есть recno()
в остальном первое впечатление что где-то путаетесь
...
Рейтинг: 0 / 0
18.02.2005, 11:30
    #32922684
Сортировка в Гриде
в grid1.header2.DblClick

select("твоя_табл")

lnRecno=RECNO()
set order to tag2
go lnRecno

thisForm.refresh
...
Рейтинг: 0 / 0
18.02.2005, 11:38
    #32922708
uho
uho
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
Тарас Войциховськийв grid1.header2.DblClick

select("твоя_табл")

lnRecno=RECNO()
set order to tag2
go lnRecno

thisForm.refresh

так я тоже пробовала, не получается.
Такое ощущение, что указатель в таблице и GridLine существуют порознь.
...
Рейтинг: 0 / 0
18.02.2005, 11:49
    #32922745
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
А текущая запись подпадает под вновь устанавливаемый TAG?
...
Рейтинг: 0 / 0
18.02.2005, 11:52
    #32922755
Сортировка в Гриде
http://www.foxclub.ru/sol/index.php?act=view&id=332
...
Рейтинг: 0 / 0
18.02.2005, 12:03
    #32922804
uho
uho
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
AleksMedА текущая запись подпадает под вновь устанавливаемый TAG?
да, когда я меняю Order в таблице, просто открыв ее в VFox, указатель остается на той записи, что мне нужна. А в гриде указатель не двигается, хотя
данные меняют порядок.
...
Рейтинг: 0 / 0
18.02.2005, 12:50
    #32922972
Владимир СА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
uhoТаблица проиндексирована
В событие grid1.header1.DblClick прописано
set order to tag1
thisForm.refresh

в grid1.header2.DblClick
set order to tag2
thisForm.refresh

Сортировка идет удачно, однако, если встать на определенную запись в Grid, а затем пересортировать, то нужная запись теряется.
Пробовала запоминать, а после сортировки делать seek(..)
Не получается, подскажите, что я упустила из виду?

Попробуте это...
В событии grid1.header1.DblClick
LOCAL lnRecNo
lnRecNo = IIF(!EOF('My_table'), RECNO('My_table'), 0)
SET ORDER TO My_teg1 IN My_table
WITH This.Parent.Parent
.ActivateCell(1, .ActiveColumn)
IF lnRecNo # 0
GO (lnRecNo)
ELSE
GO TOP
ENDIF
ENDWITH
...
Рейтинг: 0 / 0
18.02.2005, 13:02
    #32923033
Владимир СА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
Попробуте это...
В событии grid1.header1.DblClick
LOCAL lnRecNo
lnRecNo = IIF(!EOF('My_table'), RECNO('My_table'), 0)
SET ORDER TO My_teg1 IN My_table
WITH This.Parent.Parent
.ActivateCell(1, .ActiveColumn)
IF lnRecNo # 0
GO (lnRecNo)
ELSE
GO TOP
ENDIF
ENDWITH
Забыл добавить конечно..
THISFORM.My_grid.Refresh()
...
Рейтинг: 0 / 0
18.02.2005, 13:51
    #32923199
uho
uho
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сортировка в Гриде
Владимир СА
Попробуте это...
В событии grid1.header1.DblClick
LOCAL lnRecNo
lnRecNo = IIF(!EOF('My_table'), RECNO('My_table'), 0)
SET ORDER TO My_teg1 IN My_table
WITH This.Parent.Parent
.ActivateCell(1, .ActiveColumn)
IF lnRecNo # 0
GO (lnRecNo)
ELSE
GO TOP
ENDIF
ENDWITH
Забыл добавить конечно..
THISFORM.My_grid.Refresh()

Так работает! Спасибо! :))
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сортировка в Гриде / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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