Re: Tab Control , Forms 4.5 , tabswitching
Date: 1997/03/09
Message-ID: <33230d8d.265101085_at_news.aud.alcatel.com>#1/1
>
>We use a VBX control, produced by a company called Videosoft. This
>generally works well. However, when Forms5.0 comes along, VBX controls
>will not be useable. Also Forms 5.0 will have built-in TAB controls, so
>you would have to convert them when/if you migrate.
>
>--
>The above posting represents the personal opinions of the author and
>is not to be taken as official (or unofficial) policy or opinions of
>his employer.
>
>Alex Heney, Living in the Global Village.
Hey Alex ,
saw your response about videosoft's tab control .
I have aquestion for you.
I also use the same VSVBX, version 4 (the only version that works for me) Version 5 always bomp's out) !
[Quoted] I use this tab switching procedure, which works but my problem is, that I would like to switch between the tabs without using GO_ITEM. Just using Show canvas does not always work, I guess I have a refresh or overlapp problem, that's why I use Go_item to begin with.
I would like to make all the
fields in on the subcanvas display items, now I have to leave one item
on each canvas a text item, so the go_item does work. Do you have any
ideas how to be able to switch between canvases without using Go_item,
or to make Go_item work with display items.
I don't want to user in these canvases to enter or change anything,
it's just for querrying and displaying. Any Suggestions?? I would
appreciate it very much.
Here is how I do it today :
PROCEDURE tab_switching
IS
TabEvent VARCHAR2(80);
TabNumber NUMBER;
BEGIN
TabEvent := :system.custom_item_event;
IF (UPPER(TabEvent) = 'CLICK') then
--hide_tabs;
TabNumber := VBX.Get_Property('STENCIL_TAB', 'CurrTab'); IF TabNumber = 0 then show_view('PRODUCTION'); GO_ITEM ('STENCIL_P.STENCIL_SLOT'); <---- switch to Prod. Tab ELSIF TabNumber = 1 then show_view('ENGINEERING'); GO_ITEM ('STENCIL_E.STENCIL_SLOT'); <--- switch to Eng. Tab ELSIF TabNumber = 2 then show_view('OBSOLETE'); GO_ITEM ('STENCIL_O.STENCIL_SLOT'); <--- switch to Fixture Tab ELSIF TabNumber = 3 then show_view('FIXTURE_INFO'); GO_ITEM ('FIXTURE_TAB');
... etc, you get the idea
Thanks for looking at it
Jens Received on Sun Mar 09 1997 - 00:00:00 CET