-
Знатоки программирования помогите в печати отчета. Имеется программа в делфи с базой в Акцесе. Нужно отправить нужную запись на печать. А мне открывается весь отчет, и нужно самому искать нужный отчет. Помогите пожалуйста! Заранее большое спасибо! Вот код программы для открытия: const acViewNormal = $00000000; acViewDesign = $00000001; acViewPreview = $00000002; var access:Variant; begin try access:=CreateOleObject('Access.Application'); except access := CreateOleObject('Access.Application'); End; access.Visible:=True; access.OpenCurrentDatabase('C:\ClientServer\ClientServer\Server\Data\База по экспертизе.mdb',True); access.DoCmd.OpenReport('Заявка', acViewPreview);
-
> try > access:=CreateOleObject('Access.Application'); > except > access := CreateOleObject('Access.Application'); > End;
Шикарно...) Access Violation, пофиг, еще раз попробуем...)
-
По другому не работает! там другая строка была. у меня открывате! Проблема не в этом! Нужно открыть нужную запись
-
чтобы открыть нужную запись сделайте источником данных запрос с параметром перед открытием подставляйте ключ записи в запрос в качестве параметра можно вставить например поле формы вроде переменную произвольного модуля тоже можно, но не поручусь в конструкторе запросов воспользуйтесь построителем выражений примерно так будет выглядеть select * from table where id=[Foms!MyForm!Fields] - но точное обращение смотрите в построителе подробнее не помню
|