Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.022 c
11-1059559272
Polymorphic
2003-07-30 14:01
2004.04.04
Где взять KOLMath.pas (Нужен для StrGrd)?


3-1078389165
Olegka
2004-03-04 11:32
2004.04.04
Фильтрация в IBDataSet


1-1079535562
Совсем чайник
2004-03-17 17:59
2004.04.04
Двойной щелчок на мыши.


1-1079624269
Роман К
2004-03-18 18:37
2004.04.04
Замена иконок у SpeedButton во время выпонения


3-1078230822
sergt
2004-03-02 15:33
2004.04.04
Выгрузка результата запроса в переменную