• if form1.showmodal:=mrok then 什么意思


    if form1.showmodal:=mrok then

    这句话什么意思?

    最佳答案

    这个问题说来话长,且听我慢慢道来。。。 首先,你仔细看一看,所有的命令按钮(不论是Button还是BitBtn)都有一个属性:ModalResult,该属性可以设置为mrOk 、mrCancel...等等,默认值是mrNone。 平时,ModalResult属性没什么用处,但如果命令按钮放置到用showmodal显示(模态显示,一般用于显示对话框)的窗体上时,就大大的有用了。 作用体现在: 1、当设置命令按钮的ModalResult属性为mrOk、mrCancel...等时,程序运行后,单击该按钮,按钮所在的窗体会自动关闭,不用在OnClick事件中添加诸如Close;语句。 2、当设置命令按钮的ModalResult属性为mrOk、mrCancel...等时,程序运行后,单击该按钮,按钮所在的窗体会自动关闭,同时将按钮的ModalResult属性值赋值给窗体的ModalResult属性(注意:任何窗体都有这个属性!) 3、自动关闭上述窗体时,窗体的ModalResult属性又会自动传递给showmodal方法,作为该方法的返回值。 所以说,showmodal方法的返回值总是与命令按钮的ModalResult属性相同。 楼主的代码: if form1.showmodal=mrok then 如果要通俗化一下,可以写成如下等价的代码: var r:TModalResult; ...... ....... r:=form1.showmodal; if r=mrOK then ... ... 很明显,根据showmodal方法的返回值,可以判断用户在对话框中,究竟是点击了OK按钮还是Cancel按钮,从而决定下一步的程序逻辑。 最后,更正一下楼主的语法错误:showmodal:=mrok 应该写成 showmodal=mrok (等号左边没有冒号) 不知这样的回答是否满意? 呵呵。。。

    ////////////////////////////////////////////////////////////////////////////////

    好几个按钮 都设置ModalResult:=mrOk;


    然后怎样判断是哪个按钮的事件呢?
    if vForm.ShowModal=mrOK then
    begin
    这边怎么判断是哪个按钮?
    end;

    方法很多,可以在vForm中定义一个公共变量

    var K:Integer;

    procedure vForm.Button1Click(Sender: TObject);
    begin
     K:=1;
     ModalResult:=mrOk;
    end;

    procedure vForm.Button2Click(Sender: TObject);
    begin
     K:=2;
     ModalResult:=mrOk;
    end;



    if vForm.ShowModal=mrOK then
    begin
      if vForm.K=1 then
         showmessage('是Button1')
      else if vForm.K=2 then
         showmessage('是Button2')
      ...
    end;

  • 相关阅读:
    【代码笔记】Web-CSS-CSS伪类
    「MoreThanJava」Day 4:面向对象基础
    96年/离职8个月/拒绝华为offer/目前自由职业-记这大半年来的挣扎与迷茫
    nginx配置path_info,让codeigniter访问其它路由不是404
    Golang 与 JS 的字符串截取大同小异
    [Py] Python 的 shape、reshape 含义与用法
    微信公众号分享接口报错 "errMsg": "config:invalid url domain"
    vi以及vim打开文件中文乱码
    常见的移动端H5页面开发遇到的坑和解决办法
    CSS3 Transform 属性详解
  • 原文地址:https://www.cnblogs.com/hssbsw/p/3159681.html
Copyright © 2020-2023  润新知