Скачать: CL | DM;

SQL   Найти похожие ветки 

← →
petvv ©   (2006-05-19 13:14) [0]

Доброго времени суток господа !

У меня следующий вопрос:

Вот код:

for i:=0 to qOsn.RecordCount do
begin
qFuel.Close;
qFuel.Params[0].AsInteger:=qOsn.Fields[0].AsInteger;
qFuel.Active:=True;
qOsn.Fields[4].AsString:=qFuel.Fields[0].AsString; << -- А вот здеся он мне пишет qOsn: Dataset not in edit or insert mode.

qOsnov.Close;
qOsnov.Params[0].AsInteger:=qOsn.Fields[1].AsInteger;
qOsnov.Active:=True;
qOsn.Fields[5].AsString:=qOsnov.Fields[0].AsString;
qOsn.Next;
end;

Что я не так делаю ? Объясните плз.

---

← →
Desdechado ©   (2006-05-19 13:22) [1]

для редактирования нужно перевести этот датасет в режим редактирования
методом Edit, Insert, Append

---

← →
Vlad ©   (2006-05-19 13:22) [2]

> petvv ©   (19.05.06 13:14)  



> << -- А вот здеся он мне пишет qOsn: Dataset not in edit
> or insert mode


qOsn.Edit;
qOsn.Fields[4].AsString:= ...
qOsn.Post;

---

← →
Sergey13 ©   (2006-05-19 13:23) [3]

>Что я не так делаю ?
Не читаешь то, что "он" ТЕБЕ пишет. 8-)

---

← →
Johnmen ©   (2006-05-19 13:24) [4]

1. Нумерация записей нач. с 1, а не с 0.
2. В режим редактирования набор данных переводится вызовом метода Edit.

PS
Цикл по зписям делается не так. Но так while not Eof do begin

---

← →
petvv ©   (2006-05-19 13:30) [5]

Вставил следующий код
qOsn.Edit;
qOsn.Fields[4].AsString:=qFuel.Fields[0].AsString;
qOsn.Post;
А он мне

qOsn: Cannot modify a read-only dataset.

---

← →
petvv ©   (2006-05-19 13:33) [6]

Да qOsn это запрос вот код

qOsn.Params[0].AsDateTime:=DateBeg.Date;
qOsn.Params[1].AsDateTime:=DateEnd.Date;
qOsn.Active:=True;
for i:=0 to qOsn.RecordCount do
begin
qFuel.Close;
qFuel.Params[0].AsInteger:=qOsn.Fields[0].AsInteger;
qFuel.Active:=True;
qOsn.Edit;
qOsn.Fields[4].AsString:=qFuel.Fields[0].AsString;
qOsn.Post;
qOsnov.Close;
qOsnov.Params[0].AsInteger:=qOsn.Fields[1].AsInteger;
qOsnov.Active:=True;
qOsn.Fields[5].AsString:=qOsnov.Fields[0].AsString;
qOsn.Next;
end;

---

← →
Johnmen ©   (2006-05-19 13:33) [7]

Work with read-only dataset
есть такая тема в хелпе.

---

← →
Johnmen ©   (2006-05-19 13:58) [8]

TQuery+F1 -> Using TQuery -> Updating read-only result sets

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c