如何在 oracle forms 10g 中居中我的 window

Question

如何在 oracle forms 10g 中居中我的 window？

我的代码不起作用：

set_window_property(forms_mdi_window, window_state, maximize);

set_window_property('window1',x_pos,(get_window_property(forms_mdi_window,width)-get_window_property('window1',width))/2);

set_window_property('window1',y_pos,(get_window_property(forms_mdi_window,height)-get_window_property('window1',height))/2);

你有什么想法，为什么？谢谢

Answer 1

不要设置为最大化开始，那么你就不能再改变尺寸了。然后我使用这个代码：

declare
     mdiwidth number;
     mdiheight number;
     winid window;
     v_window VARCHAR2(50) := get_view_property(get_item_property( name_in( 'SYSTEM.CURSOR_ITEM' ), ITEM_CANVAS), WINDOW_NAME );
 begin
    winid := find_window(v_window);
    mdiwidth := get_window_property(FORMS_MDI_WINDOW, width);
    mdiheight := get_window_property(FORMS_MDI_WINDOW, height);
    set_window_property(winid, position, 
                        greatest(mdiwidth/2 - get_window_property(winid, width)/2 - 2, 0),
                        greatest(mdiheight/2 - get_window_property(winid, height)/2 - 40, 0));
end;

taksbar高度调整为40

Answer 2

set_window_property(forms_mdi_window, window_state, maximize);

set_window_property('PURCHASE',x_pos,(get_window_property(forms_mdi_window,width)-get_window_property('PURCHASE',width)-10)/2);
set_window_property('PURCHASE',y_pos,(get_window_property(forms_mdi_window,height)-get_window_property('PURCHASE',height))/2);

如何在 oracle forms 10g 中居中我的 window

how to center my window in oracle forms 10g

oracleforms