powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / выбор индекса при клике по столбцу Грида?
6 сообщений из 6, страница 1 из 1
выбор индекса при клике по столбцу Грида?
    #35920377
Tohan_ORA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
День добрый!

Необходимо динамически во время нажатия на заголовки столбцов Грида менять порядок сортировки и её вид(asc or desc).
Если я правильно понял, то мне необходимо поместить код перестройки индексов в каждое событие Click Header-а каждого столбца и после перерисовать грид.
Но что-то не совсем ясно как это реализовать в моём куске кода?

Ранее в событии Load формы создаю курсор со структурными индексами:
Код: plaintext
1.
2.
3.
4.
CREATE CURSOR c_ab(nomer char( 15 ),kateg n( 5 )) 
INDEX on nomer TAG nom_desc desc
INDEX on nomer TAG nom_asc
INDEX on kateg TAG kateg_asc

В событии Init Myform.grid1
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
WITH this
    .RecordSourceType =  1  
	.RecordSource='c_ab'
	.columncount = 11 
	.DeleteMark = .F.
	.scrollbars= 2 
	.RecordMark = .F.
	
	WITH .column1
	.controlsource = 'c_ab.nomer'
	.header1.caption='Мой заголовок1'
	.width= 70 
	.readonly=.t.
	.columnorder= 1 
          *'!!!!!'
	*.Header1.click('?????')
***тут при каждом нажатии необходимо сортировать по возвр / убыванию
**set order to nom_desc
          **'!!!!!'
	endwith

	WITH .column2
	.controlsource = 'c_ab.kateg'
	.header1.caption='Мой заголовок2'
	.width= 60 
	.readonly=.t.
	.columnorder= 2 
	endwith
endwith
...
Рейтинг: 0 / 0
выбор индекса при клике по столбцу Грида?
    #35920503
Guest0909
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Зачем 2 тэга.
можно
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
index on Nomer Tag MyNom
...
if Tag()='NOMER'
  if descending()
    SET ORDER TO tag MyNom ASCENDING
  else 
    SET ORDER TO tag MyNom DESCENDING
  endif 
endif 
...
Рейтинг: 0 / 0
выбор индекса при клике по столбцу Грида?
    #35921067
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тынц сюда
http://sql.ru/forum/actualfile.aspx?id=7012259

здесь есть вариант реализации
...
Рейтинг: 0 / 0
выбор индекса при клике по столбцу Грида?
    #35928257
Tohan_ORA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
прошелмимотынц сюда
http://sql.ru/forum/actualfile.aspx?id=7012259
здесь есть вариант реализации
Спасибо.
Но если будут еще варианты, то взял бы на вооружение.
...
Рейтинг: 0 / 0
выбор индекса при клике по столбцу Грида?
    #35928388
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tohan_ORAпрошелмимотынц сюда
http://sql.ru/forum/actualfile.aspx?id=7012259
здесь есть вариант реализации
Спасибо.
Но если будут еще варианты, то взял бы на вооружение.
Глянь тут: http://vfox.kristall.ru/grid.html
С уважением, Алексей.
...
Рейтинг: 0 / 0
выбор индекса при клике по столбцу Грида?
    #35929645
Tohan_ORA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Aleksey-KTohan_ORAпрошелмимотынц сюда
http://sql.ru/forum/actualfile.aspx?id=7012259
здесь есть вариант реализации
Спасибо.
Но если будут еще варианты, то взял бы на вооружение.
Глянь тут: http://vfox.kristall.ru/grid.html
С уважением, Алексей.

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


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