PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Cloner des colonne
Cloner des colonne
Débuté par alamiSav, 17 juin 2017 13:32 - 5 réponses
Posté le 17 juin 2017 - 13:32
Bonjour

Je suis débutant dans le windev , je n'ai pas assez des astuces et une expérience approfondie pour trouver la solution de mon problème..

Je voulais tracer un autocar et numéroter les places de 1 à 53 places comme indiquer dans l'image




Alors j'ai prix une table avec une colonne, puis j'ai cloné 4 colonnes ,mais j'ai un problème au niveau des lignes

volia mon code
POUR i = 1 A 4
nColonne = i+1
ChampClone(TABLE.Colonne1,"Colonne"+nColonne)
{"Colonne"+nColonne,indChamp}..Largeur = Colonne1..Largeur

FIN

POUR i = 1 _A_ PLaces
// on numérote les lignes
TableAjouteLigne(TABLE,i)
FIN


Merci d'avance de me corriger mon code ou de me donner une solution
Membre enregistré
188 messages
Popularité : +7 (7 votes)
Posté le 19 juin 2017 - 18:43
Bonjour,
Pourquoi 4 colonnes ?
Dans ton image, il y a bien plus de colonnes !!!

Ouais, pas évident ton problème.

Bonne chance

--
Corinne Bonhomme
Montréal, Canada
Membre enregistré
2 572 messages
Popularité : +222 (260 votes)
Posté le 20 juin 2017 - 06:19
Bonjour,

Quel est le problème exactement ???

--
Cordialement,

Philippe SAINT-BERTIN
Géode Informatique
Posté le 22 juin 2017 - 10:59
Bonjour

Désolé pour le retard et merci de vos réponse

Mon problème comment je dessine un autocar comme dans l'image, quelle champ à utiliser pour le tracé?

Merci encore une fois
Membre enregistré
2 572 messages
Popularité : +222 (260 votes)
Posté le 22 juin 2017 - 14:17
Bonjour,

Voilà quelque chose qui fonctionne, je te laisse analyser le code
POUR i = 1 A 13
ChampClone(COL_Template,"COL_Rangee"+i)
{"COL_Rangee"+i,indChamp}..Visible = Vrai
FIN

POUR i = 1 A 5
TableAjouteLigne(TABLE_Bus)
FIN

i est un entier
nNumColonne est un entier = 1
POUR nNumColonne = 1 A 13
POUR nNumLigne = 5 A 1 PAS -1
SI nNumLigne = 3 ALORS
SI nNumColonne = 13 ALORS
i++
{"TABLE_Bus.COL_Rangee"+nNumColonne,indChamp}[nNumLigne] = i
{"TABLE_Bus.COL_Rangee"+nNumColonne,indChamp}[nNumLigne]..CouleurFond = VertPastel
SINON
{"TABLE_Bus.COL_Rangee"+nNumColonne,indChamp}[nNumLigne]..CouleurFond = Blanc
FIN
SINON
i++
{"TABLE_Bus.COL_Rangee"+nNumColonne,indChamp}[nNumLigne] = i
{"TABLE_Bus.COL_Rangee"+nNumColonne,indChamp}[nNumLigne]..CouleurFond = VertPastel
FIN
FIN
FIN


--
Cordialement,

Philippe SAINT-BERTIN
Géode Informatique
Posté le 22 juin 2017 - 16:21
Bonjour

Merci Philippe pour votre retour je vais tester votre code

cordialement