Q&A

  • 모달폼 문제
모달폼 2개를 사용하는데...  서로 모달폼을 하나클릭했다가 닫고  다른 모달폼을 열었다가 닫고 이러면
메모리 에러나오면서 안되거든여... 왜 그런가여...
outline index find 에러 나오거든여...  

procedure TForm1.N1Click(Sender: TObject);
begin
application.CreateForm(tform3,form3);
form3.ShowModal;

if form3.ModalResult = mrok then begin
  form3.Close;
  form3.Free;
   form3:=nil;
   end;
end;


procedure TForm1.BMPJPG1Click(Sender: TObject);
begin
application.CreateForm(tform2,form2);
form2.ShowModal;

if form2.ModalResult = mrok then begin
  form2.Close;
  form2.Free;
   form2:=nil;
   end;
end;

0  COMMENTS