[Ildar-tsr]

Вставьте после данной строчки:

Код:

Parameters.ParamByName('post').Value:=ListBox1.items.Text;
ExecSQL;