Выборка записей по году. Lazarus+SQLite

Частенько спрашивают как выбрать записи по году (т.е. указав только год) в Lazarus+SQLite.
Отвечаю - вот так:

            with SQLQuery1 do
            begin
            Close;
            SQL.Clear;
            SQL.Add('select tDate,tRemark from Table1 where tDate BETWEEN '+QuotedStr(cbxYear.Text +'-01-01')+'AND '+QuotedStr(cbxYear.Text +'-12-31')+';');   //у меня в таблице формат даты ГГГГ-ММ-ДД! потому так и ищу!
            Open;
            end;

Вот бинарник примера:
date_bin.zip
И исходник:
date_src.zip