Задача - вручную (copy-paste) копировать части текстовых фрагментов из страниц, открытых в браузере
и загонять в мемо поле базы Access.
Программа то заводит, то (чаще) дает сообщение
ODBC MS Access driver - String data, right truncated (null)
Фрагмент записи из мемо в базу:

descr:='';
n:=memo1.Lines.Count;
for i:=1 to n do
descr:=descr+memo1.lines[i-1];

with query1 do
begin
sql.clear;
sql.add('insert into memo'+
' (memo) values(:descr)');
params[0].asmemo:=descr;
execsql;
memo1.Lines.clear;