Bekijk onderwerp - Screen bounds? :: VBiB/ACCB.net :: Visual Basic in België

VBiB/ACCB.net - Visual Basic in België | .net Ineta User Group

Hoofdmenu

Advertenties

Evenementen

Forum

Screen bounds?

VBiB/ACCB.net Forum Index » Visual Basic » VB.net 2008

Auteur

Bericht

Dummy1912

Onderwerp: Screen bounds?

Geplaatst: 26 jul 2010 - 07:35

Professional Developer

Geregistreerd op: 28-apr-2010
Berichten: 250

Status: Offline

Hallo allemaal,

Hoe gaat het met julie Very Happy

Ik zou graag willen weten of het eventueel mogelijk is om automatisch
de prog size aan te passen aan de windows screen?

dus bv als ik een scherm heb van laten we zeggen 800x600
zou mijn prog de size moeten aanpassen aan die instelling

iemand die me hiermee kan helpen.

alvast bedankt

Dummy1912

Dummy1912

Onderwerp: Re: Screen bounds?

Geplaatst: 26 jul 2010 - 07:50

Professional Developer

Geregistreerd op: 28-apr-2010
Berichten: 250

Status: Offline

Gevonden

Code:

            Dim screenHeight As Integer = My.Computer.Screen.Bounds.Height

            Dim screenWidth As Integer = My.Computer.Screen.Bounds.Width

            Me.Size = New Size(screenWidth, screenHeight)

maar mijn panels komen niet goed Sad

ik heb deze al ingesteld op top, left, right

maar het slaat verkeerd over.

ik gebruik een button zodat de 2 panels
bewegen.
de 2de panel wordt op een andere size gezet zodat de 1ste panel groter
wordt en dan weer terug normaal zie code

Visual Basic code:

If Panel3.Size = New Size(420, 601) Then
Panel3.Size = New Size(20, 601)
Panel4.Size = New Size(960, 568)
PictureBox3.Image = My.Resources.pin2_3D

Else
Panel3.Size = New Size(420, 601)
Panel4.Size = New Size(557, 568)
PictureBox3.Image = My.Resources.pin3D

End If

maar nu ik met die screen.bounds werkt werkt het niet meer naar behoren

Iemand aub die me hiermee kan helpen

Dummy1912
[/vb]

Xymtrix

Onderwerp: Re: Screen bounds?

Geplaatst: 26 jul 2010 - 14:43

Professional Developer

Geregistreerd op: 09-okt-2008
Berichten: 474
Woonplaats: Nederland
Status: Offline

Je kan natuurlijk ook je WindowState default op Maximized zetten.
Je stukje code controleer je niet de hoogte en de breedte van een panel, maar zet je die:

Visual Basic code:

If Panel3.Size = New Size(420, 601) Then ...

Als je de hoogte en de breedte wilt opvragen gebruik je het volgende:

Visual Basic code:

If Panel3.Size.Width = 420 And Panel3.Size.Height = 601 Then...

_________________
Er zijn meerdere manieren om hetzelfde doel te bereiken - Me

Dummy1912

Onderwerp: Re: Screen bounds?

Geplaatst: 26 jul 2010 - 18:04

Professional Developer

Geregistreerd op: 28-apr-2010
Berichten: 250

Status: Offline

@Xymtrix,

hallo Smile

ja zo gaat dat ook nooit aan gedacht
maar jammer genoeg werkt het ook niet
het blijft het zelfde

is nogal moeilijk uit te leggen wat het doet
maar als je op een pijltje klikt schuift de linker panel naar rechts dus wordt groter

en als je terug op dat pijltje drukt komt de rechter panel weer en wordt de linker panel weer normaal.

maar met de bounds te werken komt dit niet goed meer uit
ik heb al de width van de panel gezet op die van de bounds
maar dat is nog slechter.
ik heb het al eens op max gezet maar is het zelfde.

iemand een andere idee? om toch alles nog netje te krijgen

alvast allemaal bedankt

Dummy1912

Ga naar:

Tijden zijn in GMT + 1 uur

VBiB/ACCB.net Forum Index » Visual Basic » VB.net 2008

Postnuke - ADODB Database - PHP 4/5 - pnPhpBB2 - Hosting bij Openminds
Met dank aan Jürgen voor de jarenlange inzet van visualbasic.be (anno 21-12-2000)
vbib.be gestart op 1/03/06 (extra vanaf 1/09: vbnet.be en vbdotnet.be)
VBiB is gerelateerd met wintips.be

Nieuwsbrief RSS Feed: backend.php