안녕하십니까? 전봉수입니다.
스트링으로 나타난 전년도 와 당년도 숫자를 비교하여  당년도 숫자가 많으면 이벤트 메세지를
발생하려고하는데요 쉬운것 같으면서도 잘 안됩니다.  아래 소스보시고 조언 부탁 드립니다.

// 실시간 10분 간격으로 데이터 표시  타이머
procedure TGasasForm.Timer1Timer(Sender: TObject);
begin
  IF SENDER = STRINGGRID1 THEN
    Begin
      // 1일 이벤트(당년도수자가적음)
      if StrToInt(STRINGGRID1.Cells[1,1]) >  (StrToIntSTRINGGRID1.Cells[1,8]) then
        Begin
          MESSAGEBEEP(0);
          showmessage('당년도'+Ed_YulBul0.Text+'-1일이 전년도보다 가스 사용량이 많다.');
        End
      Else
        Exit;
    End;
    Begin
      // 2일 이벤트(당년도수자가적음)
      if (STRINGGRID1.Cells[2,1]) >  (STRINGGRID1.Cells[2,8]) then
        Begin
          MESSAGEBEEP(0);
          showmessage('당년도'+Ed_YulBul0.Text+'-2일이 전년도보다 가스 사용량이 많다.');
        End
      Else
        Exit;
    End;
    Begin
    // 3일 이벤트(당년도수자가적음)
      if StrToInt(STRINGGRID1.Cells[3,1]) >  StrToInt(STRINGGRID1.Cells[3,8]) then
        Begin
          MESSAGEBEEP(0);
          showmessage('당년도'+Ed_YulBul0.Text+'-3일이 전년도보다 가스 사용량이 많다.');
        End
      Else
        Exit;
    End;
    Begin
      // 11일 이벤트(당년도수자가많음)
     if StrToInt(STRINGGRID1.Cells[11,1]) >  StrToInt(STRINGGRID1.Cells[11,8]) then
          Begin
            MESSAGEBEEP(0);
            showmessage('당년도'+Ed_YulBul0.Text+'-11일이 전년도보다 가스 사용량이 많다.');
          End
      Else
        Exit;
    End;
    Begin
      // 26일 이벤트(당년도수자가많음)
      if StrToInt(STRINGGRID1.Cells[26,1]) >  StrToInt(STRINGGRID1.Cells[26,8]) then
        Begin
          MESSAGEBEEP(0);
          showmessage('당년도가'+Ed_YulBul0.Text+'-26일이 전년도보다 가스 사용량이 많다.');
        End
      Else
        Exit;
    End;
    btnOk1.Click; <- 확인버튼함수
End;