Приветствую !

Есть простая таблица:




Которая фактически используется как key-value хранилище. В таблице около 7 миллионов записей. Файл базы данных лежит на SSD.

Необходимо делать больше число запросов вида SELECT Name WHERE ID=X и как-то меня скорость не устраивает. На моей машине (Core I7 3.3 ггц + SSD)получается в районе 1000-1200 поисков в секунду !

Это нормально или как ? По идее ведь должно быть раз в 10 быстрее или я ошибаюсь ?

з.ы. Доступ к БД из Delphi через компоненты LiteDAC от DevArt.

А у вас какая средняя скорость поиска по ключу ?

Да, похоже тормозит LiteDAC не понятно почему. Через другой sqlite враппер получается не меньше 50к поисков в секунду. Попробую его профайлером....

C LiteDAC не удалось разобраться почему тормозит, максимум что из него смог выжать это 2000 поисков в секунду по primary key полю.

В качестве решения подошел опенсорсный Sqlite враппер от mORMot - www.synopse.info он гораздо тоньше и ближе к апи Sqlite чем LiteDAC, к тому же у автора-француза бзик на оптимизацию (в хорошем смысле). С ним получается 100 000 поисков в секунду (и в районе 200 000 если открыть базу данных в режиме Exclusive). С другой стороны, это не TDataSet, что не так удобно. Точнее там есть Датасет, эмулирующий обычный (и работающий на порядки быстрее), но он немного отличается там сям, а код переписывать лень. Поэтому для критичных мест использую mORMot, а для обычных - LiteDAC. LiteDAC в целом не плох и если не делать миллионов выборок в цикле то работает вполне сносно, хотя 300 баксов отданых за него жалко.

Пример использования враппера mORMot для поиска, может кому пригодится:

uses SynSQLite3, SynDBSqlite3, SynDB;

// С начала где-то при старте проги нужно один раз сделать:

FreeAndNil(sqlite3);
sqlite3:=TSQLite3LibraryDynamic.Create('c:\sqlite3.dll'); // sqlite3 это глобальная переменная из SynSQlite3
// там можно использовать и статическую линковку, но мне нужна внешняя т.к. она собрана с особыми параметрами.

// сама выборка
var
SqDb:TSQLDataBase;
Qry:TSQLDBSQLite3ConnectionProperties;
QryRes:ISQLDBRows;
begin
SqDb:=TSQLDataBase.Create('c:\mydb.db','',SQLITE_OPEN_READWRITE or SQLITE_OPEN_CREATE,10000); // 10000 это размер кэша
Qry:=TSQLDBSQLite3ConnectionProperties.Create(SqDb);
QryRes:=Qry.Execute(StringToUTF8('SELECT ID FROM MyTable WHERE ID=?'),[IDtoSearch]);
if QryRes.Step then
ShowMessage('Found');
Qry.Free;
SqDb.Free;
QryRes:=nil; // обязательно, иначе будет AV ! Это штатно по справке.
end;