Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Form senza bordi e icona nella barra delle applicazioni
Forum - Visual Basic 6 - Form senza bordi e icona nella barra delle applicazioni

Pagine: [ 1 2 ] Precedente | Prossimo
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 22:52
Giovedì, 02/10/2008
Come da titolo potrei avere l'icona di un form senza bordi nella barra delle applicazioni?? Grazie!!

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 7:56
Venerdì, 03/10/2008
Imposta nelle proprietà del form ShowInTaskbar = True

:k:

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 11:36
Venerdì, 03/10/2008
Grazie, va.. si potrebbe fare in modo che quando si clicca sull'icona nella barra delle applicazioni esca un menù tipo quello dei form con i bordi???

PM Quote
Avatar
ruggy94 (Member)
Guru


Messaggi: 890
Iscritto: 21/04/2008

Segnala al moderatore
Postato alle 11:51
Venerdì, 03/10/2008
credo di non aver capito...:-|

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 11:56
Venerdì, 03/10/2008
allora in pratica io ho un form senza bordi e ho disegnato dei bordi e ho messo questa immagine come picture della form...in alto a destra ho messo due command uno per ridurre ad icona e uno per chiudere il programma. essendo il form senza bordi non appariva nella barra delle applicazioni quindi ho impostato la proprietà che mi ha detto grg. quando riduco ad icona dal command se clicco sull'icona nella barra delle applicazioni il programma si ripristina. io vorrei che se clicco con il tasto destro sull'icona nella barra delle applicazioni esca un menù come quello dei form con i bordi. per capire meglio fai un nuovo proggetto senza codice riducilo ad icona e clicca con il tasto destro sull'icona della barra delle applicazioni. io vorrei quell'effetto.

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 15:30
Venerdì, 03/10/2008
credo che la risposta sia no.
se non erro, i popup menu, che sono quello che chiedi, sono limitati all'area del form.
non ne sono certo, non li uso da un pezzo. comunque prova tu (nn ho il vb installato).

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 15:33
Venerdì, 03/10/2008
e come lo imposto il popupmenu?? ad esempio:
Codice sorgente - presumibilmente Plain Text

  1. Form1.PopupMenu Form1.menu


al posto del primo form1 che ci metto??

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 15:35
Venerdì, 03/10/2008
In teoria si potrebbe modifikare la proprietà borderstyle ep oi abbassare la finestra...

Il problema è ke questa proprietà non funziona in run-time ma solo nel design time (quando lavori al progetto)...

Quindi esistono delle API, ecco un esempio che rende il form senza bordi, ma con quelmenu ke dici tu...
Codice sorgente - presumibilmente VB.NET

  1. Private Const GWL_STYLE = (-16)
  2. Private Const WS_BORDER = &H800000
  3. Private Declare Function GetWindowLong Lib "user32" _
  4.         Alias "GetWindowLongA" (ByVal hWnd As Long, _
  5.         ByVal nIndex As Long) As Long
  6. Private Declare Function SetWindowLong Lib "user32" _
  7.         Alias "SetWindowLongA" (ByVal hWnd As Long, _
  8.         ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
  9. Private Const SWP_NOSIZE = &H1
  10. Private Const SWP_NOMOVE = &H2
  11. Private Const SWP_NOZORDER = &H4
  12. Private Const SWP_FRAMECHANGED = &H20
  13. Private Declare Function SetWindowPos Lib "user32" _
  14.         (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, _
  15.         ByVal X As Long, ByVal Y As Long, _
  16.         ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
  17.  
  18. Private Sub Command1_Click()
  19.         Dim lStyle As Long
  20.  
  21.         lStyle = GetWindowLong(Me.hWnd, GWL_STYLE)
  22.         lStyle = lStyle And (Not WS_BORDER)
  23.         SetWindowLong Me.hWnd, GWL_STYLE, lStyle
  24.         SetWindowPos Me.hWnd, 0&, 0&, 0&, 0&, 0&, _
  25.                 SWP_FRAMECHANGED Or SWP_NOMOVE Or SWP_NOSIZE Or SWP_NOZORDER
  26.  
  27. End Sub



Però poi qundo rimetti il form normale cioè clicchi sulla taskbar i bordi del form sono ridimensionabili...

Cmq devi lavorare su quest'API... Googla un pò se hai probl... oppure risp...

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 15:45
Venerdì, 03/10/2008
non funziona.. nè quando lavoro al proggetto, quindi quando non è compilato e nè se è compilato...

PM Quote
Pagine: [ 1 2 ] Precedente | Prossimo