Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.03.2009, 08:03   #1
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 307
Вопрос Сылка на внешний файл в отчете

Мне нужно сформировать отчет. В отчете для поля рисунок я ввел модуль
Private Sub рис1_DblClick(Cancel As Integer)
DirPhoto = CurrentProject.Path & "\pic"
FileName = Dir(DirPhoto & "\" & [F1].Value & ".*")
If FileName <> "" Then
рис1.Picture = DirPhoto & "\" & FileName
Else
рис1.Picture = CurrentProject.Path & "\pic\logo1.jpg"
End If
End Sub
, где "pic" папка с фотографиями, а F1 серийный номер, которые соответствуют именам файлов с фотографиями. В данном примере фотографии выходят, но только для текущего серийного номера и распространяется на все строки отчета.
Подскажите, что мне нужно сделать, что бы в отчете для каждого серийного номера в своей строке выходил соответствующий рисунок?
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вертикальные линии в отчете Nikolaeva БД в Delphi 3 30.07.2019 09:45
Дата в Rave отчете S@fer БД в Delphi 0 26.02.2009 11:39
Внешний жёсткий диск не опознаётся компьютером Crivel Компьютерное железо 5 29.01.2009 17:53
Таблица в отчете Nikolaeva Компоненты Delphi 0 12.09.2008 11:27
Внешний Ip Enemy Работа с сетью в Delphi 3 20.11.2007 01:00