Редактирование базы данных. (Paradox)

← →
DIS (2004-10-05 17:14) [0]

Мастера, подсажите, как можно редактировать запись в базе данных.
Для добавления делаю так:
Query1.SQL.Clear; Query1.SQL.Add("INSERT INTO "NEW.DB" (dat, bes, katalog)"); Query1.SQL.Add("VALUES (:dat, :bes, :katalog)"); Query1.Params[0].AsString := DateToStr(Date); Query1.Params[1].AsString := ""+ComboBox1.Text+""; Query1.Params[2].AsString := ""+ComboBox2.Text+""; Query1.ExecSQL; Query1.close;для редактирования, слышал, используют update, возникает вопрос, как именно изменить конкретную строку базы (таблицы)? Делаю на форме DbEdit, но он не доступен для редактирования.

← →
Роман Снегирев (2004-10-05 17:28) [1]

update Таблица set Поле=значение where ID=ID

← →
DIS (2004-10-05 19:59) [2]

помогите разобраться
"new.db" - таблица
set "column" - столбец в котором мы редактируем
:column - значение переменной, на что мы меняем и берем значение из Edit1.Text
where "nomer" - столбец ????
:id- значение берем из Edit2.Text
При выполнении выскакивает ошибка "invalid use of keyword Token = ? where"
где то я напутал.

Query1.SQL.Clear; Query1.SQL.Add("update "new.db" set "column"=:column"); Query1.SQL.Add("where "nomer"=:id"); Query1.Params[0].AsString := ""+Edit1.Text+""; Query1.Params[1].AsString := ""+Edit2.Text+""; Query1.ExecSQL; Query1.close; Query1.SQL.Clear; Query1.Open;

← →
sh (2004-10-05 21:11) [3]

query1.close;
query1.sql.clear;
query1.sql.add("update new.db set column="""+edit1.text+""" where nomer="+edit2.text);
query1.execsql;

Имя столбца в кавычки заключать не надо, как и числовой параметр, а вот текст заключают в апострофы

по моему так...

← →
DIS (2004-10-05 21:41) [4]

сейчас попробую

>DIS (05.10.04 19:59) [2]
>Query1.ExecSQL;
>Query1.close;
>Query1.SQL.Clear;
>Query1.Open;

Получается :
Одним TQuery и читаем, и модифицируем ?
После модификации чистим текст запрос, а потом пустым предложением пытаемся что-то читать ?

Надо, ИМХО, мух отдельно, котлеты отдельно (одним TQuery читать, другим-модифицировать).
Или же использовать "комбинированные" объекты: TTable или TQuery+TUpdateObject

Редактирование базы данных. (Paradox) Найти похожие ветки