<!--[endif]-->  <!--[if !vml]--><!--[endif]-->  델파이 연습하고있는데 잘모르겠어서 질문드립니다.>

위에서  동그라미갯수하고 틀린갯수 를 구하는 소스를 짜야하는데 아직 입문이라 도저히 모르겠어서 글을올립니다.

제가생각한거에는

procedure TForm2.FormCreate(Sender: TObject);
var
  i,j:integer;
begin
 with StringGrid1 do begin
   Cells[0, 0] := '성명';
   Cells[1, 0] := '1번';
   Cells[2, 0] := '2번';
   Cells[3, 0] := '3번';
   Cells[4, 0] := '4번';
   Cells[5, 0] := '5번';
   Cells[6, 0] := '6번';
   Cells[7, 0] := '7번';
   Cells[8, 0] := '8번';
   Cells[9, 0] := '9번';
   Cells[10, 0] := '10번';
   Cells[11, 0] := '점수';
   end;  //with의 끝
 with StringGrid2 do begin
   Cells[0, 0] := '문항';
   Cells[1, 0] := '1번';
   Cells[1, 1] := ;
   Cells[1, 2] := ;
   Cells[2, 0] := '2번';
   Cells[2, 1] := ;
   Cells[2, 2] := ;
   Cells[3, 0] := '3번';
   Cells[3, 0] := ;
   Cells[3, 0] := ;
   Cells[4, 0] := '4번';
   Cells[4, 1] := ;
   Cells[4, 2] := ;
   Cells[5, 0] := '5번';
   Cells[5, 1] := ;
   Cells[5, 2] := ;
   Cells[6, 0] := '6번';
   Cells[6, 1] := ;
   Cells[6, 2] := ;
   Cells[7, 0] := '7번';
   Cells[7, 1] := ;
   Cells[7, 2] := ;
   Cells[8, 0] := '8번';
   Cells[8, 1] := ;
   Cells[8, 2] := ;
   Cells[9, 0] := '9번';
   Cells[9, 1] := ;
   Cells[9, 2] := ;
   Cells[10, 0] := '10번';
   Cells[10, 1] := ;
   Cells[10, 2] := ;
   Cells[0, 1] := '맞은수';
   Cells[0, 2] := '틀린수';
   end;
end;

// 위에서 빈칸에 뭘넣으면 될꺼같은데 도저히 제머리로는 잘 모르겠습니다...