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

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

IBDataSet [D7, MSSQL]

Страницы:   < 1 2 >

cherrex ©   (2004-07-29 20:24:00) 

Помогите с удалентем.
DeleteSQL :delete from MECH
where
 SHIP_ID = :SHIP_ID and
 STANDART_MECH = :STANDART_MECH

procedure TForm2.BitBtn3Click(Sender: TObject);
begin
IBDataSet1.Active := True;
IBDataSet1.Delete;
IBDataSet1.ParamByName('STANDART_MECH').AsString := Edit5.Text;
IBDataSet1.FieldByName('SHIP_ID').AsString := Ship_Id;
Form1.IBTransaction1.CommitRetaining;
IBDataSet1.Post;
end;
Постоянно выводит ошибку!!!

---

cherrex   (2004-07-29 20:45:00) [21]

База у меня точно IB, а запрос создад сам мастер IBDataSet.

---

Vlad   (2004-07-29 20:44:00) [22]

Можно я прокомментирую ?

IBDataSet1.Active := True; //Открываем набор данных
IBDataSet1.Delete; // Удаляем первую запись
IBDataSet1.ParamByName('STANDART_MECH').AsString := Edit5.Text; // присваивваем значение параметру
IBDataSet1.FieldByName('SHIP_ID').AsString := Ship_Id; //присваиваем значение полю
Form1.IBTransaction1.CommitRetaining; // Подтверждаем транзакцию
IBDataSet1.Post; //Cохраняем изменения в наборе данных.

А теперь объясните, что это за чушь ???
Что вам вобще требуется сделать ?

---

bushmen   (2004-07-29 20:36:00) [23]

А причем тут MSSQL ? Вы сначала с базой определитесь: IB или MSSQL. Да и с кодом изюм какой-то

---

Страницы:   < 1 2 >

Наверх