freepascal.ru

Здравствуйте,первый раз вообще пишу на форумы,но без этого никак сейчас.
Есть тема курсовой.в общем. Звучит она так "Организовать панель "Закладки",как в Delphi".
Мне нужно все это написать используя лишь Turbo Vision(TV).

Нужна помощь в старте хотя бы,что можно сделать.
Есть файлы,общедоступные. Называются DOCDEMOS,по ним небольшая документация так же имеется. То есть,автор написал некоторую программу,чтобы продемонстрировать ее функционал(TV). По ним так же делали лабы.
Работали над кодом,чтоб что-то изменить. Могу эти файлы тоже отправить,если кому нужно будет.

imaginarypilot писал(а):Организовать панель "Закладки",как в Delphi

Речь про панель с вкладками? В исходниках FP есть диалоговые окна с вкладками, можете полюбопытствовать.
Или вкладкам нужны какие-то свои иные назначение и поведение?

bormant Программа,открывает файлы. И нужно иметь доступ к этим файлам через закладки.

imaginarypilot, находите в коде примеры как создавать закладки, потом - как размещать нечто в определенной закладке. Подробнее вам вряд ли кто-то тут скажет, лично я последний раз турбовижн видел 25 лет назад, другие, полагаю, тоже. После 1995-го года он безнадежно устарел.

Читайте тут
https://wiki.freepascal.org/Free_Vision
Примеры
https://github.com/sechshelme/Lazarus-FreeVision

Снег Север писал(а):После 1995-го года он безнадежно устарел.

Ну были еще графические и реплики ... Типа Graphics Vision


...или SuperVision .(Это кстати мой проект 97-го года )

Но по большей части все они все равно были под DOS (В лучшем случае с DPMI ).
Но до начала нулевых этот фреймворк точно дожил.

bormant писал(а):

imaginarypilot писал(а):Организовать панель "Закладки",как в Delphi

Речь про панель с вкладками? В исходниках FP есть диалоговые окна с вкладками, можете полюбопытствовать.
Или вкладкам нужны какие-то свои иные назначение и поведение?

Вот кстати о Turbo Vision. Я тут в процессе портирования Dos Navigator'а на линукс выяснил, у нас она (ну, free vision) не юникодная, и это печально.
А бывает юникодная, вот: https://github.com/magiblot/tvision
Только там C++17

И я вот что подумал: а не взять ли, скажем, SWIG, и не сделать ли к ней биндинг?
https://wiki.freepascal.org/SWIG

Что скажете, коллеги?

Перспективнее, на мой взгляд, пропатчить FV аналогичным образом.
Использование FV предполагает активное создание объектов-наследников. Как с этим будет в обёртка, поди знай. Но ежели кто займётся биндингом, тоже было бы интересно посмотреть, чем дело закончится.

bormant писал(а):Перспективнее, на мой взгляд, пропатчить FV аналогичным образом.
Использование FV предполагает активное создание объектов-наследников. Как с этим будет в обёртка, поди знай. Но ежели кто займётся биндингом, тоже было бы интересно посмотреть, чем дело закончится.

Для начала, высказался в тикете по этому поводу
https://bugs.freepascal.org/view.php?id=21373

А вот автор объясняет, как именно он, собственно, utf-8 в турбо вижн впиливал:
https://github.com/magiblot/tvision/iss ... -718866916

bormant писал(а):Перспективнее, на мой взгляд, пропатчить FV аналогичным образом.

А вот кстати пропатчил. Пока ещё не всё работает (класс текстового редактора надо дорабатывать под utf8 ещё), но базовый интерфейс и основные контролы нормально рисуются уже, можно открыть в демо-приложеньке текстовый файл в UTF-8 и даже прочитать то, что там написано

https://github.com/unxed/fv_utf8

Делаю только под линукс пока, потому что винды у меня нет и не предвидится. Но в принципе нет никаких причин этому всему не заработать на современной винде, где есть ANSI в консоли и UTF-8 локаль.

Добавлено спустя 8 часов 57 минут 52 секунды:
Тут выяснилось, что во Free Pascal'е уже сделали адаптацию Free Vision под юникод. Ждёт мержа в основную ветку. Пожалуй, стоит дождаться, когда вмержат, и работать с этой версией уже дальше. Детали тут: https://gitlab.com/freepascal.org/fpc/s ... _833019965