Visual Basic 6 - Collapse to TitleBar

Molto probabilmente sei tu che non riesci a spiegarti, non io a capirti ...



Ed e' proprio quello che non si comprende ...

Il form va nella tray e quindi diventa invisibile. A questo punto il titolo non si vede piu'.

Spiega cosa deve succedere se:

1) pressi il tasto minimizza

2) pressi il tasto aggiunto nel titolo

Naturalmente,:-) e tengo a precisare che scherzo,non vorrei essere franiteso,da parte mia
Vi va tutto il rispetto possibile.Chiarito questo...

mi chiedi:
1) premi il tasto minimizza
Il Form sia che sia in stato vbNormal che in stato ridotto a TitleBar se ne va interamente
in IconTray.

2)premi il tasto aggiunto alla Titlebar
se premo UP tira su il form
se premo DOWN riporta giu' il form
deve fare solo ed esclusivamente questo

3) se premo sulla IconTray il Form si riapre nello stato medesimo in cui è stato minimizzato,se era TitleBar torna TitleBar,se era vbnormal torna vbNormal



per il punto 1) riesco a mandare l'icona in tray ma il Form rimane fuori TRAY.
per il punto 2) è praticamente gia' fatto
per il punto 3) nel codice dovrebbe esserci


Ecco,stavolta non dirmi che non è chiaro :-)
cmq se hai bisogno di sapere qualcos'altro,a disposizione
Sono curioso di vedere come la risolvi,perche' ho provato in diversi modi ma nn ho ottenuto quello che volevo.

Ciao

devi usare form1.hide così nascondi il form e lasci solo la trayicon, poi rimostrerai il form quando si clicca sulla trayicon...

Hai ragione.

Ho fatto cosi':

Public Sub Command1_Click()

 Dim Command1_Click As Boolean
   
If Command1.Caption = "FormUP" Then
   frmMain.Height = 500
   Command1.Caption = "FormDOWN"
      Else

If Command1.Caption = "FormDOWN" Then
   frmMain.Height = 6000
   Command1.Caption = "FormUP"
  End If
End If
End Sub

Private Sub Form_Resize()
    If frmMain.WindowState = vbMinimized Then
    Call modTray.AddTrayIcon(Me.hwnd, Me.Icon, "Add Taste2TitleBar")
    Me.Hide ' <.....qui
      End If
 End Sub

Punti 1 e 2 risolti.
Manca il punto 3 ( sto pensando come fare ma sinceramnte annaspo)e possiamo dire "Risolto" :-)

Domanda:ma il form_resize è un evento riconosciuto dal VB che viene associato sempre al MinButton?
Se si,c'è un contrario di form_Resize dove posso dare alla TRAY il comando Me.Show?

Ciao

il form_resize "entra in gioco" ogni volta che si ridimensiona il form, quindi quando lo "abbassi" quandol o estendi a tutto schermo o quando lo allunghi con il mouse....

comunque in un tuo post precedente in cui cercavi chiarimenti sulla trayicon ti ho dato un esempio funzionante, devi copiare il codice all'interno della sub mouse_move

Si ,ce l'ho presente la SUB MOUSE_MOVE,infatti non è che non abbia la soluzione.
Pero implica un menu' popup,giusto?
Ecco,io stavo chiedendo di fare la stessa cosa senza usare minimamente i menu popup.

Riaprire il Soft ridotto in TRAY dalla SUB Form_RESIZE senza l 'intervento di un menu popup.
Magari la stessa ADDtoTRAY,non so...
C'è una SUB che viene assegnata dal VB alla TRAY?...ex: Private Sub Form_Tray...
Pensi sia possibile?

Ciao

Punto 3)

Questo è quello che intendevo e funziona in parte:

Private Sub Form_modTray()
     If frmMain.WindowState = vbMinimized Then
    Call modTray.RemoveTrayIcon(Me.hwnd)
     Me.Show
      End If
 End Sub

Sia che il FORM sia ridotto in TitleBar che sia in vbNormal una volta MINIMIZZATO in TRAY:
per aprire il Form dalla TRAY devo fare click DX del Mouse e cliccare su volte su SHOW.

Io vorrei cliccare 2 volte direttamente col SX del Mouse sull'iconTRAY per riaprire il FORM.(senza usare popupmenu)


Ciao

quella è una sub per riportare il form alla normalità dalla trayicon... il fatto è che devi mostrare da dove viene richiamata quella sub