Вниз
Скачать: CL | DM;

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

 
Olegka ©   (2004-03-04 11:18) [0]

Привет всем!

У меня такая проблема: есть поле CODE и SUM. В зависимости от CODE надо разнести SUM в 2 calculated fields: Income и Outcome. Пишу обработчик OnCalcFields.

procedure TForm.IBDS2CalcFields(DataSet: TDataSet);
begin
if DataSet.FieldByName("CODE").AsInteger<4
then
begin
  IBDS2income.Value:=DataSet.FieldByName("SUM").AsFloat;
  IBDS2outcome.Value:=0;
end
else
begin
  IBDS2income.Value:=0;
  IBDS2outcome.Value:=DataSet.FieldByName("SUM").AsFloat;
end
end;


И пишет при присваивании значений, что датасет на в dsEdit mode.
И где я не прав? :(

Заранее спасибо, Olegka


 
Карелин Артем ©   (2004-03-04 11:24) [1]

Ну если просит, то вот:
DataSet.Edit;
***
DataSet.Post;

Я лично вешаю на OnGetText у поля отсебятину.


 
Nikolay M. ©   (2004-03-04 11:29) [2]


> IBDS2income.
> IBDS2outcome.

Точно указаны как Calculated?


 
Johnmen ©   (2004-03-04 11:30) [3]

Поля income и outcome должны быть FieldKind=fkCalculated
Они есть в НД и их нет в таблице...


 
Olegka ©   (2004-03-04 11:34) [4]

To Артем
В обработчике OnCalkFields нельзя менять состояние Dataset, оно в dsCalk и так

To Nikolay
Точно :(


 
Zacho ©   (2004-03-04 11:40) [5]

Попробуй удалить эти поля и пересоздать их заново. А код у тебя правильный.


 
Olegka ©   (2004-03-04 11:52) [6]

Спасибо!
Пересоздание полей помогло!
Во как :))))



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

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



Память: 0.46 MB
Время: 0.021 c
1-1079281916
volser
2004-03-14 19:31
2004.04.04
Шрифты в форточках


7-1074545301
terra
2004-01-19 23:48
2004.04.04
USB


8-1069859128
TitanDesign
2003-11-26 18:05
2004.04.04
PNG в Delphi


14-1078586332
kamerad
2004-03-06 18:18
2004.04.04
Pupup menu


1-1079699441
lika
2004-03-19 15:30
2004.04.04
StringList что не так?




   Наверх