Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: Berserker79 - 10 Agosto 2009, 19:48:43

Titolo: Proprietà persistent???(RISOLTO)
Inserito da: Berserker79 - 10 Agosto 2009, 19:48:43

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.

Titolo: Re: Proprietà persistent???
Inserito da: giulio - 10 Agosto 2009, 20:13:33

PUBLIC SUB form_Close()
 
   STOP EVENT
    ME.Hide  
 
     
END

Titolo: Re: Proprietà persistent???
Inserito da: giulio - 10 Agosto 2009, 20:17:13

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à.

Titolo: Re: Proprietà persistent???
Inserito da: Berserker79 - 11 Agosto 2009, 11:29:50

Mille grazie!!!