아헉 ㅠ ㅠ 제가 if 문에서 틀린건가요??
아무리 해도 수정이 되어도 확인을 하지 않고 있습니다..
procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var
I : Integer;
msg : String;
SaveAnswer : Integer;
begin
  msg := '파일에 내용이 변경되었습니다.'+#13+#13+'저장하시겠습니까?';
  For I := 0 To MDIChildCount -1 do
      begin
        if not TForm2(MDIChildren[I]).RichEdit1.Modified then
           Continue;
         SaveAnswer := MessageDlg(msg,mtConFirmation,mbYesNoCancel,0);
         case SaveAnswer of
              idYes : Form2.HSaveClick(Self);
              idCancel : Abort;
         end;
      end;
end;

아무리 봐도 if 문에서 확인을 안하는거 같은대..제가 뭔가 착각을
하고 있는게 아닐까 생각이 들어요 ㅠ ㅠ
다시한번 죄송하지만 어디서 잘못된건지좀 봐주실수 없을까요??