yosule 님이 쓰신 글 :
: : procedure TForm1.BtnInputClick(Sender: TObject);
: : var
: :     i,j,Count:Integer;
: :     MunJaYul:String;
: :
: : begin
: :     Count:=1;
: :     With StringGrid1 do
: :      for i:=0 to RowCount-1 do
: :        for j:=0 to ColCount-1 do
: :         begin
: :           RowHeight[i]:=30;  //cell 높이 조정
: :           ColWidths[j]:=120; //cell 폭 조정
: :           Inc(Count);        //Count 증가
: :           MunJaYul:='델파이 프로그래밍' + IntToStr(Count);
: :           Cells[i,j]:=MunJaYul; //각 셀에 문자열 + Count 삽입
: :         end;
: : end;
: :
:
: 자세히는 살피지 않았고요...얼핏보니
: 위의 소스내용을 아래와 같이 할면 될 것 같습니다.
:
: :     With StringGrid1 do
:       begin <--- 첨가
: :      for i:=0 to RowCount-1 do
: :        for j:=0 to ColCount-1 do
: :         begin
: :           RowHeight[i]:=30;  //cell 높이 조정
: :           ColWidths[j]:=120; //cell 폭 조정
: :           Inc(Count);        //Count 증가
: :           MunJaYul:='델파이 프로그래밍' + IntToStr(Count);
: :           Cells[i,j]:=MunJaYul; //각 셀에 문자열 + Count 삽입
: :         end;
:       end;  <--- 첨가
:
:

관심가져주셔서 감사합니다.
첨가해봤는뎅. 역시 같은 에러 발생합니다.