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 - problema nel minimizzare un form
Forum - Visual Basic 6 - problema nel minimizzare un form

Avatar
carmines92 (Normal User)
Pro


Messaggi: 83
Iscritto: 10/04/2007

Segnala al moderatore
Postato alle 20:03
Lunedì, 12/11/2007
aga ho un problema nel programma vi spiego quale...
Allora io ho un form dove ho fatto quel pulsante per minimizzare il form però quando scrivo

Me.WindowsState = vbMinimized

il form me lo riduce però in maniera brutta cioè non mi piace come lo fa...

Guardate l'img.  :cry:
http://www.bytesintheveins.com/immagini/12112007_spplayer.bmp

PM Quote
Avatar
Roberto VB (Member)
Expert


Messaggi: 419
Iscritto: 29/01/2007

Segnala al moderatore
Postato alle 21:39
Lunedì, 12/11/2007
te lo riduce in mezzo allo schermo ?
Comunque devi vedere prima se da lo stesso problema su altri computer.

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 22:14
Lunedì, 12/11/2007
io sarò molto "vecchio Stile" ma non è meglio usare i
form.left = ..
form.top = ..
form.width = ..
form.heigth = ..

ah, il .borderstyle è su "none"?
Usi Vb6 o Vb.net?

Ultima modifica effettuata da P4p3r0g4 il 12/11/2007 alle 22:16
PM Quote
Avatar
carmines92 (Normal User)
Pro


Messaggi: 83
Iscritto: 10/04/2007

Segnala al moderatore
Postato alle 6:58
Martedì, 13/11/2007
no non lo riduce in mezzo allo skermo però non mi piace il modo in cui lo riduce :(

Cmq uso vb6 e il form è a bordestyle a 0

PM Quote
Avatar
P4p3r0g4 (Member)
Guru


Messaggi: 1319
Iscritto: 29/12/2006

Segnala al moderatore
Postato alle 14:29
Martedì, 13/11/2007
Private Declare Function GetDesktopWindow Lib "user32" () As Long

ora avrai l'oggetto screen

puoi decidere la posizione del form rispetto a quello.

es:

Codice sorgente - presumibilmente Visual Basic 6

  1. Private Sub SchermoIntero()
  2. Form1.Left = 0
  3. Form1.Top = 0
  4. Form1.Width = Screen.Width
  5. Form1.Height = Screen.Height
  6. End Sub


PM Quote