oracle其他-1.htm

来自「微软数据库开发梦工场多媒体教学-oracle篇.rar,是多媒体教学的」· HTM 代码 · 共 56 行

HTM
56
字号
<body bgcolor="#000000"><p><font color="#FFFFFF">FORM中,如何使用警告?</font></p>
<ul>
  <LI> <font color="#FFFFFF">DECLARE<br>
    I NUMBER;<br>
    BEGIN<br>
    SET_ALERT_BUTTON_PROPERTY('警告名',ALERT_BUTTON1,LABEL,'提示1');<br>
    SET_ALERT_BUTTON_PROPERTY('警告名',ALERT_BUTTON2,LABEL,'提示2');<br>
    SET_ALERT_BUTTON_PROPERTY('警告名',ALERT_BUTTON3,LABEL,'提示3');<br>
    SET_ALERT_PROPERTY('警告名',ALERT_MESSAGE_TEXT,'提示信息');<br>
    SET_ALERT_PROPERTY('警告名',TITLE,'标题');<br>
    I:=SHOW_ALERT('警告名');<br>
    IF I=ALERT_BUTTON1 THEN <br>
    MESSAGE('.......');<br>
    ELSIF I=ALERT_BUTTON2 THEN<br>
    MESSAGE('.......');<br>
    ELSIF I=ALERT_BUTTON3 THEN<br>
    MESSAGE('.......');<br>
    END IF;<br>
    END;<br>
    <br>
    例如:<br>
    在退出按钮中<br>
    DECLARE<br>
    I NUMBER;<br>
    BEGIN<br>
    SET_ALERT_BUTTON_PROPERTY('ALERT',ALERT_BUTTON1,LABEL,'退出');<br>
    SET_ALERT_BUTTON_PROPERTY('ALERT',ALERT_BUTTON2,LABEL,'返回');<br>
    SET_ALERT_PROPERTY('ALERT',ALERT_MESSAGE_TEXT,'是否退出');<br>
    SET_ALERT_PROPERTY('ALERT',TITLE,'询问');<br>
    I:=SHOW_ALERT('ALERT');<br>
    IF I=ALERT_BUTTON1 THEN <br>
    EXIT_FORM(ASK_COMMIT);<br>
    ELSE<br>
    GO_BLOCK(块名);<br>
    END IF;<br>
    END;<br>
    <br>
    在删除按钮上<br>
    DECLARE<br>
    I NUMBER;<br>
    BEGIN<br>
    <br>
    SET_ALERT_BUTTON_PROPERTY('ALERT',ALERT_BUTTON1,LABEL,'是(Y)');<br>
    SET_ALERT_BUTTON_PROPERTY('ALERT',ALERT_BUTTON2,LABEL,'否(N)');<br>
    SET_ALERT_PROPERTY('ALERT',ALERT_MESSAGE_TEXT,'是否删除?);<br>
    SET_ALERT_PROPERTY('ALERT',TITLE,'询问');<br>
    I:=SHOW_ALERT('ALERT');<br>
    <br>
    IF I=ALERT_BUTTON1 THEN <br>
    DELETE_RECORD;<br>
    ELSE<br>
    GO_BLOCK(块名);<br>
    END IF;<br>
    END;</font></LI>
</ul>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?