Написал язык Суржи

[Rik]

Сообщение от Freeon

Буду ждать с нетерпением. Спасибо!

Я обновил сборку. На странице загрузок добавил пример с базой и отчетом.
Для работы примера потребуется последняя версия движка, там небольшие изменения и добавлена константа DirectorySeparator.

Для работы потребуется установленный сервер FireBird 2.5. Клиентская библиотека FireBird, для Windows это fbclient.dll - должна находиться в Windows\System, для Linux это libfbclient.so.2 - должна находиться в /usr/lib. После распаковки архива откройте приложение Sklad в дизайнере, откройте модуль Данные, в нем 2 раза щелкните на компоненте TIBDatabase и в открывшемся диалоге исправьте путь к базе данных SKLAD.FDB (Файл базы лежит рядом с приложением Sklad.lm9), сохраните приложение Sklad (Файл->Сохранить).

http://www.visual-t.ru

[Человек_Борща]

Проект развивается вместе с Lazarus/FPC ?
Lazarus 1.0.2 имеет сотни доработок, есть ли они в вашем варианте лазаруса?

[Rik]

Сообщение от Человек_Борща

Проект развивается вместе с Lazarus/FPC ?
Lazarus 1.0.2 имеет сотни доработок, есть ли они в вашем варианте лазаруса?

Текущая версия Lazarus 1.2...
С ваших слов я могу предположить, что вы решили что я веду альтернативную версию Lazarus. Если я Вас правильно понял, то это не так, Дизель-паскаль не смотря на внешнее сходство, ни коим образом не конкурирует с Lazarus, это скорее упрощенное дополнение к нему, со встроенным интерпретатором Pascal. Цель проекта - запуск программ без перекомпиляции на разных платформах, внесение изменений в программу без перекомпиляции. Это скорее альтернатива движку 1С, во всяком случае подход одинаковый.
Дизель-паскаль использует LCL, RTTI последней версии Lazarus, FCL v2.6.2.

Новая версия IBX for Lazarus 1.0.6:
Полный список изменений в этой версии:
Добавлено свойство UpdateTransaction, с помощью которого работа с базой
происходит в рамках 2х транзакций. SelectSQL будет использовать
Transaction, у этой транзакции рекомендуется назначить следующие параметры:
read
read_committed
rec_version
nowait
С этими параметрами транзакция стартует в режиме только чтение и фактически в состоянии Commit,
поэтому может жить сколь угодно долго, не оказывая ни какого влияния на работу базы.
Короткие "пишущие" запросы из InsertSQL, ModifySQL, DeleteSQL будут использовать UpdateTransaction, для неё
рекомендуется назначить следующие параметры:
write
wait
no_rec_version
read_committed
Это наиболее оптимальный вариант чтобы избежать DeadLock.
RefreshSQL использует транзакции по следующему алгоритму: Если (UpdateTranscation.InTransacton = True) то
используется UdateTransaction иначе используется Transaction.
После выполнения запроса из InsertSQL, ModifySQL, DeleteSQL, до завершения транзакции данные текущей записи
автоматически перечитываются с помощью RefreshSQL, поэтому в UpdateTransaction добавлен параметр read_commited.

Изменен редактор компонента TIBTransaction, в нем вариант Read Commited вписывает первый набор параметров для чтения,
добавлен вариант Read-write, который вписывает второй набор параметров для пишущих запросов.

Добавлены свойства AutoStartTransaction и AutoCommit
Добавлена эмуляция Boolean полей и автотримирование строковых полей (TIBCustomDataSet.AutTrim)

Добавлена поддержка выражений RETURNING FIELD в Insert и Update запросах, поддержка возвращаемых значений
из EXECUTE PROCEDURE, поддержка выражения EXECUTE BLOCK.

В TIBCustomDataSet вложен класс DefFormats для управления форматами всех TDateTimeField и TNumericField (и от них производных),
для задания определенного формата конкретного поля (TBooleanField, TNumericField) добавлено свойство
FieldsFormats: TStings, в нем для задания формата для поля MYFIELD нужно указать:
MYFIELD=# ### ##0.0000
На изображении видно, как работают форматы, появилась разрядность, количество нулей после запятой добивается автоматически в зависимости от точности дробной части.


Добавлено свойство EditFormats которое задает для конкретных полей: EditFormat для TNumericField и EditMask для остальных.
Пример:
MYDATEFIELD=00.00.0000

[Freeon]

RIK спасибо большое за пример складской программы и хотел бы выложить скриншот
По большей части для размышлений )))
Сейчас пытаюсь решить вопрос кодогенирации для базовых объектов, справочник и документ.
Дай бог получится )))

[Rik]

Сообщение от Freeon

RIK спасибо большое за пример складской программы и хотел бы выложить скриншот
По большей части для размышлений )))
Сейчас пытаюсь решить вопрос кодогенирации для базовых объектов, справочник и документ.
Дай бог получится )))

Это Mac или эмуляция на Linux?

[Utkin]

Рик, красавчег. Третий год держится, молодец.

[Человек_Борща]

Продукт имеет смысл) Но почему-то не видел публикации на оф. форуме лазаруса)

[Rik]

Сообщение от Человек_Борща

Продукт имеет смысл) Но почему-то не видел публикации на оф. форуме лазаруса)

На freepascal ветка есть..

Для официального форума надо как я понимаю не только с русским языком версию сделать...
В планах есть конечно, буржуйский язык прикрутить, но пока времени не хватает, изначально увы не позаботился, торопился...

[Freeon]

Сообщение от Rik

Это Mac или эмуляция на Linux?

Это именно мак. Пара небольших правок для работы с путями и все более менее перевариваемо, кроме проблемы с фокусом окна.
Когда запускаешь через менеджер конфигураций то окно приложения не активно и фокус вернуть не получается ему (пока курю документацию... думаю решится вопрос)

[Rik]

Сообщение от Freeon

Это именно мак. Пара небольших правок для работы с путями и все более менее перевариваемо, кроме проблемы с фокусом окна.
Когда запускаешь через менеджер конфигураций то окно приложения не активно и фокус вернуть не получается ему (пока курю документацию... думаю решится вопрос)

Оччень интересно, у меня пока нет возможности испытать на маке.
Я гляжу, вы компоненты доступа к данным тоже отключили... Интересно было-бы узнать как вся конструкция работает...