Q&A

  • 그리드의 합을 구하고 싶습니다
아래와 같이 for 문을 돌려 AdvGrid 셀들의 값을 읽은후
그 값들의 합을 구해주려고 합니다.
result 에 AdvGrid.Cells[li_Fday-1,j] 의 합들을 넣어주려 하는데 어떻하면 될까요?
도움 부탁드립니다..


  j := 2;
  for i := 1 to li_cnt do
  begin
    AdvGrid.Cells[li_Fday-1,j] ;
    if li_Fday = 7 then
    begin
      li_Fday := 1;
     // INC(j);
      j := j + 2;
    end
    else INC(li_Fday);
  end;
1  COMMENTS
  • Profile
    김수경 2002.12.19 00:44
    AdvGrid.Cells[li_Fday-1,j]에 있는 숫자를 더해서 Result 변수(결과값)로 돌려 받으시려는 거죠?
    그렇다면 Cells에 들어있는 값이 문자이므로 문자를 숫자로 변환하는 StrToInt 함수를 이용해 보세요
    아래는 님의 Source를 약간 수정한 겁니다.
    참고하세요 ^^;

      Result := 0;
      j := 2;
      for i := 1 to li_cnt do
      begin
        Result = Result + StrToInt( AdvGrid.Cells[li_Fday-1,j]);
        if li_Fday = 7 then
        begin
          li_Fday := 1;
         // INC(j);
          j := j + 2;
        end
        else INC(li_Fday);
      end;