CommandText :='UPDATE server Set Lvl=:newDep where Login=:ALogin';
Parameters.ParamByName('newDep').Value := '100';
Parameters.ParamByName('ALogin').Value := QuotedStr(Edit1.Text);
Проблему решил так. Топик можно закрыть, если необходимо)
Код:
DataModule2.ADOQuery1.SQL.Text :='UPDATE server SET Lvl = 100 WHERE Login='+QuotedStr(Edit1.Text);
DataModule2.ADOQuery1.ExecSQL;
DataModule2.ADOQuery1.SQL.Clear;
________________
[Ссылки могут видеть только зарегистрированные пользователи. ]
Пишу софт на заказ(Delphi / C# / PHP-скрипты). Описывайте задачи и цели софта, сообщайте сумму на которую рассчитываете.
Skype: vinozavr (Молдова)
Кто плюсует популярность, подписывайтесь пожалуйста)