Discussion :

[benjaminblazer]

Bonjour,

Dans l'objectif d'adapter la taille de l'application aux choix de l'utilisateur, j'ai créé des boutons radios pour diverses dimensions
Lors du clic sur le bouton "appliquer" , la taille de la fenêtre change mais celle de la TabPage (tp_propos en gris ) reste la même
J'ai essayé de changer les propriétés Width, Height ou Size mais rien ne change...

Si vous avez une idée je suis preneur ! Merci d'avance !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
Private Sub Button40_Click(sender As System.Object, e As System.EventArgs) Handles Button40.Click
 
 
 
        '1333; 893
        '1343; 950
        If (RadioButton2.Checked And My.Computer.Screen.WorkingArea.Width >= 1920 And My.Computer.Screen.WorkingArea.Height >= 1080) Then
            Me.Width = 1920
            'tp_propos.Width = 1920 - 10
            Me.Height = 1080
            ' tp_propos.Height = 1080 - 57
        End If
        If (RadioButton3.Checked And My.Computer.Screen.WorkingArea.Width >= 1366 And My.Computer.Screen.WorkingArea.Height >= 768) Then
            Me.Width = 1366
            ' tp_propos.Width = 1366 - 10
            Me.Height = 768
            ' tp_propos.Height = 768 - 57
        End If
        If (RadioButton4.Checked And My.Computer.Screen.WorkingArea.Width >= 1280 And My.Computer.Screen.WorkingArea.Height >= 1024) Then
            Me.Width = 1280
            ' tp_propos.Width = 1280 - 10
            Me.Height = 1024
            tp_propos.Size = New Size(90, 50)
        End If
        If (RadioButton1.Checked And My.Computer.Screen.WorkingArea.Width >= 1024 And My.Computer.Screen.WorkingArea.Height >= 768) Then
            Me.Width = 1024
            ' tp_propos.Width = 1024 - 10
            Me.Height = 768
            'tp_propos.Height = 768 - 57
            'tp_propos.SizeMode
        End If
 
    End Sub

[wallace1]

Bonsoir,

Le tabpage étant un contrôle enfant du tabcontrol, tu dois modifier la taille de ce dernier, tu ne pourras modifier la taille du tabpage sans cela.

Il ne faut pas oublier de paramétrer la propriété Dock à ton contrôle groupbox et tabcontrol de manière à ce que lorsque tu modifies la taille de ta form cela affecte directement la taille des contrôle Groupbox et tabcontrol.

Je rajoute également que ta conditionnel pour modifier la taille de ta form selon le radioButton qui possède la propriété Checked = True est erronée.
Il faut procéder ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
   If (RadioButton1.Checked And My.Computer.Screen.WorkingArea.Width >= 1024 And My.Computer.Screen.WorkingArea.Height >= 768) Then
            Me.Width = 1024
            Me.Height = 768
        ElseIf (RadioButton2.Checked And My.Computer.Screen.WorkingArea.Width >= 1920 And My.Computer.Screen.WorkingArea.Height >= 1080) Then
            Me.Width = 1920
            Me.Height = 1080
        ElseIf (RadioButton3.Checked And My.Computer.Screen.WorkingArea.Width >= 1366 And My.Computer.Screen.WorkingArea.Height >= 768) Then
            Me.Width = 1366
            Me.Height = 768
        End If

En espérant avoir correctement saisi ta problématique.

A+

[Buzzak]

Avec la propriété Dock et du padding tu peux reproduire l'équivalent.

Quand tu changera la taille de ta form l’intérieur qui a dock fill va suivre les proportions.

De plus, tu n'aurais pas à rajouter de code

[casiii]

Je rajoute également que ta conditionnel pour modifier la taille de ta form selon le radioButton qui possède la propriété Checked = True est erronée.

Nope Pas optimisé certes, mais pas faux non plus.

[benjaminblazer]

Merci, ça marche !