| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
текущая запись в Гриде [D7]
Till © (2003-07-05 15:34:00)Как узнать какая запись сейчас текущая в Гриде, и записать в виде SQL запроса ее удаление?
Заранее всем спасибо!
Till (2003-07-06 16:19:00) [1]
> Anatoly Podgoretsky © (06.07.03 16:15)
> Посмотри в справочной системе, а суть в том, если возвразается
> набор данных, то Open, иначе ExecSQL
Понял буду знать, спасибо!
Anatoly Podgoretsky (2003-07-06 16:15:00) [2]Посмотри в справочной системе, а суть в том, если возвразается набор данных, то Open, иначе ExecSQL
Till (2003-07-06 16:11:00) [3]
> Anatoly Podgoretsky © (06.07.03 16:05)
> Open
А разница в чем? Объясните пожалуйста, просто я понять не могу...
Anatoly Podgoretsky (2003-07-06 16:05:00) [4]Open
Till (2003-07-06 16:02:00) [5]
> Anatoly Podgoretsky © (06.07.03 15:55)
> Нельзя
А как надо?
Anatoly Podgoretsky (2003-07-06 15:55:00) [6]Нельзя
Till (2003-07-06 15:51:00) [7]
> Anatoly Podgoretsky © (06.07.03 15:49)
> Нет, он спрашивает, почему ты применяешь ExecSQL к запросу?
Чтобы выполнить его!
Anatoly Podgoretsky (2003-07-06 15:49:00) [8]Нет, он спрашивает, почему ты применяешь ExecSQL к запросу?
Till (2003-07-06 14:38:00) [9]
> KSergey © (06.07.03 11:27)
> А во это вот зачем?
>
> DM.GeneralSQL.SQL.Text := "select t.*, t.rowid from ekbs_kom_bases
> t";
> DM.GeneralSQL.ExecSQL;
чтобы отобразить все записи у меня ДатаСорс связан с ГенералСКЛ. Вотт.....
KSergey (2003-07-06 11:27:00) [10]А во это вот зачем?
DM.GeneralSQL.SQL.Text := "select t.*, t.rowid from ekbs_kom_bases t";
DM.GeneralSQL.ExecSQL;
Till (2003-07-06 10:20:00) [11]Сделал так работает :)
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;
Семен Сорокин (2003-07-05 18:38:00) [12]TDataSet.Delete
Наталия (2003-07-05 17:26:00) [13]Текущая запись та, на которой находится курсор. Удалить в SQL запросе можно, используя команду delete, у которой в условии where указать ключевое поле текущей записи.
| |
