текущая запись в Гриде

← →
Till © (2003-07-05 15:34) [0]

Как узнать какая запись сейчас текущая в Гриде, и записать в виде SQL запроса ее удаление?
Заранее всем спасибо!

← →
Наталия © (2003-07-05 17:26) [1]

Текущая запись та, на которой находится курсор. Удалить в SQL запросе можно, используя команду delete, у которой в условии where указать ключевое поле текущей записи.

← →
Семен Сорокин © (2003-07-05 18:38) [2]

TDataSet.Delete

← →
Till © (2003-07-06 10:20) [3]

Сделал так работает :)
procedure TMain.ToolButton9Click(Sender: TObject); var id : String; begin id := DM.MainDataSource.DataSet.FieldByName("ROWID").AsString; DM.GeneralSQL.SQL.Text := "Delete from ekbs_kom_bases where rowid="""+id+""""; DM.GeneralSQL.ExecSQL; DM.GeneralSQL.SQL.Text := "select t.*, t.rowid from ekbs_kom_bases t"; DM.GeneralSQL.ExecSQL; end;

← →
KSergey © (2003-07-06 11:27) [4]

А во это вот зачем?

DM.GeneralSQL.SQL.Text := "select t.*, t.rowid from ekbs_kom_bases t";
DM.GeneralSQL.ExecSQL;

← →
Till © (2003-07-06 14:38) [5]

> KSergey © (06.07.03 11:27)
> А во это вот зачем?
>
> DM.GeneralSQL.SQL.Text := "select t.*, t.rowid from ekbs_kom_bases
> t";
> DM.GeneralSQL.ExecSQL;

чтобы отобразить все записи у меня ДатаСорс связан с ГенералСКЛ. Вотт.....

← →
Anatoly Podgoretsky © (2003-07-06 15:49) [6]

Нет, он спрашивает, почему ты применяешь ExecSQL к запросу?

← →
Till © (2003-07-06 15:51) [7]

> Anatoly Podgoretsky © (06.07.03 15:49)
> Нет, он спрашивает, почему ты применяешь ExecSQL к запросу?

Чтобы выполнить его!

← →
Anatoly Podgoretsky © (2003-07-06 15:55) [8]

Нельзя

← →
Till © (2003-07-06 16:02) [9]

> Anatoly Podgoretsky © (06.07.03 15:55)
> Нельзя

А как надо?

Open

Посмотри в справочной системе, а суть в том, если возвразается набор данных, то Open, иначе ExecSQL

> Anatoly Podgoretsky © (06.07.03 16:15)
> Посмотри в справочной системе, а суть в том, если возвразается
> набор данных, то Open, иначе ExecSQL

Понял буду знать, спасибо!

текущая запись в Гриде Найти похожие ветки