Создание обычной оболочки типа Norton, Turbo Vision |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Создание обычной оболочки типа Norton, Turbo Vision |
-Nick Spirit- |
11.06.2007 10:29
Сообщение
#1
|
Гость |
Вот возникла такая проблема с написанием проги. Вообщем требуется создать окно в котором бы с права выводились все директории на диске С:\ слева соответственно файлы. Короче выбираешь директорию прога входит в неё пишет там все папки и файлы. и всё. Я сделал окно вывел папки и файлы на С:\ но вот как осуществить тот самый выбор не знаю. Буду очень благодарен если кто поможет! Заранее спасибо!!! Если понадобится мой код скажите.
|
DJ_Nick-Spirit |
11.06.2007 10:43
Сообщение
#2
|
Гость |
Всё таки решил добавить мой код
Прикрепленные файлы MANAGER1.PAS ( 2.54 килобайт ) Кол-во скачиваний: 182 |
volvo |
11.06.2007 11:47
Сообщение
#3
|
Гость |
Зачем же опять придумывать то, что уже есть?
В папке EXAMPLES\TVFM лежит исходник на TV, который позволяет отображать дерево директорий, и содержимое каждой из них. |
DJ_Nick-Spirit |
11.06.2007 11:49
Сообщение
#4
|
Гость |
Volvo спасибки щас загляну. Посмотрим что там есть.
Добавлено через 4 мин. Обидно но у меня нет EQU.TPU |
volvo |
11.06.2007 12:01
Сообщение
#5
|
Гость |
Скомпилируй:
Прикрепленные файлы EQU.PAS ( 4.84 килобайт ) Кол-во скачиваний: 161 |
Ozzя |
11.06.2007 12:02
Сообщение
#6
|
Гуру Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: 16 |
Держи
Прикрепленные файлы EQU.ZIP ( 1.52 килобайт ) Кол-во скачиваний: 172 |
DJ_Nick-Spirit |
11.06.2007 15:06
Сообщение
#7
|
Гость |
Не компайлит. ((( у меня вообщем нету 3-х TPU-шников: вот этого EQU, Globals, Tools. Сорри можа я чего не понимаю или делаю не так. но он пишет типа не могу прокомпилировать Init
Добавлено через 2 мин. Всё компайлит.Понял. Но всё таки если мне кто нить скинет ещё 2 оставшиеся TPU буду очень признателен! Thank's! |
volvo |
11.06.2007 15:10
Сообщение
#8
|
Гость |
Тебе проще будет скачать TV полностью... У тебя, видимо, какая-то урезанная версия...
http://www.sigala.it/sergio/tvision/resources.html#sources |
DJ_Nick-Spirit |
11.06.2007 15:18
Сообщение
#9
|
Гость |
Спасибки. Там чёто так много всяких файлов блин какой качать даже не знаешь. Лан разберёмся щас.
|
volvo |
11.06.2007 15:23
Сообщение
#10
|
Гость |
Сорри. Там нет исходников на Паскале, только на С... Вот все TPU - файлы, которые у меня получились при компиляции TVFM с помощью Turbo Pascal 7.0 (если у тебя другая версия - это не сработает...)
Прикрепленные файлы tvfm.rar ( 73.87 килобайт ) Кол-во скачиваний: 173 |
DJ_Nick-Spirit |
11.06.2007 15:28
Сообщение
#11
|
Гость |
Норм. У меня 7.0. Так что всё в поряде! Thank's
Добавлено через 9 мин. Володя такой вопрос: Вот как вот этот вот исходник применить в проге? я просто вот в этом не очень шарю. |
DJ_Nick-Spirit |
14.06.2007 20:19
Сообщение
#12
|
Гость |
Volvo или кто нить всё таки скажите мне плиз как исходник использовать. тут прочитал что если подключить этот модуль(DirView) то будут доступны все функции и процедуры из него. Но как их вызывать то??? Тfv такие процедуры и функции. И главное не знаешь какие вообще нужны то.... ((((
Добавлено через 16 мин. Искренне прошу помочь!!!Мне завтра уже сдавать надо. А у меня только этот грёбаный список и работает. И не знаю я как исходник применять. ((((((((((( Добавлено через 7 мин. Если у кого есть время то плиз дополните мой код чтобы всё работало. ((((((((((((((((Не знаю я как дальше сделать... ОЧЕНЬ ПРОШУ. Заранее благодарен. |
DJ_Nick-Spirit |
14.06.2007 23:25
Сообщение
#13
|
Гость |
мдя.... thank's(((
|
DJ_Nick-Spirit |
15.06.2007 0:09
Сообщение
#14
|
Гость |
МИСС_ГРАФФИТИ может хоть вы взглянете на мой код???очень нада............ сдавать уже сёдня... у меня неполучается выбор определённой директории и вывод всех файлов в ней. Мне вот исходник показали но я не знаю как его применить. Даже не знаю как его вообще запустить. Вот мой код
|
volvo |
15.06.2007 0:18
Сообщение
#15
|
Гость |
Цитата скажите мне плиз как исходник использовать. тут прочитал что если подключить этот модуль(DirView) то будут доступны все функции и процедуры из него. Но как их вызывать то??? Я что тебе про ЭТОТ модуль где-то говорил? Речь шла о чем? О примере... А пример - это программа... Вот открой программу (TVFM.PAS), скомпилируй, запусти, и иди дальше изобретать велосипед, если твоему преподавателю это не понравится...А то что тебе сдавать сегодня - это чья проблема? Ты 11-го числа создал тему, в которой хотел помощи по Turbo Vision... А тут выясняется, что ты даже не можешь использовать готовый модуль. Так как ты за 3 дня хотел написать программу полностью? Опять, конечно преподаватель виноват? В последнюю секунду подкинул такое задание? |
DJ_Nick-Spirit |
15.06.2007 0:26
Сообщение
#16
|
Гость |
Volvo СОРРИ!!! Я же не так шарю как вы! Вот и просил помощи. про модуль: я сначала нашёл вот это Dirview.Pas. Огромное спасибо тебе!!! ОЧЕНЬ БЛАГОДАРЕН!!!
|
Текстовая версия | 26.05.2024 21:57 |