[san-46]

Код:

ADOsp1.Parameters[0].Value := Edit4.Text;