|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
16.01.2012, 23:42 | #1 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Отображение файлов в TreeView или ListView...
1.
а). В папке с программой, находится папка "reports". б). Содержимое этой папки отображаем в TreeView. в). Если в папке "reports" пользователь создал ещё одну папку, куда положил свой отчёт (*.fr3), отображаем и их. (сами файлы отображаются без расширения) Пример (что должно получиться в итоге): г). Если пользователь создал в папке reports новую папку, создаём ей индекс изображения 0 (из ImageList1). д). Если пользователь создал отчёт (*.fr3) в какой либо папке, присваиваем ему индекс изображения 1 (из того же ImageList1). 2. а). Выбираем отчёт из списка и нажимаем "Просмотр" - отчёт открывается на просмотр. (frxReport1.ShowReport; ) б). Выбираем отчёт и нажимаем на "Редактор" - отчёт открывается в редакторе отчётов. (frxReport1.DesignReport; ) Очень надеюсь на Вашу помощь. Спасибо. P.S. Используется Delphi XE2 upd3 + FastReport VCL 4 Standard Edition Для тех - кто выложит полностью готовое решение, просьба написать мне в скайп и сообщить номер счёта "Яндекс.Деньги". Project1.rar Последний раз редактировалось tim21701; 17.01.2012 в 21:44. Причина: Добавил файл проекта. (как пример) |
17.01.2012, 01:29 | #2 |
Веб-дизайнер
Форумчанин
Регистрация: 11.08.2011
Сообщений: 305
|
А в чем вопрос?
Добавляйте узел при создании файла, после чего указывайте значение его ImageIndex, как вариант. Если за папкой Reports закреплена конкретная папка на компьютере то сканируйте файлы появляющиеся и исчезающие в ней. Вторую часть вопроса просто анализируйте значение ImageIndex (как и ровно любое другое значение, которое может отвечать за различие типов узлов): Код:
|
17.01.2012, 02:13 | #3 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
kettanaito Это немного не то, но спасибо.
Кстати, "report" расположена в папке с программой, и прописать к ней путь не получится, так как не известно - где вообще пользователь будет хранить папку с программой. Может в Program Files, а может и в C:\MyProgram. Господа форумчане, помогите создать/написать такую программу! В долгу не останусь... |
17.01.2012, 07:24 | #4 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Провозился столько времени, так и не нИАсилил... В итоге, решил сделать немного "попроще"...
Отказался от использования TreeView. Перешел на более простой ListView. Вот что получилось: Код:
1). Как спрятать расширение файлов? 2). Как во втором столбике вывести дату создания отчёта? 3). Как по дабл-клик открыть отчёт??? Исходники и экзешник внутри: Project9.rar ПОМОГИТЕ ПОЖАЛУЙСТА! Последний раз редактировалось tim21701; 17.01.2012 в 21:46. Причина: Добавил архив... |
17.01.2012, 15:49 | #5 |
Веб-дизайнер
Форумчанин
Регистрация: 11.08.2011
Сообщений: 305
|
Получить путь программы всегда можно с помощью ExtractFilePath(Application.ExeName ) - на заметку Отсюда получаем и путь к папке Reports. Далее просто следим за директорией отображая ее содержимое в древе (циклом можно загружать найденные файлы).
1. Как спрятать расширение файлов: Просто скопируй строку без расширения Код:
2. Сортировка. В свойствах компонента есть пункт Sort. 4. Опиши событие onDblClick у компонента TreeView. Последний раз редактировалось kettanaito; 17.01.2012 в 15:58. |
17.01.2012, 21:41 | #6 | |||
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
kettanaito Спасибо за ответ...
Цитата:
Цитата:
Цитата:
|
|||
18.01.2012, 11:08 | #7 |
Форумчанин
Регистрация: 08.09.2010
Сообщений: 880
|
Код:
|
18.01.2012, 14:52 | #8 |
Веб-дизайнер
Форумчанин
Регистрация: 11.08.2011
Сообщений: 305
|
К предыдущему коду могу посоветовать все же
Код:
Код:
|
18.01.2012, 15:30 | #9 |
Форумчанин
Регистрация: 08.09.2010
Сообщений: 880
|
kettanaito, пожалуйста, не путайте людей.
Ваш совет Код:
И не забывайте две вещи: значение переменной F где-то присваивается и индексация символов в строке начинается с 1, не с 0. |
19.01.2012, 01:29 | #10 |
Пользователь
Регистрация: 16.01.2012
Сообщений: 67
|
Прик Спасибо Вам огромное!
Вот бы ещё кто помог последние два вопроса решить... Сортировка по щелчку заголовка и открытие по дабл-клик |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Редактирование файлов и TreeView | apromix | Общие вопросы Delphi | 0 | 27.05.2011 11:55 |
отображение файлов | mojohead | Помощь студентам | 2 | 02.05.2011 13:25 |
Как в TreeView сделать отображение только определённого формата | Waqq | Компоненты Delphi | 0 | 02.12.2010 11:22 |
Отображение скрытых файлов и папок и отображение розширения всех файлов | beegl | Общие вопросы Delphi | 10 | 14.12.2008 22:02 |
Открытие файлов через TreeView | Xardas | Общие вопросы Delphi | 12 | 29.03.2008 11:30 |