FreePascal.ru

Конечно!
UIB 2.1 Release

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

Извлечение из http://svn.shamangrad.net/FBDataSet/trunk, ревизия HEAD, Полностью рекурсивно, Включая внешние ...

да именно в винде и надо!
попытки найти документацию с API для метафайлав у меня не увечались успехом...
где можно почитать?

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

Нашел такой вот это: http://wiki.lazarus.freepascal.org/TMet ... fileCanvas
Но там не реализованы Load(Save)FromStreem и Load(Save)FromFile...

У меня задача: есть БД (не моя) в которой хранятся рисунки в emf, вот их то и надо оттуда выдернуть, показать и сохранить в своей БД.

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

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

Собственно сабж...
Есть ли какой класс для работы с wmf?
Или как wmf привести к TBitmap?

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

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

Добавлено спустя 7 часов 37 минут 55 секунд:
В выше выложенной базе есть поле SCHEME в таблице INVSPEC. В нем ...

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

select * from clients

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

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


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

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

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

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 секунду:
Установил новый ...

Да, да! Именно там и менял...
Тогда другой вопрос как пересобрать FPC?

В лазарусе 0.9.26 при подключении к firebird 1.5 в компоненте IBConnection устанавливаю свойство CharSet = WIN1251Для правильного отображения кириллицы в гриде (DBGrid-DataSource-TSQLQuery-IBConnection) достаточно в свойство грида onDrawColumnCell добавитьprocedure TForm1.DBGrid1DrawColumnCell ...

AkelPad определяет кодировку созданного test.txt как WIN1251.
То есть получается все в порядке!!!
Почему же их невидно в DBGrid?

Добавлено спустя 1 минуту 41 секунду:
ps: чего то протупил с выгрузкой в файл
стыдно до невозможности...

Добавлено спустя 9 минут 33 секунды:
В момент работы ...

а как сделать вывод в файл содержимого таблицы??

Добавлено спустя 1 минуту 40 секунд:
С кодировкой по идее все в порядке!!!
IB Expert подключается к ней в WIN1251 и все русские символы видно.