Discussion :

[scarfunk]

Bonjour, j'aimerais savoir comment faire pour afficher des données sous forme de tableau?

Une fois que je les récupère je les affiche dans un TextBox mais je voudrais qu'elles s'affichent dans un tableau.De plus est-il possible que le tableau soit dynamique?

[methylene]

Utilise le contrôle datagridview, il est assez flexible et très utile pour afficher des données sous forme de tableau.

[scarfunk]

le souci c'est que je n'ai pas de BDD...les données que je veux afficher me sont envoyer par le serveur

[methylene]

le souci c'est que je n'ai pas de BDD...les données que je veux afficher me sont envoyer par le serveur

Tu n'as pas forcément besoin d'une BDD pour affiché des données dans une datagridview, tu peux rajouter les lignes manuellement :

Code :

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

MyDataGridView.Rows.Add()

L'option

Code :

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

MyDataGridView.DataSource =

reste une option.

Tu peux donc directement affecter la valeur de tes cellules:

Code :

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

MyDataGridView.Rows(i).Cells(j).Value =

[scarfunk]

ok merci je vais essayer

[methylene]

Bien évidement tu peux largement "bouclé" pour remplir ta datagridview.

[scarfunk]

j'ai essayé ça mais sa lui plait pas trop :S:

Code :

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

1
2
3
4
5
6
 
dim Tab() as string = split(data,SEP,,CompareMethod.text)
 
for each Element in Tab
      DataGridView1.Rows(0).Cells(0).Value = Element
Next

[methylene]

En effet, tout d'abord comment crée tu ta datagridview ? par le mode création ou par le code ?

Je pense que ton problème c'est que la colonne "0" n'existe pas chez toi.

En premier lieu, si c'est par le mode création, click droit sur ta datagridview, et ajouter des colonnes, là tu ajoute une colonne textbox.

Si c'est par le code tu fais ça :

Pour créer ta colonne

Code :

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

Friend WithEvents Version As DataGridViewTextBoxColumn

Pour paramétrer ta colonne

Code :

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

1
2
3
        Me.Version = New DataGridViewTextBoxColumn
        Me.Version.HeaderText = "Version"
        Version.Width = 50

Pour ajouter ta colonne

Code :

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

.Columns.AddRange(Me.Version)

Enfin bon c'est plus simple en mode création si tu débute en VB.

Ensuite le soucis c'est que tu lui attribue (0) et (0), donc tu en définit que la cellule en haut à gauche

Code :

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

1
2
3
4
5
6
7
8
9
10
11
dim Tab() as string = split(data,SEP,,CompareMethod.text)
 
i = 0
 
for each Element in Tab
 
      DataGridView1.Rows.Add()
      DataGridView1.Rows(i).Cells(0).Value = Element
      i = i + 1
 
Next

Je pense que ceci devrait marcher.

[scarfunk]

Merci ça marche seulement un petit soucis subsiste.
Certaine des données que je reçcois change régulièrement et par conséquent le serveur m'envoie régulièrement (toutes les 5seondes par ex) ces données...
Et donc le tableau n'arrête pas de créer des lignes

[scarfunk]

Voilà une démonstration en direct qui devrait t'éclaircir sur mon problème:

http://samirlaabira.fr/stagee/tab.avi

[methylene]

Hum, dis moi comment tu déclenche le remplissage de ton tableau ? via un bouton, ou sur l'évènement de ta radiobutton je suppose ?

Le problème en fait est qu'il serait plus simple de remplir une bonne fois pour toute ta table,

Code :

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

dim Tab() as string = split(data,SEP,,CompareMethod.text)

Ou sinon tu peux essayer ça :

Code :

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

            .AllowUserToAddRows = False

Cette ligne de code est censé t'empecher de pouvoir rajouter des lignes.

Ton serveur est censé continuer de t'envoyer des infos, mais c'est à toi de décider quand tu dois les afficher ou pas.

