[Страдалецъ]

Переписать несколько:

Код:

ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Text:='INSERT INTO Сотрудники VALUES(:№_Сотрудника,:Фио,:Оклад,:ДР)';
ADOquery2.Parameters.ParamByName('№_Сотрудника').Value:=edit2.text;
ADOquery2.Parameters.ParamByName('Фио').Value:=edit3.text;
ADOquery2.Parameters.ParamByName('Оклад').Value:=edit4.text;
ADOquery2.Parameters.ParamByName('ДР').Value:=edit5.text;
ADOquery2.ExecSQL;