center the forms window in oracle forms 6i,10g 11g | Oracle apps

Опубликовано: 14 Ноябрь 2024
на канале: Subratkumar123
3,051
23

Call procedure in when new form instance
CENTER_FORM('WINDOW1',0);

PROCEDURE CENTER_FORM(MyWindowName IN varchar2,UpperMargin IN number) IS
x number(6);
y number(6);
BEGIN
SET_WINDOW_PROPERTY(FORMS_MDI_WINDOW,TITLE,'India');
Set_window_property(forms_mdi_window,window_state,maximize);
x:=((get_window_property(forms_mdi_window,width)-get_window_property(MyWindowName ,width))/2);
y:=((get_window_property(forms_mdi_window,height)-get_window_property(MyWindowName ,height))/2+UpperMargin);
set_window_property(MyWindowName , position,x,y);
END;