Эффективный доступ к различным СУБД из Delphi XE2

я решил провести небольшое исследование производительности: UniDAC (5.0.1) vs FireDAC (8.0.1), на Delphi XE3. Базы данных: Firebird, MySQL и SQL Server.

вот результаты выборки записей 150k (использование памяти рассматривалось как разница между до и после выборки).

Жар-птица:

CREATE TABLE TEST_PERF (
    ID  INTEGER PRIMARY KEY,
    VC  VARCHAR(200),
    NM  NUMERIC(18,2),
    DT  TIMESTAMP
)

UniDAC-0,909 секунды, съел 12 324 044 памяти

FireDAC-0,967 секунды, съел 282 179 668 памяти (я в шоке)

MySQL:

CREATE TABLE TEST_PERF (
    ID  INTEGER PRIMARY KEY,
    VC  VARCHAR(200),
    NM  NUMERIC(18,2),
    DT  DATETIME
)

UniDAC-0,363 секунды и 11 552 604 памяти

FireDAC-0,713 секунды и 49 375 108 памяти

SQL Server:

CREATE TABLE TEST_PERF (
    ID  INTEGER PRIMARY KEY,
    VC  VARCHAR(200),
    NM  NUMERIC(18,2),
    DT  DATETIME
)

UniDAC-0,391 секунды и 14 155 576 памяти

FireDAC-0,324 секунды и 51 775 844 памяти

все измеряется просто:

function MemoryUsed: Cardinal;
var
  st: TMemoryManagerState;
  sb: TSmallBlockTypeState;
begin
  GetMemoryManagerState(st);
  Result := st.TotalAllocatedMediumBlockSize + st.TotalAllocatedLargeBlockSize;
  for sb in st.SmallBlockTypeStates do
    Result := Result + sb.UseableBlockSize * sb.AllocatedBlockCount;
end;

  UniQuery1.SQL.Text := 'select * from test_perf';
  UniQuery1.SpecificOptions.Values['FetchAll'] := 'True';
  mem := MemoryUsed;
  tc := Now;
  UniQuery1.Open;
  UniQuery1.Last;
  tc := Now - tc;
  mem := MemoryUsed - mem;
  Memo1.Lines.Add('UniDAC Firebird: Time: ' + FloatToStr(tc * 24 * 60 * 60) + ' sec; Memory used: ' + IntToStr(mem));

  ADQuery1.SQL.Text := 'select * from test_perf';
  ADQuery1.FetchOptions.Mode := fmAll;
  mem := MemoryUsed;
  tc := Now;
  ADQuery1.Open;
  ADQuery1.Last;
  tc := Now - tc;
  mem := MemoryUsed - mem;
  Memo1.Lines.Add('FireDAC Firebird: Time: ' + FloatToStr(tc * 24 * 60 * 60) + ' sec; Memory used: ' + IntToStr(mem));

если кто-то заинтересован, вот это тест приложения, вы можете добавить там сравнение производительности для ADO, dbExpress, ZeosLib и других, которые вас интересуют.

Я всегда использовать ADO-используется с SQLServer, Oracle, Sybase, PostGreSQL и другими. Вы можете найти поставщика ADO практически для любой базы данных. Никогда не было проблемы, которую я не мог решить с помощью небольшого исследования. Поскольку ADO так широко используется, большинство проблем хорошо известны. И UDL файлы могут сделать вашу жизнь намного проще.

но я никогда не использую компоненты Delphi ADO на палитре компонентов - либо я использую их в памяти, либо чаще сбрасываю результаты из ADO вызывает непосредственно в TKBMMemtable и полностью избегает Delphi "из коробки". Вы можете написать функцию утилиты, которая сделает это автоматически для вас.

Firedac-поставляется с Delphi, поэтому, вероятно, вам все равно придется заплатить за это. UNidac-быстрее, и пусть Вам не придется обновлять Delphi так часто,для того,чтобы обновить данные Acess, также если вы однажды решите пойти в Lazzarus, Вы тоже сэкономите много работы.

есть много неправильных представлений во многих потоках, поэтому я попытаюсь дать мои 2 цента. Проблема в том, что мы, дельфийцы, привыкли думать в executables, поэтому мы ищем способы перемещения данных (особенно когда наша база данных и сервер приложений размещены снаружи); эти сценарии никогда не будут бить RIA приложение, потому что вы больше не перемещаете данные,а просто представление экрана. Другое заблуждение говорит, что TDATASET не работает с AJAX. Просто посмотрите некоторые UNIGUI примеры youtube. Кстати, я использую обычный DataSnap С clientdataset, а не ОРМ.