📄 oracle其他-1.htm

📁 微软数据库开发梦工场多媒体教学-oracle篇.rar,是多媒体教学的

💻 HTM

字号:

<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 + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -