Discussion :

[Barghis]

Bonjour,
Sous VB NET 2010 express, je lance une fenêtre secondaire (de taille plus réduite) à partir de la fenêtre principale.
J'ai une commande sur Timer qui me réinitialise l'affichage de la fenêtre principale et surtout qui repositionne le focus sur une zone de saisie spécifique de cette fenêtre principale.

Code :

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

1
2
    'Positionnement du curseur sur l'emplacement code à barres  
    txtIndex.Focus()

Cette commande de repositionnement du focus entraine la disparition en arrières plan de la fenêtre secondaire.
Savez vous comment repositionnez le focus sur un élément d'une fenêtre (ici la principale) sans provoquer cette disparition.
Je souhaite juste quand je retourne sur la fenêtre principale que le focus soit automatiquement positionné sur l'élément désiré.

J'espère avoir été assez clair.

Merci d'avance

[baloub]

Bonjour,

Tu peux essayer de mettre l'attribut topmost de la fenêtre secondaire à true.
Comme ça elle ne sera plus recouverte par la fenêtre principale (sauf si celle ci a aussi cet attribut à true)

[Barghis]

Merci de ton intérêt Baloub,
mais ce n'est as exactement mon besoin. Je ne souhaite pas que la fenêtre ne soit pas recouverte mais que lorsque je suis sur la form principale que celle ci ait un élément qui prenne automatiquement le focus.

En cherchant mieux j'ai trouvé ce qu'il me faut, en l'absence d'une info qui donne l'état activée ou non d'une form, l'utilisation des événements Activate et Deactivate de la form qui me permettent de gérer une variable qui suit l'état de la form.

Ci dessous mon programme de test (le changement de couleur de TextBox2 me permet de vérifier que les modifications s'éxécutent bien sur form1 alors que c'est form2 qui est active)

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
Public Class Form1
 
    Dim Form1_activée As Boolean
 
 
    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
 
        If TextBox2.BackColor = Color.Aqua Then TextBox2.BackColor = Color.Red Else TextBox2.BackColor = Color.Aqua
 
        If Form1_activée Then
            TextBox1.Focus()
        End If
 
    End Sub
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        If Form2.Created Then
            Form2.BringToFront()
        Else
            Form2.Show()
        End If
 
    End Sub
 
    Private Sub Form1_Activated(sender As Object, e As System.EventArgs) Handles Me.Activated
        TextBox1.Focus()
        Form1_activée = True
    End Sub
 
    Private Sub Form1_Deactivate(sender As Object, e As System.EventArgs) Handles Me.Deactivate
        Form1_activée = False
    End Sub
 
End Class