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

[alexs]

Работает нормально.
Единственное замечание - подобная ошибка возникает, когда передаёш слишком длинную строку в справочник.
Версия FPC и Lazarus-а - текущий транк.

[xcod]

Немного непонятно, что значит слишком длинную строку?
немного добавлю инфы
база и текстовые поля в таблице UTF8, тип поля в справочнике varchar(20)
в лазаре когда добавляю поле он дает размер 80 и поле подстановки с таким же размером
убавил до 10, сами значения поля до 5 символа латинского алфавита
и все та же ошибка
и еще что заметил
если ключ подстановки в рантайме ввести вручную то все работает, значение сразу же выбирается из справочника
а при выборе из всплывающего списка такая ошибка

[mastw]

не получается скомпилировать

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

C:\pas\fb\trunk\fb_define.inc(25,2) Fatal: Can't open include file "fb_define_compiler.inc"


а это если компилить release

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

C:\pas\fb\release\v_1_28\fbmisc.pas(79,19) Hint: Type "TUpdateAction" redefinition
C:\pas\fb\release\v_1_28\mydbunit.pas(170,25) Hint: Parameter "AMap" not used
C:\pas\fb\release\v_1_28\mydbunit.pas(654,3) Note: Local variable "tmp" is assigned but never used
C:\pas\fb\release\v_1_28\mydbunit.pas(831,41) Hint: Mixing signed expressions and longwords gives a 64bit result
C:\pas\fb\release\v_1_28\mydbunit.pas(879,41) Hint: Mixing signed expressions and longwords gives a 64bit result
C:\pas\fb\release\v_1_28\mydbunit.pas(936,41) Hint: Mixing signed expressions and longwords gives a 64bit result
C:\pas\fb\release\v_1_28\mydbunit.pas(907,3) Note: Local variable "BlobList" not used
C:\pas\fb\release\v_1_28\mydbunit.pas(265,33) Hint: Parameter "Buffer" not used
C:\pas\fb\release\v_1_28\mydbunit.pas(265,50) Hint: Parameter "FAppend" not used
C:\pas\fb\release\v_1_28\fbmisc.pas(1,1) Fatal: Can't find unit jvuiblib used by fbcustomdataset



скаченый последний с svn

[GrayEddy]

В

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

laz_editors_register.pas

и в

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

fbcustomdatasetpropeditorl.pas

в implementation добавить uiblib.
Все собралось.

Пишу по памяти, скачал из svn в начале декабря прошлого года, тоже столкнулся с этой проблемой..

[*Rik*]

Можно ли научить FBDataSet работать с директивой RETURNING?
Например для таблицы TABLE первичный ключ в поле TABLE_ID генерится в триггере
FBDataSet.InsertSQL:

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

INSERT INTO TABLE
(
F1,
F2
)
VALUES
(
:F1,
:F2
)
RETURNING TABLE_ID


В FIBPlus pFIBDataSet после выполнения такого запроса получает значение TABLE_ID с сервера, и использует его для AutoRefresh записи.

[alexs]

Можно ли научить FBDataSet работать с директивой RETURNING?

Научить можно. Но сейчач я этой библиотекой практически не занимаюсь.
Поэтому - когда это сделаю - не зная.
Если сделаешь патчик - то включу в исходники.

[mastw]

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

В
КОД: ВЫДЕЛИТЬ ВСЁ
laz_editors_register.pas
и в
КОД: ВЫДЕЛИТЬ ВСЁ
fbcustomdatasetpropeditorl.pas
в implementation добавить uiblib.
Все собралось.

Пишу по памяти, скачал из svn в начале декабря прошлого года, тоже столкнулся с этой проблемой..


как ни странно не нашел этих файлов, если можно отпишите плиз с путями.

[GrayEddy]

>mastw
У вас, видимо, старая версия FBDataset.

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

C:\pas\fb\release\v_1_28\fbmisc.pas(79,19) Hint: Type "TUpdateAction" redefinition

Скачайте транк с http://svn.shamangrad.net/FBDataSet/trunk
http://shamangrad.net/project.php?act=view&prj=FBDataSet - официальная страница

PS: Оба файла, котрые вы ищете, будут лежать в корне транка.

[stikriz]

