rts.Engine.TableLink For Each

Автор admin Среда, 27 января 2010 10:16

rts.Engine.TableLink For Each myLink In myLinks MsgBox(“Конечная таблица: ” & myLink.DestinationTable.Name.ToString() с “.” * myLink.DeetinationFields.Itern(1).Name.ToString()) MsgBox(“Исходная таблица: ” С myLink.SourceTable.Name.ToString() С “.” t myLink.SourceFields.Item(1).Name.ToString()) MsgBox (“Тип объединения: ” 6 myLink.JoinType.ToString()) Next End Sub Скомпилируйте код и запустите его на выполнение. Одно за другим должны открыться несколько окон сообщений, содержащие имена источников и мест назначения связей, а также типы объединений. Пример одного из таких окон показан на рис. 8.6. Работа с машиной Crystal Reports 283 Следует помнить, что эти свойства доступны только для чтения – с их помощью нельзя определять связи между таблицами. Если задача состоит в изменении связей, используемых в базе данных, во время выполнения, необходимо воспользоваться режимом выталкивания данных в отчет для заданного источника данных. Заталкивание данных в отчет Ранее, в главе 1, в ходе рассмотрения различных способов разработки отчетов, мы кратко коснулись построения отчетов типа “Push” (“заталкивания”) и “P