FBDataSet (библиотека доступа к данным FireBird/Interbase.)

[mak]

Ну для ленивых - можно и повторить этот функционал ...

Лень - двигатель прогресса. Когда я был не ленивый - писал на ассемблере

Прсто я за время своих разработок никогда не испытывал в нём нужды

Я понял. Но префикс понятней того трюка, что ты описал (для моей схемы базы).
В багтрекер запрос внес.

[SergeyDV]

Lazarus 0.9.27 (14.01.2009)
FPC 2.2.3
SVN 18282

При компиляции FBDataSet ошибка:

C:\lazarus\ADDComp\FBDataSet\fbcustomdataset.pas(125,16) Error: There is no method in an ancestor class to be overridden: "TFBAnsiField.GetDataSize:Word;"

Добавлено спустя 26 минут 41 секунду:
Установил новый Лазарус 0.9.27 (13.02.2009)
FPC 2.2.3
SVN 18650

При компиляции UIB 2.1 ошибка:

Код: Выделить всё

Free Pascal Compiler version 2.2.3 [2009/02/13] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling uiblaz.pas
Compiling registeruib.pp
Compiling jvuib.pas
Compiling jvuiblib.pas
Compiling jvuibase.pas
Compiling jvuibconst.pas
Compiling jvuiberror.pas
C:\lazarus\ADDComp\UIB21\source\jvuiblib.pas(4467,27) Error: Can't determine which overloaded function to call
C:\lazarus\ADDComp\UIB21\source\jvuiblib.pas(4917,36) Warning: Conversion between ordinals and pointers is not portable
C:\lazarus\ADDComp\UIB21\source\jvuiblib.pas(4951,37) Warning: Conversion between ordinals and pointers is not portable
C:\lazarus\ADDComp\UIB21\source\jvuiblib.pas(6015) Fatal: There were 1 errors compiling module, stopping


Добавлено спустя 2 часа 44 минуты 55 секунд:
С ощибками разобрался...

Подключаю БД, открываю одну таблицу, в гриде отображаются данные...
Все вроде нормально... Но в некоторых ячейках не видно цифр! В этом столбце находятся числа от 0 до 32000.
Так вот числа с разрядностью от 1 до 3 отображаются, а с большей - нет!!!
Странный глюк!
Еще... Начинаеш пролистывать таблицу вниз, и на одной и той же записи программа вылетает с ошибкой:

err1.JPG

В IBExpert выполняю тот же запрос и все данные отображаются нормально!!!
В чем может быть дело?

[Attid]

Но в некоторых ячейках не видно цифр! В этом столбце находятся числа от 0 до 32000.
Так вот числа с разрядностью от 1 до 3 отображаются, а с большей - нет!!!

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

[SergeyDV]

Спасибо!!! Помогло!

Ошибка с одной записью осталась...
В редакторе SQL запросов FBDataSet нажимаю ктопку Test и ...

err2.JPG

[Attid]

какой запрос ?

[alexraynepe196]

Пипл, если кто использовал лукапы с етим датасетом отчитайтесь плиз. конкретно интересует работа лукапов в тестовой версии - 2бета

[SergeyDV]

Запрос элементарный:

select * from clients

Добавлено спустя 44 секунды:
Повторюсь...
В IBExpert все отлично!

Добавлено спустя 41 минуту 9 секунд:
Аналагичная проблема в другой БД.
запрос:

Код: Выделить всё

select * from INVPARAM 

во вложении БД, попробуйте плиз... отпишитесь...

ARH.7z

[VAshot]

При компиляции FBDataSet ошибка:

C:\lazarus\ADDComp\FBDataSet\fbcustomdataset.pas(125,16) Error: There is no method in an ancestor class to be overridden: "TFBAnsiField.GetDataSize:Word;"


Добавлено спустя 2 часа 44 минуты 55 секунд:
С ощибками разобрался...

Как?

[SergeyDV]

В fbcustomdataset.pas изменил Word на Integer:

Код: Выделить всё

function TFBAnsiField.GetDataSize: {$IFDEF FPC}Integer;{$ELSE}Integer;{$ENDIF}
begin
   Result := SizeOf(AnsiString);
end;

Добавлено спустя 7 часов 37 минут 55 секунд:
В выше выложенной базе есть поле SCHEME в таблице INVSPEC. В нем лежат картинки в формате wmf (windows metafile).
Как нибудь возможно с ними работать под виндой из Лазаруса?

[alexraynepe196]

>> function TFBAnsiField.GetDataSize
а где вы нашли такое объявление? в последней версии там :integer; override; явно указано без вариантов

[SergeyDV]

>> function TFBAnsiField.GetDataSize
а где вы нашли такое объявление? в последней версии там :integer; override; явно указано без вариантов

На сайте http://alexs75.narod.ru/fpc/fbdataset/
29.11.2008. Текущая версия (1.28).

[alexs]

Текущая версия находится в SVN-репозитарии. На сайте уже страя.
В ближайщее время (только когда оно наступит? ) либо я, либо саша сольём транк в SVN и зарелизим. Будет новая версия уже 2.0.

[SergeyDV]

Будем ждать...
Чуть выше я выложил базу и запрос к ней.
alexs попробуй пожалуйста в новой версии.

[alexs]

зачем ждать? стяни версию и пробуй

Чуть выше я выложил базу и запрос к ней.
alexs попробуй пожалуйста в новой версии.

Если получится - гляну

[SergeyDV]

Установил TortoiseSVN 1.5.9, Сборка 15518 - 32 Bit , 2009/02/27 18:34:12.
В проводнике создал папку d:\svn\FBDataSet, правой кнопкой -> SVN Извлечь...
Ввожу http://svn.shamangrad.net/FBDataSet/trunk, и получаю ответ:

Код: Выделить всё

Извлечение из http://svn.shamangrad.net/FBDataSet/trunk, ревизия HEAD, Полностью рекурсивно, Включая внешние
OPTIONS of 'http://svn.shamangrad.net/FBDataSet/trunk': Could not resolve
hostname `svn.shamangrad.net': Затребованное имя допустимо и оно найдено в базе данных,
но для имени отсутствуют связанные с ним данные, которые были разрешены для него.
(http://svn.shamangrad.net)

До этого ни когда непользовался SVN.
Может я что то не так делаю...

Добавлено спустя 14 минут 49 секунд:
Разобрался!
В настройках TortoiseSVN нужно было прописать проксю

Добавлено спустя 3 часа 57 минут 11 секунд:
Прикомпиляции ver2b ошибка: C:\lazarus\components\FBDataSet\fbmisc.pas(1,1) Fatal: Can't find unit uiblib used by fbcustomdataset

хотя в Параметрах компилятора явно указываю путь где лежит fbcustomdataset.pas : $(LazarusDir)\components\FBDataSet\