Давно не был на форуме. Всем здрасте!
Решил выложить наработки прямо сюда, а то у меня на компьютере чорт знает что творится.
Краткое описание вложений.
Ide_Res.part.rar - Кому интересен формат файла ресурсов и работа с ним, данная наработка - визуальный редактор ресурсов
Так как много времени ушло на разбор ресурсов диалогов и икон то некоторые ресурсы не реализовал!
Img_Editor.zip - Болванка и наработки для работы с картинками, слоями иконками и т.д. (что то на вроде
http://mainview.ru/raznoe/software/usef ... on-editors)
CompilerNew.zip - Портированая версия OPCL 2.4 на Delphi.
2.6.zip - Исправленная и дополненная версия OPCL 2.5 (исправления касаются работы с Windows Dialogs окнами)
В папке с примерами библиотека OVCL(Oberon Visual Component Library) со стандартными контролами, компонентами, окнами и т.д.
А так же заготовка для Notepad на Обероне.
IDE_Full.zip - полная среда разработки с интегрированным компилятором на Delphi 2006, для использования на Delphi 7 и т.д надо убрать DockingManager но панельки не будут тогда скрываться.
Примеры в папке не будут работать из-за недореализации импорта (Файл
OPP.pas) закоментирована строка
Код: "OBERON"
(************)
//LNTi386.AddImport(SelfName,obj.name,typ.lib.libname,typ.lib.alias,0);
После разбора строки импорта вроде
Код: "OBERON"
MessageBox- : PROCEDURE ["USER32.DLL",'MessageBoxA',WINAPI] (hwnd: HWND; text, caption: ARRAY [NOTAG] OF CHAR; type: SET): LONGINT;
Она должна добавить Имя модуля, имя DLL, Название функции и Псевдоним если есть. Последний параметр это тип декларации 0-WINAPI
Тоесть в модуле HelloGui.mod данная строчка должна разобраться парсером и вызвать функцию в конце разбора
LNTi386.AddImport('HelloGui','USER32.DLL','MessageBoxA','MessageBox',0);Почему не дореализовал не помню??? Возможно чем то другим занимался.
Сейчас разрабатываю компилятор и среду кросcплатформенную (на Lazarus) что бы попробывать перенести наработки и под другие платформы!
К стати среду выложу попозже чуть для тестирования, возможно посоветуете что нибудь!
Вход
Регистрация
FAQ
Поиск
