Как из базы ABS достать файлы

[oleg17]

У меня есть база ABS. В неё вложено два файла mapinfo (это не важно могли быть и обычные картинки).
Как я могу достать их?


p.s. в Делфи я не разбираюсь, но программа у меня стоит.

[grenles]

Здесь я нашел, что ABS - это вариант прошивки для электроники.
http://electronix.ru/forum/lofiversi...php/t4595.html

Здесь - что это данные, хранимые программой древо жизни.
http://www.genery.com/forum_ru/viewtopic.php?p=7567

Вот здесь, что это какая-то база данных для Дельфи http://soft.mydiv.net/win/download-A...-Database.html

Absolute Database - Мощная система построения баз данных для Delphi. Альтернатива BDE. При некоммерческом использовании бесплатна (при коммерческом использовании стоимость лицензии составляет $95). Основные возможности:
- поддержка SQL 92 (DDL и DML)
- нет DLL (engine базы данных компилируется непосредственно в exe-файл)
- база данных состоит из одного файла
- 100% совместимость со стандартными DB-aware элементами управления
- криптостойкое шифрование
- BLOB сжатие
- режимы Single-user и mutli-user (file-server)
- доступен полный исходный код.

Итак, чтобы что-то достать, надо знать структуру, и уметь работать с базой. Если она еще и запаролена, то стоит ли дело мучений?

[oleg17]

Я написал, что у меня delphi стоит, но надо было подчеркнуть, что это файл Absolute Database.
Файл без пароля.

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

[oleg17]

Кто-то может мне подсказать?
Как я понимаю. нужно написать простенькую оболочку. К которой подключить саму базу и сделать кнопку сохранить для данных которые мы из базы берем.
Могу быть не прав, может есть более простой способ.

[_SERGEYX_]

В каком поле хранятся файлы?
Если тип этого поля BLOB или GRAPHIC, то в AbsDb Manager достаточно два раза кликнуть по ячейке в этом поле и откроется окошко сохранения и
загрузки данных (в/из файла). Кстати, к AbsDb Manager есть исходники, где можно увидеть код сохранения данных в файл. Для графики вот такой:

procedure TfGraphic.btSaveClick(Sender: TObject);
var
  FileStream: TFileStream;
  BlobStream: TStream;
begin
  if (sdGraphic.Execute) then
    begin
      FileStream := TFileStream.Create(sdGraphic.FileName,fmCreate);
      BlobStream := CurrentTable.CreateBlobStream(CurrentGrid.SelectedField,bmRead);
      FileStream.CopyFrom(BlobStream,BlobStream.Size);
      BlobStream.Free;
      FileStream.Free;
    end;
end;

Для BLOB:

procedure TfBlob.btSaveClick(Sender: TObject);
var
  FileStream: TFileStream;
  BlobStream: TStream;
begin
  if (sdBlob.Execute) then
    begin
      FileStream := TFileStream.Create(sdBlob.FileName,fmCreate);
      BlobStream := CurrentTable.CreateBlobStream(CurrentGrid.SelectedField,bmRead);
      FileStream.CopyFrom(BlobStream,BlobStream.Size);
      BlobStream.Free;
      FileStream.Free;
    end;
end;

я могу открыть файл с помощью AbsDb Manager. Но он показывает только структуру текстовых таблиц

AbsDb Manager может делать с БД вообще все, что угодно.

[oleg17]

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

AbsDb Manager может делать с БД вообще все, что угодно.

Вот это я лузер. Оказывается у меня уже всё было под рукой, просто не знал как это использовать.

Большое спасибо.