한정목 님이 쓰신 글 :
: form1 에서 데이터를 받았습니다.
:
: form1 에 만들어진 button 를 누르면 form1에 입력받았던 데이터를
: form2 stringird1 에 표시 하려고 합니다. 어떻게 해야 하나요?
:
: form2 에 입력받은 것을 바로는 표시가능한데.
:
: 꼭 출력버튼을 눌럿을때 form2 에 데이터를 뿌려주고 form2 를 보여주려면 어떻게 해야하나요?
:
: form1 의 출력버튼의 내용입니다.
: procedure TForm1.Button2Click(Sender: TObject);
:
:         Tform2.StringGrid1 do
:
: begin
:         for count:=0 to 9 do
:         begin
:         care[count].score:=care[count].take*(care[count].place_code+care[count].seat_code)-care[count].cancel;
:         cells[0,count+1]:=inttostr(care[count].number);
:         cells[1,count+1]:=care[count].place_name;
:         cells[2,count+1]:=care[count].seat_name;
:         cells[3,count+1]:=inttostr(care[count].score);
:         end;
:         form2.Showmodal;
: end;
:
: 이렇게 하면 안되던데. 어떻게 해야 하는지요?


답변 :
      우선 Form1의
implementation 아래에

uses Unit2;



procedure TForm1.Button2Click(Sender: TObject);
begin
  Form2 := TForm2.create(Application);
  Form2.show;
end;


이렇게 하고요

form2에서는

implementation 아래에

uses Unit1;1234


procedure TForm2.FormCreate(Sender: TObject);
begin
     StringGrid1.Cells[1,1] := Form1.StringGrid1.Cells[1,1];
           :
           :

end;

이런 식으로 ...