안녕하세요?
디비챠트로 그래프를 그리는데,
여러개의 시리즈가 있습니다.
쿼리에서 onCalculatesField내에서
특정 Field(=>Calculated Field)에 값을 Move할려고 하는데,
잘 안되네요! 도움을부탁드립니다.

조건 ;;
특정 시리즈에 해당하는 값(필드명 c)을 onCalculatedField내에서 Move하는데,
처음에는 필드 B의 데이타가 없으면 => 0으로 대입하고
             필드 B의 데이타가 있다가 없을 때는 마지막으로 있은 데이타를 Move할려고 합니다.
             (물론 필드 B의 값이 있을 때는 있는 값을 Move)
아마도 시리즈 만큼 반복하는 것 같아서,
처음에 필드 B의 데이타가 없는 경우 0으로 Move가 되지않고,
마지막의 값으로 Move되는 현상이 발생합니다.
예컨데,
B의 값 : 0 0 0 0 0 2 5 0 4 5 0 0 3 2 0 0 인 경우
C의 값 : 0 0 0 0 0 2 5 5 4 5 5 5 3 2 2 2 처럼 할려고 합니다.  

그런데, 코딩을 해서 보면
아마도 제대로 되었다가 마지막으로 Save된 값인 '2'가 OverWrite되는 것 같습니다.
즉,        2 2 2 2 2 2 5 5 4 5 5 5 3 2 2 2 와 같이 마지막의 '2'가 처음의 '0'자리에 덮어씌운것 같습니다.
무엇으로 콘트롤을 해야 합는지 알려주시면 감사하겠습니다......

과정;;
해당 시리즈 또는 해당 필드를 동때만 위의 조건대로 처리할려고 하는데
무엇을 콘트롤해야 할 지를 몰라서 글을 올립니다.

참고로 코딩은 ;;
        if  qrySelect.FieldByName('AVG_CONTRACT_AMT').AsInteger  <>  0  then
            begin
              qryGraphSiseCalcAvgTradeAmt.Value  :=  qrySelect.FieldByName('AVG_CONTRACT_AMT').AsInteger;
              intAvgRealTrade                    :=  qrySelect.FieldByName('AVG_CONTRACT_AMT').AsInteger;
            end
        else
            begin
                qryGraphSiseCalcAvgTradeAmt.Value  :=  intAvgRealTrade;
            end;
물론, intAvgRealTrade는 CalcFields procedure밖에서 Clear시켰슴


꼭 부탁드립니다.