PS : ce serait plus simple de voir ton code pour être honnête.

[scarfunk]

La table se remplit dès que je clique sur mon bouton.
J'explique. j'ai une fonction qui formate les données (les met dans le tableau) qui sert uniquement à séparer mes infos.Ces infos me sont envoyées par le serveur sous forme de chaine de caractères avec un séparateur entre chaque mot.

J'ai aussi créé une fonction recevoir qui permet de récupérer les données envoyé par le serveur.Dans celle-ci j'appelle MiseEnForme qui les met dans mon tableau...Je sais pas si tu a compris le principe

Voila le code de la fonction MiseEnForme:

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
 
sub MiseEnForme(ByVal data As String)
 
        Dim Tab() As String = Split(data, SEP, , CompareMethod.Text)
        Dim i As Integer = 0
 
        'on affiche les données dans le tableau les données dans le tableau
        For Each Element In Tab
            DataGridView1.Rows(i).Cells(0).Value = i
            DataGridView1.Rows.Add()
            DataGridView1.Rows(i).Cells(1).Value = Element
            i = i + 1
        Next
 
End Sub

ET la ma fonction de réception:

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
 
 
Function recevoir() As String
 
        Dim returnData As String = Nothing
        Dim inStream(10024) As Byte
        Dim serverStream As NetworkStream
 
        If clientSocket.Connected Then
            Try
                serverStream = clientSocket.GetStream()
                'Lecture des données dans le flux
                serverStream.Read(inStream, 0,
CInt(clientSocket.ReceiveBufferSize))
                returnData = System.Text.Encoding.ASCII.GetString(inStream)
 
                Dim len As Integer = returnData.IndexOf("$")
 
                If len < 0 Then
                    len = 0
                End If
 
                MiseEnForme(returnData)
 
                returnData = returnData.Substring(0, len)
            Catch ex As Exception
                msg(Donnees.ERR_REC)
            End Try
        End If
        Return returnData
 
    End Function

[methylene]

En fait je comprend pas trop la finalité de ce que tu veux faire ...

As-tu essayé ce que je t'ai conseillé.

Code :

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

  .AllowUserToAddRows = False

Même si je pense que c'est ton server qui toutes les 5 secondes relance ton sub MiseenForme et donc forcément rajoute des lignes.

[scarfunk]

J'ai fais du mieux que j'ai pu pour que tu puisse comprendre ...
J'ai aussi essayer ce que tu m'a dit mais ça me met une erreur.

Il n'y a pas possibilité de le contourné?ou de lui empêcher de créer des lignes (autre que ta solution)

[methylene]

Bien sur qu'il y a une solution, mais vu que je ne comprend pas vraiment ce que tu veux faire, je ne peux pas vraiment t'aider.

En gros,

Ce que je te conseillerais de faire, c'est récupérer et trier tes infos provenant de ton serveur, esuite tu les met dans une table.

Ensuite tu viens ajouter ces données dans ta datagrid. Et non tout dans le même sub. Tu as un flux infini, qui ajoute donc un nombre de ligne à l'infini.

Ton souci c'est que tu ajoutes tes données dans la datagrid dans ton sub qui récupère les données, donc ta Tab() continue d'augmenter, et par conséquent la datagrid, il faut que tu définisse un "point d'arrêt" de récupération des données, que tu puisse redéclencher, c'est comme ça que ej vois le truc d'après ce que j'ai pu comprendre.

Ou encore, tu peux regarder si la ligne dans Tab() ne t'intéresse pas tu ne l'affiche pas dans ta datagrid (par exemple en la filtrant si elle ne contient pas de string).

[methylene]

L'autre solution serait de connaître le nombre d eligne que tu veux afficher dans ta datagrid, et à ce moment là il serait fixé.

[scarfunk]

Voila justement mon autre problème c'est que je ne sais pas comment ni où stocker mes données...
J'en ai parler dans un autre sujet:
http://www.developpez.net/forums/d91...ckage-donnees/