Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.02.01;
Скачать: CL | DM;

Вниз

добавление записи в БД   Найти похожие ветки 

 
Съедобный   (2008-12-16 07:54) [0]

Поставил на форму 3 компонента: Query, DataSource и DBGrid. Связал их свойства между собой. В сетку выводятся данные из БД через Query.
Подскажите пожалуйста как мне добавить запись в БД. Я делаю:
Query1.Insert;
Query1.Fields[2].AsString :="Тест";
Query1.Post;

Мне выдаётся ошибка: Query1: Cannot modify a read-only dataset.
Что то не перевёл в режим редактирования. А что?

Спасибо


 
начинающий 5   (2008-12-16 07:59) [1]

requestlive=true


 
съе   (2008-12-16 08:19) [2]

а редактировать как?


 
съе   (2008-12-16 08:19) [3]

и удалять как?


 
начинающий 5   (2008-12-16 08:21) [4]


> съе   (16.12.08 08:19) [2]
> а редактировать как?

Query1.edit;


> и удалять как?

Query1.delete;

совет дня "ПОЧИТАЙ ЛИТЕРАТУРЫ"


 
съе   (2008-12-16 08:43) [5]

Смотрите...я выполняю запрос на сортировку
 Query1.SQL.Clear;
 Query1.SQL.Add("SELECT * FROM baza.DB ORDER BY tb");
 Query1.Active :=true;
У меня сортируются данные. А когда я хочу редактировать запись, у меня вылазиит всё таже ошибка - read-only, хотя мой код по нажатию кнопки
procedure TForm1.Button3Click(Sender: TObject);
begin
 Query1.RequestLive :=true;
 Query1.Edit;
 Query1.Fields[2].AsString :="ТЕСТ";
 Query1.Post;
end;
до сортировки выполняется верно
после запроса - ...........
удаляется там всё


 
съе   (2008-12-16 08:49) [6]

после сортировки таблица становится read-only и код Query1.RequestLive :=true; не влияет никак. Что может быть


 
начинающий 5   (2008-12-16 08:50) [7]

Query1.RequestLive :=true;
Query1.SQL.Clear;
Query1.SQL.Add("SELECT * FROM baza.DB ORDER BY tb");
Query1.Active :=true;


 
начинающий 5   (2008-12-16 08:53) [8]

все таки надо почитать


 
Sergey13 ©   (2008-12-16 09:03) [9]

> [6] съе   (16.12.08 08:49)

F1 + Updating a read-only result set + See also


 
съе   (2008-12-16 09:11) [10]

начинающий 5 в твоем случае работает, применительно к моей проге - нет


 
съе   (2008-12-16 09:49) [11]

Правдо...никак не могу понять и не найду ничего общего. Сортирую...
procedure TForm1.Button1Click(Sender: TObject);
begin
 Query1.RequestLive :=true;
 Query1.SQL.Clear;
 Query1.SQL.Add("SELECT * FROM baza.DB ORDER BY tb");
 Query1.Active :=true;
end;
У меня стоит  Query1.RequestLive :=true;
После сортировки удаляю
procedure TForm1.Button4Click(Sender: TObject);
begin
 Query1.RequestLive :=true;
 Query1.Delete;
end; - у меня не удаляется. Пишет ошибку Table is read only. Хотя  Query1.RequestLive :=true; Менял во всех сочетаниях true - false ВСЁ РАВНО ПОСЛЕ СОРТИРОВКИ ВЫВОДИТ ОШИБКУ. Неполучается


 
съе   (2008-12-16 09:50) [12]

Без сортировки - всё замечательно


 
Медвежонок Пятачок ©   (2008-12-16 09:58) [13]

все верно. все так и должно быть


 
съе   (2008-12-16 10:08) [14]

медвежок запусти код и проверь работоспособность....
у меня не пашет


 
Медвежонок Пятачок ©   (2008-12-16 10:09) [15]

я верю.


 
Sergey13 ©   (2008-12-16 10:13) [16]

> [14] съе   (16.12.08 10:08)

Ты пишешь пример к разделу в хелпе, который я указал?


 
съе   (2008-12-16 10:44) [17]

сергей13 ненайду указанного тобой



Страницы: 1 вся ветка

Текущий архив: 2009.02.01;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.012 c
2-1229508260
Alex_C
2008-12-17 13:04
2009.02.01
Не пропадает Hint


15-1228402519
[Непрошедший]
2008-12-04 17:55
2009.02.01
Непрохождение флюорогрофии на работе


15-1228708456
Mozart
2008-12-08 06:54
2009.02.01
Биллинг...


2-1229292385
Tatb9na
2008-12-15 01:06
2009.02.01
Файлы Delphi


15-1228831528
Вова
2008-12-09 17:05
2009.02.01
запрос