h1 number;
h2 number;
w1 number;
w2 number;
V_ID WINDOW;
BEGIN --if get_window_property(forms_mdi_window,window_state)<>'MAXIMIZE' then
                   --set_window_property(forms_mdi_window,window_state,maximize);
	--end if;
			
			V_ID := find_window(P_WINDOW_NAME);
			h1:=get_window_property(forms_mdi_window,height);
			w1:=get_window_property(forms_mdi_window,width);
			h2:=get_window_property(V_ID,height);
			w2:=get_window_property(V_ID,width);
			set_window_property(V_ID,position,(w1-w2)/2,(h1-h2)/2);

اكتب الكود السابق في
WHEN-WINDOW-ACTIVATED trigger
فضلا أفيدوني بالنتائج

ممكن توضح ماذا تريد ؟

ممكن توضح ماذا تريد ؟

أخي الفاضل

إذا كانت لديك نافذة صغيرة مثل نافذة الدخول إلى المشروع المكونة من ( اسم الدخول وكلمة السر وزر دخول ) هذه النافذة الصغيرة جدا إذا أردت ان تظهر أمام المستخدم في الوسط عند تشغيل النموذج

فقط اكتب الكود السابق في

WHEN-WINDOW-ACTIVATED trigger

DECLARE
h1 number;
h2 number;
w1 number;
w2 number;
V_ID WINDOW;
BEGIN --if get_window_property(forms_mdi_window,window_state)<>'MAXIMIZE' then
--set_window_property(forms_mdi_window,window_state,maximize);
--end if;

V_ID := find_window(P_WINDOW_NAME);
h1:=get_window_property(forms_mdi_window,height);
w1:=get_window_property(forms_mdi_window,width);
h2:=get_window_property(V_ID,height);
w2:=get_window_property(V_ID,width);
set_window_property(V_ID,position,(w1-w2)/2,(h1-h2)/2); 
END;

شكراً لك اخي الكريم

شكرا جزيلا اخي الكريم

لقد جربت الكود  وعمل بطريقة جيدة

جزاك الله كل خير  لقد كنت في حوجة شديدة لهذا الكود

وفقك الله وسدد خطاك

 

 

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

Optimized Code Works Well

تم تعديل 22 يناير 20197 سنة بواسطة Neveen Ebrahim