السلام عليكم ورحمة الله وبركاته

إخواني ممكن مساعدة ضرورية

ممكن أعرف كيف ممكن أعمل Alert
أنا مبتدأ واذا ممكن شرح واضح

مشروعي التخرج على الأوراكل ،، وأتمنى منكم المساعدة

تحياتي ،،،

تم تعديل العنوان , راجع شروط الكتابه فى المنتدى حتى ماينحذف موضوعك فى المره القادمه.
اداره ا لمنتدى

السلام عليكم أخي الكريم..

لعمل ALERT .. يجب عليك فعل الاَتي:

1) من الـOBJECT NAVIGATOR إعمل ALERT جديد وسميه أي إسم - وليكن ALERT_BUTTON -..

2)عندما تريد إظهار الـALERT ... مثلا إذا حبيت تعمل زر إلغاء سجل .. ضع WHEN-BUTTON-PRESSED TRIGGER و ضع فيه هذا الكود:

DECLARE
V_ALERT_RETURN	NUMBER(10);
V_ALERT_NAME		VARCHAR2(100) := 'ALERT_BUTTON';
BEGIN -- SET ALERT TITLE,MAESSAGE,BUTTONS
SET_ALERT_PROPERTY( V_ALERT_NAME, TITLE, 'CONFIRM');
SET_ALERT_PROPERTY( V_ALERT_NAME, ALERT_MESSAGE_TEXT, 'ARE YOU SURE ?');
SET_ALERT_BUTTON_PROPERTY( V_ALERT_NAME, ALERT_BUTTON1, LABEL, 'YES');				
SET_ALERT_BUTTON_PROPERTY( V_ALERT_NAME, ALERT_BUTTON2, LABEL, 'NO');				
SET_ALERT_BUTTON_PROPERTY( V_ALERT_NAME, ALERT_BUTTON3, LABEL, '');				

-- show alert
V_ALERT_RETURN := SHOW_ALERT( V_ALERT_NAME );

-- ACTION AGAINST SELECTION
IF 		V_ALERT_RETURN = ALERT_BUTTON1 THEN
	DELETE_RECORD;		
ELSIF	V_ALERT_RETURN = ALERT_BUTTON2 THEN
	NULL;
END IF;
	
END;

أرجو تكون الصورة وضحت

تحيه طيبه و بعد

بعد عمل الalert على ال navigatro

if show_alert('EXIT_ALERT') = alert_button1 then
 exit_form;
end if;

ملحوظه : اسم ال alert هو EXIT_ALERT


ايهاب وجدى