ну вы в курсе держите как что-то там работать будет =)
как понял по трекеру будет подгонятся под мускул,
готов взятся за добавление птички, но это как я понимаю имеет смысл уже когда скелет интерфейса будет.
Модератор: Модераторы
Фишка в том, что для соответствия конкурсной документации по НП-18 (Школьный
Линукс) для ПО для объектно-ориентированного программирования на языке Pascal:
"Средство разработки должно обеспечивать возможность соединения и работы с
реляционными базами данных. Должно включать в себя встроенный менеджер баз
данных для администрирования и разработки баз данных, включая выполнение
SQL-запросов."
Нам нужен примитивный, но работающий менеджер баз данных в Lazarus. Именно в
Lazarus. Это должен быть проект, прописываемый в шаблоны проектов.
Состоит из одной формы.
Менеджер баз данных PostgreSQL для Lazarus
Сервер [localhost] Имя пользователя [root ] Пароль [ ]
Запрос:
__________________ <Выполнить>
__________________
Результат:
__________________
__________________
__________________
Поддерживаемая БД: posgresql. Форма должна возвращать результаты выполнения
SQL-запросов на указанный сервер.
show databases;
show tables;
dsTables.SQLSelect.Text:=' select rdb$Relation_Name '+
' from rdb$relations '+
' where (rdb$system_flag <> 1 or Rdb$System_Flag is null) and Rdb$View_BLR is null '+
' and rdb$Relation_Name not in (''REPLIC'') '+
' order by rdb$relation_name ';
show columns from <имя_таблицы>;
dsf.SQLSelect.Text:=' Select R.Rdb$Field_Name, '#13+
' coalesce(r.rdb$null_flag,f.rdb$null_flag,0) null_flag, '#13+
' case F.Rdb$field_type '#13+
' when 12 then 1 /*date*/ '#13+
' when 13 then 1 /*time*/ '#13+
' when 14 then 1 /*char*/ '#13+
' when 35 then 1 /*timestamp*/ '#13+
' when 37 then 1 /*varchar*/ '#13+
' else 0 '#13+
' end as uq, '#13+
' F.Rdb$field_type '#13+
' from rdb$Relation_Fields R, RDB$FIELDS F '#13+
' where '#13+
' R.Rdb$Relation_Name = :NAME and '#13+
' F.rdb$field_name=R.Rdb$field_source and '#13+
' f.rdb$computed_blr is null '#13+
' order by R.rdb$field_position, R.rdb$field_name '#13;
alexs писал(а):Сам менеджер под GPL
FBDataSet под LGPL
так устроит?
я кстати его на сайте давно не обновлял - а кое что подделал
могу перезалить.
Там по хорошему можно сделать подержку нескольких платформ серверов. Просто вынести привязанную к конретному серверу логику в отдельные модули и сделать слой совместимости.
Так что если есть желание - я исходникы выложу на sf или ещё куда либо.
P.S.
Если с DBDesigner дело выгорит - то я его тоже в свой менеджер хочу включить.
Сейчас этот форум просматривают: Google [Bot], Yandex [Bot] и гости: 7