powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Курсорадаптер
5 сообщений из 5, страница 1 из 1
Курсорадаптер
    #36883098
faustgreen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите, как в dataenviroment установить связь между двумя курсорадаптерами ?
...
Рейтинг: 0 / 0
Курсорадаптер
    #36883203
Ffffffffffffffff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Мышью - никак. Программно. Или второй CA сделать параметризованным и обновлять.
...
Рейтинг: 0 / 0
Курсорадаптер
    #36886577
faustgreen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Покаполся в хелпе, почитал клепенина, но так и не смог добиться толку. (
Может кто поможет:
к примеру на форме размещены 2 таблиц:
Покупатель:
id fio
и товар:
id idpokupatel tovar

Данные берутся из Oracle при помощи 2 курсорадаптеров.
Необходимо сделать так, чтобы при выбори записи в таблице ПОКУПАТЕЛЬ в таблице ТОВАР отображались только записи соответствующие условию id=idpokupatel.

Как програмно создать связь и где разместить код?(). Либо есть другие способы реализации этой задачи ?
...
Рейтинг: 0 / 0
Курсорадаптер
    #36886601
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
клиентская часть для Sql Server 2005,
возможно натолкнет на какие-то мысли.
...
Рейтинг: 0 / 0
Курсорадаптер
    #36888782
LUCIAN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
faustgreen
Как програмно создать связь и где разместить код?(). Либо есть другие способы реализации этой задачи ?
Код: 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.
30.
31.
32.
33.
34.
35.
36.
37.
*ДЛЯ ВЕДУЩЕГО GRID
	PROCEDURE grdcatex.Init
		THIS.ADDPROPERTY("OBNOW",.F.)
		THIS.ADDPROPERTY("MATC", 0 )
		THIS.SetAll("dynamicbackcolor","IIF(CATEX.CMAT=THIS.MATC, RGB(128,255,128), RGB(255,255,255))", "Column")
	ENDPROC


	PROCEDURE grdcatex.AfterRowColChange
		LPARAMETERS nColIndex
		THIS.MATC=CATEX.CMAT && ПАРАМЕТР ДЛЯ catxsk
		THIS.OBNOW=.F.
		THIS.REFRESH
		This.parent.grdCatxsk.OBNOW=.T.
		This.parent.grdCatxsk.REFRESH
	ENDPROC


*ДЛЯ ВЕДОМОГО GRIDA-CURSORADAPTER-catxsk.SELECTCMD=
SELECT MS.Cmat,MS.nmat,MS.prvs,EDS.iedi EIS  FROM  (SELECT *  FROM   LIDA.NSI_MAT WHERE id_mat_teh=?CATEX.CMAT)  MS  LEFT JOIN LIDA.NSI_SEI EDS  ON EDS.kedi      = MS.kedi


	PROCEDURE grdcatxsk.Init
		THIS.ADDPROPERTY("OBNOW",.T.)
	ENDPROC


	PROCEDURE grdcatxsk.Refresh
		IF THIS.OBNOW
			This.RecordSource=""
			ThisForm.DataENVIRONMENT.CATXSK.CURSORFILL()
			This.RecordSource="CATXSK"
		ELSE
			DODEFAULT()
		ENDIF
		THIS.OBNOW=.T.
	ENDPROC
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Курсорадаптер
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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