global variable to set size of window

From: Scott Felten <sfelten_at_pilot.infi.net>
Date: Wed, 12 Aug 1998 16:46:29 -0400
Message-ID: <35D1FF25.786E_at_pilot.infi.net>

I have many different canvases that I need to show in a window. So I am making use of variables to consolidate code. Everything works great with the exception of setting the width and height. I don't get an error, it just uses the last size.

Any clues? Thank you in advance...
When_mouse_click sets the values of all the variables including...

:GLOBAL.Drill_Width := 750;
:GLOBAL.Drill_Heigth := 750;

INIT_open_window;

PROCEDURE INIT_open_window IS
BEGIN Set_window_property(:GLOBAL.Drill_view_Name, width, to_number(:GLOBAL.Drill_Width)); -- does not work Set_window_property(:GLOBAL.Drill_view_Name, height, to_number(:GLOBAL.Drill_Heigth)); -- does not work

set_window_property(:GLOBAL.Drill_Window_Name, position,
:GLOBAL.Drill_Position_X, :GLOBAL.Drill_Position_Y);
Set_Window_Property(:GLOBAL.Drill_Window_Name, Title,
:GLOBAL.Drill_Title);

show_window(:GLOBAL.Drill_Window_Name);
show_view(:GLOBAL.Drill_View_Name);

go_item(:GLOBAL.Drill_go_block||'.'||:GLOBAL.Drill_go_item);

END; scott felten Received on Wed Aug 12 1998 - 22:46:29 CEST