كيف يتم إغلاق أكثر من نافذة دفعة واحدة

[oracle007]

اعمل فى نظام صيدليه واقوم بفتح فورمز كثيرة ولكن عند غلقها يقوم النظام بكل واحده على حدة اريد ان اغلقها كلها

دفعة واحده ولا يرجع الى الفورم السابقى ويسأل على كل واحدة منها على حدة

كيف يتم عمل ذلك

افادكم الله

تم تحرير المشاركة : الرجاء كتابة عنوان واضح يدل على مضمون المشاركة
إدارة المنتدى.

[salama11433]

من الافضل عند فتح اى فورم جديده الافضل الكود كده

NEW FORM

حتى يتم اغلق كل فورم مفتحوا من قبل

[sherifsa]

الرجاء ايجاد الرد و هو من شركة اوراكل -
You need three triggers to accomplish the desired results. These are as follows: When-New-Form-Instance :global.quit_all := 'N'; Note: Include this trigger on the initial form. This initializes the global variable. When-Window-Activated IF :global.quit_all = 'Y' THEN EXIT_FORM; END IF; Note: This trigger needs to be on every form in the application, including the initial form. Create it at the form level. It fires when the form regains focus. When-Button-Pressed :global.quit_all := 'Y'; EXIT_FORM; Note: This trigger starts the closing process. If the open forms share the same menu, consider using this trigger in an "EXIT ALL" menu item, instead of a button. You will then only need this trigger for the menu. Otherwise, you will have to apply it to a button on all forms where the user needs this functionality. WARNING - Do not mix OPEN_FORM and CALL_FORM in a multiple form application. A problem occurs if you do the following: 1. Use OPEN_FORM to have form A open form B. 2. Use CALL_FORM to have form B open form C. 3. Switch back to form A, and execute EXIT_FORM. Executing the EXIT_FORM causes form C to error off.