Menu Item (set_menu_item_property)

Bonjour,

Voici une procédure dans une Forms en 6i

procedure enable_disable_query_items is
begin
enable_item('Query','Last_Criteria');
enable_item('Query','Cancel');
disable_item('Action','Save');
disable_item('Action','Exit');
disable_item('Block','Previous');
disable_item('Block','Next');
disable_item('Record','Previous');
disable_item('Record','Next');
disable_item('Record','Scroll_up');
disable_item('Record','Scroll_down');
disable_item('Record','Insert');
disable_item('Record','Duplicate');
disable_item('Record','Lock');
end;

Malheureusement en 10G enable_item et disable_item écrit comme ça n'est pas reconnu.

Comment puis-je modifier ce code pour obtenir la même chose?

J'ai fait des recherches sans de bons résultats

J'ai essayé set_menu_item_property avec des paramêtres et pas grand chose fonctionnent.

Merci beaucoup!!!

Ces built-in doivent être remplacés par set_menu_item_property.
Exemple :

Code:

---

1 2 3 4

-- enable_item('Query','Last_Criteria'); set_menu_item_property('Query.Last_Criteria', enabled, property_true); -- disable_item('Action','Save'); set_menu_item_property('Action.Save', enabled, property_false);

---

Mercvi beaucoup,
Ça fonctionne à merveille!!!

moi aussi j'ai rencontré ce problème et maintenant ça marche bien grace à votre réponse, je vous remercie infiniment