|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.03.2009, 08:03 | #1 |
Форумчанин
Регистрация: 22.09.2008
Сообщений: 309
|
Сылка на внешний файл в отчете
Мне нужно сформировать отчет. В отчете для поля рисунок я ввел модуль
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 серийный номер, которые соответствуют именам файлов с фотографиями. В данном примере фотографии выходят, но только для текущего серийного номера и распространяется на все строки отчета. Подскажите, что мне нужно сделать, что бы в отчете для каждого серийного номера в своей строке выходил соответствующий рисунок?
Думайте глобально - действуйте локально!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вертикальные линии в отчете | 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 |