Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

замена выражения sql [D7, XP]


helluvaname ©   (2010-12-21 21:12:00) 

Здравствуйте!
Пытаюсь заменить одно регулярное выражение в таблице на другое с помощью SQL
не получается
вот мой код:

procedure TForm3.Button8Click(Sender: TObject);
begin
ADOQuery1.Active:=False;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT REPLACE(Êóëüòóðà, :pkylt, :pkylt2)');
ADOQuery1.SQL.Add('FROM Îñíîâíàÿ');
ADOQuery1.Parameters.ParamByName('pkylt').Value:=Edit6.Text;
ADOQuery1.Parameters.ParamByName('pkylt2').Value:=Edit7.Text;
ADOQuery1.Active:=True;
DBGrid1.Repaint;
end;


Что я делаю не так?
Как это лучше сделать?


helluvaname   (2010-12-21 23:04:00) [1]

вроде вот так работает

 with ADOQuery1 do
 begin
   Active:=False;
   SQL.Clear;
   SQL.Add('UPDATE Îñíîâíàÿ');
   SQL.Add('SET Êóëüòóðà=:pkylt2');
   SQL.Add('WHERE Êóëüòóðà=:pkylt');
   Parameters.ParamByName('pkylt').Value:=Edit6.Text;
   Parameters.ParamByName('pkylt2').Value:=Edit7.Text;
   ExecSQL;
   DBGrid1.Repaint;
 end;


helluvaname   (2010-12-21 21:15:00) [2]

я пытаюсь заменить :pkylt на :pkylt2 в таблице Îñíîâíàÿ в колонке Êóëüòóðà
:pkylt и :pkylt2 берутся из Edit6 и Edit7


Наверх

Титульная страница Поиск, карта сайта Написать письмо