Windows7 64 bit, Lazarus-0.9.31-35701-fpc-2.6.1-20120305-win64

Вот, смотрю на титанический труд

Вот такое: DataEvent(deFieldChange, Longint(Field));
Надо переписать вот так: DataEvent(deFieldChange, PtrInt(Field));
Вот так, если хочется писать:

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

  TFIBCustomDataSet = class(TDataset)
  protected
    FAutoCommit: Boolean;
    FAutoStartTransaction: Boolean;
    procedure SetAutoCommit(const AValue: Boolean);
    procedure SetAutoStartTransaction(const AValue: Boolean);
    (*
     * Fields, and internal objects
     *)
    FBase: TFIBBase;          (* Manages database and transaction *)
    FBlobCacheOffset: Integer;
    FBlobStreamList: TList;
    FBufferChunks: Integer;


То, обычно пишут так:

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

  TFIBCustomDataSet = class(TDataset)
  protected
    FAutoCommit: Boolean;
    FAutoStartTransaction: Boolean;
    procedure SetAutoCommit(const AValue: Boolean);
    procedure SetAutoStartTransaction(const AValue: Boolean);
  protected
    (*
     * Fields, and internal objects
     *)
    FBase: TFIBBase;          (* Manages database and transaction *)
    FBlobCacheOffset: Integer;
    FBlobStreamList: TList;
    FBufferChunks: Integer;


Т.е. повторяют секцию перед полями класса. (Как это компилилось?)

Добавлено спустя 1 час 5 минут 29 секунд:
Re: FBDataSet (библиотека доступа к данным FireBird/Interbase.)
Ну, и под занасес вот такое сообщение при перезапуске лазаруса (пытался установить компоненты):
"Запуск программы невозможен, т.к. на компьютере отсутствует fbclient.so. Попробуйте переустановить программу."
Заметьте, что FireBird корректно установлен в системе, IbExpert не жалуется. При чем тут so? Прикомпиливать статически библиотеку FB сейчас не модно - их имена меняются, нужно настраивать и где она находится, и как называется.

[alexs]

"Запуск программы невозможен, т.к. на компьютере отсутствует fbclient.so. Попробуйте переустановить программу."

Какя операционка?
Там в UIBDataBAse есть поле, указывающее на имя клиентской библиотеки. Проверь

[vicvala]

Решил перейти и установил Lazarus 1.1 r.36784 FPC 2.7.1 на Vista, поставил FBDataSet из _http://svn.shamangrad.net/FBDataSet.
Запускаю Lazarus и на пустую форму ложу FBDataSet, сохраняюсь (не сохраняюсь), закрываю Lazarus и... появляется ошибка!!!


Что делать, как побороть?

[vicvala]

Что-то полная тишина!? Ни у кого такое не повторяется?
И alexs молчит!

[alexs]

Для меня слишком мало информации.
Таких ошибок у меня нет. Поэтому и сказать нечего...

[xcod]

Возвращаюсь к своей проблеме с лукап полями
Дополню инфой
ошибка "Invalid variant type cast" возникает в файле fbmisc.pas в функции "comparefield", в 800 строке, где S1:=Value; при выборе в DBGride
кинул и настроил DBLookupComboBox рядом с этим дбгридом, отрабатывает отлично

вот как то так, как мог объяснил

[dunin]

Помогите люди добрые
На Lazarus 1.0.3 не компилится

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

C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(763,43) Warning: Symbol "ShortDateFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(763,64) Warning: Symbol "ShortTimeFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(764,38) Warning: Symbol "ShortDateFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(765,38) Warning: Symbol "ShortTimeFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(774,50) Warning: Symbol "ShortDateFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(779,54) Warning: Symbol "ShortDateFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(779,75) Warning: Symbol "ShortTimeFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(784,50) Warning: Symbol "ShortTimeFormat" is deprecated
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(844,26) Error: Incompatible types: got "AnsiString" expected "Pointer"
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(857,39) Error: Incompatible type for arg no. 1: Got "Pointer", expected "AnsiString"
C:\DuNin\lazarus\components\FBDataSet\fbmisc.pas(870) Fatal: There were 2 errors compiling module, stopping

Брал отсюда http://svn.shamangrad.net/FBDataSet/trunk/