Bạn có thể tải xuống biểu mẫu này từ liên kết sau:Modal_Msgt.fmbVới ví dụ này, tôi đã tạo ba cảnh báo như sau tên:1. Tốt_Msg2. Error_Msg3. Ask_Alert Đoạn mã sau được viết cho nút "Hiển thị Thông báo Tốt" để hiển thị một thông báo bình thường, bạn có thể sử dụng mã này trong bất kỳ khối PLSQL nào: Khai báo-- tạo một biến số để giữ show_alert trả về số valuenalertbutton; Bắt đầu - đặt thông báo cho alertset_alert_property ('good_msg', alert_message_text, 'Đã lưu thành công hồ sơ.'); - sau câu lệnh bên dưới, việc thực thi sẽ giữ cho đến khi bạn nhấp vào ok .. vì nó là một windownalertbutton phương thức:=show_alert ('good_msg');:alertblock.result:='Đó là một thông điệp tốt.'; - sau đó bạn có thể thực hiện bất kỳ tác vụ nào ... Kết thúc; Đoạn mã sau được viết cho nút "Hiển thị Thông báo Lỗi" để hiển thị Thông báo Lỗi: Khai báo-- tạo một biến số để giữ số giá trị trả về show_alert; Bắt đầu - đặt thông báo cho alertset_alert_property ('error_msg', alert_message_text, 'Đã xảy ra lỗi.'); - sau câu lệnh dưới đây, quá trình thực thi sẽ giữ cho đến khi bạn nhấp vào ok .. vì nó là một cửa sổ theo phương thức:=show_alert ('error_msg');:alertblock.result:='Đó là một LỖI message. '; - sau đó bạn có thể thực hiện bất kỳ tác vụ nào ... Kết thúc; Đoạn mã sau được viết cho nút "Yêu cầu xác nhận" để yêu cầu xác nhận: Khai báo-- tạo một biến số để giữ số giá trị trả về show_alert; Bắt đầu - đặt thông báo cho alertset_alert_property ('ask_alert', alert_message_text, ' Xác nhận Có hay Không? '); - sau câu lệnh dưới đây, quá trình thực thi sẽ giữ cho đến khi bạn nhấp vào ok .. vì nó là một cửa sổ phương thức nalertbutton =alert_button1 then:alertblock.result:='Bạn chọn Có.'; else:alertblock.result:='Bạn chọn Không.'; kết thúc nếu; - sau đó bạn có thể thực hiện bất kỳ tác vụ nào ... Kết thúc;
Đăng ký để nhận thông báo qua email về các cập nhật mới nhất như thế này:
Nhập địa chỉ email của bạn:
