Гость
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос про GRID / 6 сообщений из 6, страница 1 из 1
22.04.2003, 09:58
    #32145640
Samir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
При выполнении команды

THISFORM.GRID.RECORDSOURCE = "TABLE"

GRID автоматически изменяется, т.е. меняются заголовки, ширина строк и столбцов и т.д.

Как с этим бороться?
...
Рейтинг: 0 / 0
22.04.2003, 10:03
    #32145648
Crip
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
		WITH THISFORM.oGrd
			LOCAL loC AS COLUMN
			FOR EACH loC IN .COLUMNS

				loC.COMMENT = loC.CONTROLSOURCE

			ENDFOR


			.RECORDSOURCETYPE =  1 
			.RECORDSOURCE =  ""
			.RECORDSOURCE = " Table"
			FOR EACH loC IN .COLUMNS

				loC.CONTROLSOURCE = loC.COMMENT

			ENDFOR

		ENDWITH
...
Рейтинг: 0 / 0
22.04.2003, 10:26
    #32145673
Samir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
Ну если так делать, то код для GRIDа будет в несколько раз превышать весь код программы.
Или я не прав ?
Есть ли другие методы решения этой задачи?
...
Рейтинг: 0 / 0
22.04.2003, 10:46
    #32145698
Crip
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
Ну так оформи это ввиде функции...
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
FUNCTION
LPAR toGrd,tcAlias
		WITH toGrd
			LOCAL loC AS COLUMN
			FOR EACH loC IN .COLUMNS

				loC.COMMENT = loC.CONTROLSOURCE

			ENDFOR


			.RECORDSOURCETYPE =  1 
			.RECORDSOURCE = ""
			.RECORDSOURCE = tcAlias
			FOR EACH loC IN .COLUMNS

				loC.CONTROLSOURCE = loC.COMMENT

			ENDFOR

		ENDWITH
...
Рейтинг: 0 / 0
22.04.2003, 20:42
    #32146258
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
Тут ничего не поделаешь. Придется писать нечто вроде того, что написал Crip . Общая логика такая:

-) Обнулить источник данных для Grid (RecordSource="")
-) Установить новый источник данных для Grid
-) Установить источник данных для каждой колонки Grid

Последнего пункта можно избежать только в том случае, если столбцы в Grid идут в том же порядке, что и поля в источнике, причем в качестве источников выступают соответсвующие поля источника по порядку.
...
Рейтинг: 0 / 0
23.04.2003, 09:13
    #32146351
Jimmy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про GRID
Вот здесь ценная статья о Grid: http://nsvisual.com/fox2/sol/index.php?act=view&id=173
Изложены приемы и техника работы.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос про GRID / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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