我想在程序中做如下设置:
    当用户非法输入时,弹出报错对话框,当用户点击重试时,程序重新运行。当用户点击取消时,跳出程序。
另外,可否告知GOTO语句的用法。

解决方案 »

  1.   

    不知道Delphi自带的对话框能否给按钮的caption赋值,我碰到类似情况,是自己写了一个窗体,用ModalResult来控制
      

  2.   

    有没有别的方法,GOTO语句可不可以
      

  3.   

    用label定义一个标签即可用Goto跳转到标签所在位置最好不要用Goto,如果到了非用Goto不可的情况,建议重新设计程序结构可用Application.MessageBox,直接用API MessageBox一样
      

  4.   

    不好意思,真没注意,以前从来没用过goto^_^
    不过说句实话,强烈建议不要用goto,会严重降低程序的可读性。
    记得以前学c的时候,老师专门讲过几节课如何把goto转成普通的循环、判断语句。
      

  5.   

    Application.MessageBox('对不起,您的输入有误!','提示',MB_RETRYCANCEL+MB_ICONINFORMATION)试试这个。
      

  6.   

    最好不要用Goto,很容易出错!
    自己建一个窗体作为对话框,
    放两个Button.
    一个执行retry操作,另一个执行close