[Mrak]

Сообщение от Freeman

Правильней будет -- пытаться установить тип параметра до присвоения ему первого значения.

пробовал, вообще, что я только не пробовал))
вот, типа лог)

Код:

ADOQuery_Par.Close;
 //  ADOQuery_Par.Parameters.CreateParameter('dat', ftDate ,pdUnknown, 0, yesterday);
 // ADOQuery_Par.SQL.Clear;
 // ADOQuery_Par.SQL.add('SELECT * FROM proto.stv WHERE (id > :dat);');
 ADOQuery_Par.SQL.Text:='SELECT * FROM proto.stv WHERE (id < :dat);';
 //ADOQuery_Eh1.Parameters.ParseSQL(ADOQuery_Eh1.sql.text, true);
 //ADOQuery_Eh1.Parameters[0].name:='dat';
 //ADOQuery_Eh1.Parameters[0].DataType:=ftdate;
 //ADOQuery_Eh1.Parameters[0].Value:=yesterday;
 // ADOQuery_Eh1.Parameters.ParamByName('dat').DataType:=ftInteger;
 ADOQuery_Par.Parameters.ParamByName('dat').Value:=edit1.Text;// yesterday;
 //ADOQuery_Eh1.Parameters.Paramvalues['dat']:='33';//strtodate(edit1.Text);// yesterday;
 //  ADOQuery_Eh1.Parameters.ParamByName('dat').DataType:= ftDateTime;
 ADOQuery_Par.Open;

и это не все

в любых вариациях - неявная ошибка