Gambas France BETA


Pas de compte ? Incription

importation de fichier TXT dans un tableau puis effectuer des Tris

123456
AuteurMessages
manu#16 Posté le 3/8/2010 à 09:25:00
Avec Gambas ca roule !Bien sure que l'on peu faire ca en Gambas mais je te renvois a un Topic de ce forum qui traite déjà de ce sujet : http://gambaslinux.forumactif.net/code-gambas-f1/resolu-pour-l-auteurvariables-globales-t72.htm?highlight=variables+globales.


Merci de penser a faire une recherche dans le forum avant de poster.... :)


Comme tu le comprendra, tu va pouvoir decouvrir l'interet des Modules ....
Jeanne d'arc, elle a frit, elle a tout compris ! ;)

Config :
Manjaro linux (excellent !)
XFCE 4.1 (simple et efficace)
Gambas 3 dans les dépots (confort total)
defcom#17 Posté le 3/8/2010 à 11:00:00
merci pour le lien manu

j'ai crée ma procédure avec mes variables global nickel

je cherche le moyen de lire des fichiers dans des répertoires donnée dans le forum.
Prokopy#18 Posté le 3/8/2010 à 11:18:00
Kinder PinguiPour trouver ton fichier ce doit être quelque chose comme :

1
fichier = OPEN "laOuEstToutLeMonde" &/ (Tour & Etage & PRINTPRINT) &/ (Tour & Etage & PRINTPRINT & "_" & Format$(Now, "ddmmyyyy_hhnn")) FOR INPUT


Il y a juste dans ton exemple où je n'ai pas compris tout à fait d'où venait le 14 dans TB1014, donc j'ai remplacé par des points d'interrogation dans le code.

J'ai vu quelque part que tu souhaitais faire un megatutoriel pour Gambas. Ou en est tu dans ce projet ?


Ben en fait je l'ai envoyé en validation vers début mars (seulement les premières parties qui traitent des bases). Seulement comme il n'y a pas de validateur "Gambas" à proprement parler, ils essaient de se dépatouiller. :lol:
Mais d'après les dernières discussions qu'on a eu ça devrait être pour bientôt. ;)
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
defcom#19 Posté le 3/8/2010 à 11:56:00
je vais tester ça

le 14 correspond à un étage, ça va du 10eme étage au 14eme étage.
manu#20 Posté le 3/8/2010 à 11:58:00
Avec Gambas ca roule !Huummm, la petite équipe de Gambas est déjà très occupée....Mais bon, j’espère que l'on verra ça bientôt :)
Jeanne d'arc, elle a frit, elle a tout compris ! ;)

Config :
Manjaro linux (excellent !)
XFCE 4.1 (simple et efficace)
Gambas 3 dans les dépots (confort total)
defcom#21 Posté le 3/8/2010 à 17:50:00
j'ai une autre question

j'ai 3 label qui sont
label1
label2
label3

et trois température dans un tableau
température[1]
température[2]
température[3]

je souhaite remplir les label avec les températures.

j'ai essaye ça mais cela ne marche pas

1
FOR i = 1 TO temperatures.MaxLabel("Label" & i).Caption = temperatures[i]NEXT

Prokopy#22 Posté le 3/8/2010 à 18:00:00
Kinder PinguiEuh … peut-être :

1
Label1.Caption = temperatures[0]Label2.Caption = temperatures[1]Label3.Caption = temperatures[2]


:P :P :P :P
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
defcom#23 Posté le 3/8/2010 à 18:36:00
oui, mais le problème c'est que je doit répéter l'opération au moins 90 fois.

Prokopy#24 Posté le 3/8/2010 à 18:40:00
Kinder PinguiLa solution ce serait peut-être de mettre tous tes labels dans un même container (si ce n'est déjà fait), et ensuite de faire :

1
DIM enfant AS ControlDim i AS INTEGER = 0FOR EACH enfant IN Conteneur.Children enfant.Caption = temperatures[i] INC iNext
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
defcom#25 Posté le 3/8/2010 à 20:07:00
c'est quoi le container, comment on fait.

Prokopy#26 Posté le 3/8/2010 à 20:45:00
Kinder PinguiUn container (http://gambasdoc.org/help/comp/gb.qt4/container?fr&v3) c'est un contrôle qui peut en contenir d'autres, dans le genre de ça : http://gambasdoc.org/help/comp/gb.qt4/vbox?fr&v3 ou ça : http://gambasdoc.org/help/comp/gb.qt4/hbox?fr&v3

RTFM.
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
defcom#27 Posté le 3/8/2010 à 21:09:00
j'ai trouvé les container j'utilise panel

mais je comprend pas la procédure que tu as écrit

Code:
Dim enfant As Control
Dim i As Integer = 0

For Each enfant In Conteneur.Children
enfant.Caption = temperatures
Inc i
Next


je vois pas ou sont les label dans le code.

Prokopy#28 Posté le 4/8/2010 à 08:54:00
Kinder PinguiEn fait les labels sont des enfants du panel, ils sont donc tous contenus dans le tableau de contrôle Panel.Children. ;)
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
defcom#29 Posté le 4/8/2010 à 09:02:00
merci pour l'explication mais quand je lance le projet j'ai une erreur sur la première ligne de ton code .


UNEXPECTED DIM sur la ligne DIM enfant AS Control
Prokopy#30 Posté le 4/8/2010 à 11:13:00
Kinder PinguiLes déclarations doivent se faire au début de la fonction. Donc il faut que les DIM soient tout en haut de ta fonction. ;)
La théorie, c'est quand on sait tout et que rien ne fonctionne.
La pratique, c'est quand ça marche mais qu'on ne sait pas pourquoi.
Quand la théorie rejoint la pratique, rien ne fonctionne et on ne sait pas pourquoi.
123456