Exclusive - Oracle Forms Recipes EBook - Download Here

Subscribe To Get Tutorials With Source Code

Saturday, March 2, 2013

Posted by V. Kapoor
No comments | 7:06 AM

Set Icon_File property in When-Mouse-Enter trigger

Suppose you are creating icon based menu system in Oracle Forms 6i and you want to change icon when mouse over on any push button.

You can accomplish this task by writing form level trigger when-mouse-enter and when-mouse-leave, here is the example:

Create a block, design accordingly and place push buttons as per the requirement and set iconic property to yes and specify default icon file.

Then write when-mouse-enter trigger Form Level, this trigger will fire when-ever mouse enter over on any item.
Declare
  vMousetime varchar2(100) := lower(:system.mouse_item);
Begin
-- check for your button and specify the new icon
   if vMouseitem = 'yourblock.urbutton1' then
     set_item_property(vmouseitem, icon_file, 'onhover1');
   elsif vmouseitem = 'yourblock.urbutton2' then
     set_item_property(vmouseitem, icon_file, 'onhover2');
-- and so on for your all buttons
   end if;
End;

Write when-mouse-leave trigger Form Level, this trigger will fire when-ever mouse leave any item.

Declare
  vMousetime varchar2(100) := lower(:system.mouse_item);
Begin
-- check for your button and restore the default icon
   if vMouseitem = 'yourblock.urbutton1' then
     set_item_property(vmouseitem, icon_file, 'default1');
   elsif vmouseitem = 'yourblock.urbutton2' then
     set_item_property(vmouseitem, icon_file, 'default2');
-- and so on for your all buttons
   end if;
End;

Now you can test your menu.


Have you got the solution ? If not then Ask Me

0 comments :

Post a Comment

FoxInfotech's Android App

Blog Archive

Subscribers

Translate

My Store

Payment Gateway

Fox Infotech. Powered by Blogger.

Dedicated to my Dad

Dedicated to my Dad

Alexa Rank