Visual Basic 6 - Ridurre un Soft a IconTray e poterlo riaprire

Forum - Visual Basic 6 - Ridurre un Soft a IconTray e poterlo riaprire - Pagina 2

Pagine: [ 1 2 3 4 ]

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 19:37
Mercoledì, 09/09/2009

allora nella sub form_resize metti
if form1.windowstate = vbminimized then
AddTray...
end if

per le altri domande le risposte le hai già

fusebyte (Normal User)
Expert

Messaggi: 332
Iscritto: 24/12/2008

Postato alle 12:48
Giovedì, 10/09/2009

So proprio de coccio.
ho fatto come hai detto ,l'icona appare ma di ridurre a iconTray e di riaprilo non ne vuole sapere.
Anche peche' è vero che l'icona appare in IconTray ma solo l'icona ,il soft con MINBUTTON si riduce nella barra e non in icontray.

La SUB FORM_RESIZE nel tuo codice non la vedo.Sara questo?

Ultima modifica effettuata da fusebyte il 10/09/2009 alle 12:50

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 14:06
Giovedì, 10/09/2009

Testo quotato

Poi nel button per farlo andare in trayicon:

Codice sorgente - presumibilmente Plain Text

AddToTray Form1, "Nome Programma", Form1.Icon

questo era quello che ti ho scritto. Poi mi hai chiesto come farlo andare in trayicon NON quando si preme il pulsante, Ma quando il form viene abbassato/minimizzato e allora ti ho detto che devi spostare il codice sopra postato non dentro a un commandbutton ma dentro la sub form_resize del form1

fusebyte (Normal User)
Expert

Messaggi: 332
Iscritto: 24/12/2008

Postato alle 17:45
Giovedì, 10/09/2009

Perfetto,fino a qui ci siamo,clicco MINBUTTON ed il soft si riduce ad icona.
Manca la parte da ICONTRAY con doppio click per riaprire il soft.
Non so se ancora ho dimenticato qualcosa io,ma se faccio un doppio click sull' ICONTRAY il soft non si riapre e posso chiuderlo solo dal TASK di XP,non posso fare altro.

dovrebbe essere semplice,forse il tutto sempre dentro la SUB FORM_Resize
la costante è gia' dichiarata
Private Const WM_LBUTTONDBLCLK = &H203

if "Left doppio click on icontray" = True then
Form1.WindowState = vbMaximized
end if

Non so come impostare il doppio click e spero che il ragionamento non sia del tutto sballato.

Ciao

Ultima modifica effettuata da fusebyte il 10/09/2009 alle 18:34

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 19:14
Giovedì, 10/09/2009

fai la prova con 1 solo click... non so il perchè ma per aprire il programma anche se il codice sarebbe x 1 solo click devo cliccare 2 volte

fusebyte (Normal User)
Expert

Messaggi: 332
Iscritto: 24/12/2008

Postato alle 19:36
Giovedì, 10/09/2009

Proprio non si apre,una volta minimizzato,è inutilizzabile e posso solo chiuderlo dal TASK.

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 21:12
Giovedì, 10/09/2009

il codice funziona, te lo assicuro... lo usarai in maniera sbagliata credo...

fusebyte (Normal User)
Expert

Messaggi: 332
Iscritto: 24/12/2008

Postato alle 0:25
Venerdì, 11/09/2009

Allora per non sbagliare ho aperto un nuovo progetto,ho inserito quanto detto inizialmente nel modulo .BAS ed inserito nel codice del FORM1 la sub Form_MouseMove.

Non crea l'icona e non minimizza il soft.

A me minimizza in icontray perche' piano piano ho fatto degli aggiustamenti ,compreso il tuo suggerimento della SUB RESIZE.
Io sono convinto che manca la parte per riaprire il soft cliccando sulla TRAYICON.

Sto provando,ma non riesco ad assocciare il click o doppio click alla iconTray.
Dopo questo sarebbe uno scherzo assegnargli un WindowState = vbNORMAL.

Devi sapere che ho modificato il codice ed in pratica nela ICONTRAY ci sono 14 icone che ciclano,forse è per questo che c'è qualche problema.

Mi basta capire come si gestisce l'evento doppio click sulla icontray.
Ciao

Ultima modifica effettuata da fusebyte il 11/09/2009 alle 7:59

Pagine: [ 1 2 3 4 ]