Proprietà persistent???(RISOLTO)

[Berserker79]

Ciao, volevo fare in modo che il mio programma non venisse terminato quando viene cliccata la X della finestra, ma venisse ridotto a icona nella tray. ho impostato su true la proprietà persistent del form e in parte risolvo il mio problema. purtroppo però è vero che il programma non viene chiuso, ma le variabili che mi servono per il funzionamento del programma vengono distrutte e quindi il programma và in errore non appena cerca le variabili distrutte. Help me!!!
Ciao.

[giulio]

PUBLIC SUB form_Close()
 
   STOP EVENT
    ME.Hide  
 
     
END

[giulio]

Nel caso poi volessi chiudere il programma (perché con l'esempio scritto su l'evento close è sempre evitato - e dovresti chiudere l'applicazione brutalmente), devi mettere un booleano all'inizio del programma e poi quando vuoi chiudere veramente il programma impostarlo su TRUE, per esempio tramite un click su un menu 'Exit' della trayicon.

Codice: [Seleziona]

PRIVATE $bVoglioChiudere as Boolean

PUBLIC SUB VoceExitDelMenuIconaTray_Click()
  
  $bVoglioChiudere = TRUE
  ME.Close

END

PUBLIC SUB Form_Close()
  
  IF $bVoglioChiudere THEN 
    ME.CLOSE 
  ELSE 
    STOP EVENT 
    ME.Hide  
  ENDIF 
      
END

In questo modo solo quando clicchi sul menu Exit della trayicon il programma terminerà.

[Berserker79]

Mille grazie!!!