小弟刚学不久,E文不是很好,帮助看得一知半解的,请各位帮忙讲解一下
最好是详细些
var
mr: Integer;
mr := Form2.ShowModal;
上面代码可以显示一个模式窗口,在这个窗口关闭之前,其他窗口都是不可用的。在Form2中,可以通过类似于 ModalResult := mrOK;的方式关闭这个窗口并返回这个值给上面的mr,如果窗口是普通的Close或者通过点击窗口右上角的关闭按钮关闭的,则mr的值为mrNone,ModalResult可以接受以下的系统常量,因此可以做类似于windows中的各种对话框:
mrNone = 0;
mrOk = idOk;
mrCancel = idCancel;
mrAbort = idAbort;
mrRetry = idRetry;
mrIgnore = idIgnore;
mrYes = idYes;
mrNo = idNo;
mrAll = mrNo + 1;
mrNoToAll = mrAll + 1;
mrYesToAll = mrNoToAll + 1;