Форум: "Базы";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];
Внизвозможно что-то намудрил с QUERY Помогите!!! Найти похожие ветки
← →
al11 (2003-02-14 11:49) [0]Мастера, Помогите!!! В записи куча полей. Выполняется Query по параметру и в нем по существующим полям считается куча
вычисляемых полей. Вносим изменения в уже существующую запись и персчитываются выч.поля в QUERY (изменения
вносим через Table) Раз - вносим, персчитываются; два - вносим, персчитываются, три - ...; восемь -
Invalid parameter.Insufficient memeory for this operation.Table: С\..(место, где находится программа)\_QSQ121.db"
(Все это в RunTime) и _QSQ121.db в n-ном количестве
← →
AlexSerp (2003-02-14 11:58) [1]У тебя места на диске не хватает.
Все _QSQххх.db нужно удалить после сбоя программы.
Их БДЕ создает как буффер.
Саня
← →
Al11 (2003-02-14 14:18) [2]Ничего не получается!!!! Даже не знаю что делать!!!((
Места на диске полно!!! Файлы эти удалял!!! Ничего не помогает!! Может еще что поскажете ?!!(:
← →
Johnmen (2003-02-14 15:32) [3]Приведи основные моменты в виде кода (работа с НД)...
← →
Al11 (2003-02-14 15:43) [4]запись изменений в таблицу
/*DataModule2.ChangeT - компонент Table на таблицу Change.dbf - PARADOX
//*Datamodule2.Change - компонент QUERY, содержащий поля таблицы Change.dbf(та же самая)
DataModule2.ChangeT.Filtered:=false;
DataModule2.ChangeT.Filter:="CodeChange="""+IntToStr(Change)+"""";
DataModule2.ChangeT.Filtered:=true;
DataModule2.ChangeT.Edit;
Datamodule2.ChangeTJanDebQ.Value:=StrToInt(Edit1.Text);
Datamodule2.ChangeTJanDebS.Value:=StrToFloat(Edit2.Text);
Datamodule2.ChangeTJanCrQ.Value:=StrToInt(Edit3.Text);
Datamodule2.ChangeTJanCrS.Value:=StrToFloat(Edit4.Text);
DataModule2.ChangeT.Post;
Datamodule2.Change.Refresh
← →
Соловьев (2003-02-14 15:48) [5]А вычисления? т.е. поля вычисляемые.
> Change.dbf - PARADOX
Это как?
← →
Johnmen (2003-02-14 15:52) [6]1. А имеется ли компонент TDatabase ?
2. Refresh для TQuery не работает
3. Есть ощущение, что вообще либо TTable либо TQuery лишнее по сути...
← →
Al11 (2003-02-14 16:01) [7])):TDatabase есть.
)):Почему TTable либо TQuery могут быть лишними??????????
)): OnCalcF...
DataModule2.ChangeT.Open;
DataModule2.ChangeRestQ.Value:= DataModule2.GoodsTRestQ.Value;
DataModule2.ChangeRestS.Value:= DataModule2.GoodsTRestS.Value;
DataModule2.ChangeT.Close;
DataModule2.ChangeRestQ.Value:=DataModule2.ChangeRestQ.Value+...;
DataModule2.ChangeRestS.Value:=DataModule2.ChangeRestS.Value+...
DataModule2.ChangeTH.Open;
DataModule2.ChangeTH.Active:=false;
DataModule2.ChangeTH.Prepare;
DataModule2.ChangeTH.ParamByName("CG").AsInteger:=CodeGood;
DataModule2.ChangeTH.ParamByName("Yr").AsDate:=StrToDate(Go);
DataModule2.ChangeTH.ExecSQL;
DataModule2.ChangeTH.Filtered:=true;
DataModule2.ChangeTH.Active:=true;
if (DataModule2.ChangeTHRestQ.Value<>0) and (Datamodule2.ChangeTHRestS.Value<>0) then begin
DataModule2.ChangeRestQ.Value:=DataModule2.ChangeRestQ.Value+DataModule2.ChangeTHRestQ.Value;
DataModule2.ChangeRestS.Value:=Datamodule2.ChangeRestS.Value+Datamodule2.ChangeTHRestS.Value;
end;
DataModule2.ChangeTH.Close;
Datamodule2.ChangeRestJanQ.Value:=DataModule2.ChangeRestQ.Value+...
Datamodule2.ChangeRestJanS.Value:=DataModule2.ChangeRestS.Value+...
///--DataModule2.ChangeTH - Query такой же как и DataModule2.Change (ранее указанный)
← →
Johnmen (2003-02-14 16:08) [8]Как всё запущено то .....:)
Может наконец почитаешь хелп по Open, Active, Prepare, ExecSQL, Filtered и т.д. и т.п.
← →
Al11 (2003-02-14 16:12) [9]Johnmen ©
выразись же поконкретнее
(можешь даже обругать бездаря)
← →
Соловьев (2003-02-14 16:18) [10]DataModule2.ChangeTH.Prepare;
этот метод надо вызывать перед открытием, а не перед присваиванием параметров, и желательно проверить на Prepared:
with DataModule2 ChangeTH do
Begin
...
...
if not Prepared then Prepare;
...
end;
← →
Al11 (2003-02-14 16:23) [11]Спасибо за дельный совет!
Может до кучи ещё какие ошибки найдете!!! (прошу прощения за назойливость)
← →
Соловьев (2003-02-14 16:26) [12]
> DataModule2.ChangeTH.ExecSQL;
> DataModule2.ChangeTH.Filtered:=true;
> DataModule2.ChangeTH.Active:=true;
>
ExecSQL это метод для изменения НД, а не для выборки.
← →
Johnmen (2003-02-14 16:27) [13]>Al11 © (14.02.03 16:12)
>Johnmen ©
>выразись же поконкретнее
Очень хочу, но не буду...:)
Если ты бездарь или ленив - бросай программирование, если малоопытен - см. справочную литературу и самообразовывайся...
← →
Al11 (2003-02-14 16:39) [14]Спасибо И тем кто посоветовал
и тем кто ругается!!!
У меня рабочий день вот-вот кончится .
Кстати, С наступившим праздником всех!!!!!
Счас домой приду и HELPами буду изводиться
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.053 c