UPDATE

Обсуждение возникших проблем, предложений и ошибок MyDAC компонентов
Закрыто
skr
Сообщения: 3
Зарегистрирован: Вт 26 мар 2013 19:53

UPDATE

Сообщение skr » Ср 03 апр 2013 21:20

как правильно реализовать обновление записей в таблице UPDATE.Извините если флуд долго искал но не нашол примера кода в Delphi7.

DemetrionQ
Devart Team
Сообщения: 51
Зарегистрирован: Пн 28 янв 2013 11:54

Re: UPDATE

Сообщение DemetrionQ » Пт 05 апр 2013 11:23

Здравствуйте.

Обновить запись в таблице вы можете следующими способами.

1) Выполнить SQL запрос через компонент TMyQuery, например:

Код: Выделить всё

  MyQuery1.SQL.Clear;
  MyQuery1.SQL.Add('update YourTable set YourField = ''NewValue''');
  MyQuery1.SQL.Add('where YourField = ''OldValue''');
  MyQuery1.ExecSQL;
2) Использовать методы TMyQuery.Edit, TMyQuery.Post, TMyTable.Edit, TMyTable.Post, например:

Код: Выделить всё

  MyQuery1.SQL.Text := 'select YourField from YourTable';
  MyQuery1.Open;
  MyQuery1.Edit;
  MyQuery1.FieldByName('YourField').AsString := 'NewValue';
  MyQuery1.Post;

skr
Сообщения: 3
Зарегистрирован: Вт 26 мар 2013 19:53

Re: UPDATE

Сообщение skr » Пт 05 апр 2013 12:28

благодарю

MasterofCDM
Сообщения: 1
Зарегистрирован: Пн 23 мар 2015 09:07

Re: UPDATE

Сообщение MasterofCDM » Пн 23 мар 2015 09:27

Ребят, можно я тоже задам глупый вопрос по этой теме. Задача такая: нужно найти строку по id и изменить там поля.

С этим примером все понятно

Код: Выделить всё

  MyQuery1.SQL.Clear;
  MyQuery1.SQL.Add('update YourTable set YourField = ''NewValue''');
  MyQuery1.SQL.Add('where YourField = ''OldValue''');
  MyQuery1.ExecSQL;
А вот со вторым слегка в ступоре

Код: Выделить всё

  MyQuery1.SQL.Text := 'select * from MyBase';
  MyQuery1.Open;
  MyQuery1.Edit;
  MyQuery1.FieldByName('Data1').AsString := 'NewValue';
  MyQuery1.FieldByName('Data2').AsString := 'NewValue';
  MyQuery1.FieldByName('Data3').AsString := 'NewValue';
  MyQuery1.Post;
Не могу понять, где указать Id строки, которую нужно мне редактировать (Where id = 2, к примеру)


Вопрос снимается, решил задачу через FindKey

ViktorV
Devart Team
Сообщения: 212
Зарегистрирован: Чт 31 июл 2014 09:52

Re: UPDATE

Сообщение ViktorV » Пн 23 мар 2015 15:01

Приятно видеть, что проблема решена. Если у вас возникнут вопросы по использованию MyDAC - обращайтесь.

Закрыто