שלום

רציתי לדעת איך אני יכול לשלוט באיקס בפינה הימנית של החלון ?

איך אפשר לאבטח את סגירת הפורם ?

למה הכוונה "לאבטח" ?

יש לך שיגרה של: QueryUnload שזה מתייחס ללחיצה על כפתור ה X.

אם אתה רוצה לעשות את הכפתור כלא זמין ( בצבע ) אפור, יש צורך בשימוש של פונקציית API.

נדמה לי שכאשר האיקס מבוטל אז הוא לא מופיע באפור אלא לא מופיע כלל

בכל מקרה אם מדובר על פרוצדורות שאתה רוצה שיבוצעו כאשר סוגרים את הפורום אז תחפש את השיגרה form.terminated

אם אתה רוצה שיהיה לך כפתור Mini או Max ללא ה X הוא חייב להיות באפור.

אתה רוצה שלא יהיה אפשר לסגור את הפורום?

למה הכוונה "לאבטח" ?

יש לך שיגרה של: QueryUnload שזה מתייחס ללחיצה על כפתור ה X.

אם אתה רוצה לעשות את הכפתור כלא זמין ( בצבע ) אפור, יש צורך בשימוש של פונקציית API.

נראה לי שאתה מתכוון ל-Unload.

QueryUnload זה משהו יותר מורכב.

הפתרון הוא פשוט:

Private Sub form1_Unload(cancel As Integer)
  cancel = 1
End Sub

כשהמשתמש לוחץ על ה-X, התוכנית קוראת לפונקציה הנ"ל.

כשהפונקציה נגמרת, אם cancel==0, אז הפורם יסגר. אחרת, הפורם ישאר פתוח.

(עדיין אפשר לסגור אותו באלימות באמצעות ה-task manager)