PC SOFT

FOROS PROFESIONALES
WINDEV, WEBDEV y WINDEV Mobile

Inicio | Mensajes recientes | Conéctese... |  | Español FR
Inicio → WINDEV 2024 → Focus table type excel
Focus table type excel
Iniciado por NoName, 18,oct. 2017 08:56 - 2 respuestas
#1
Miembro registrado
68 mensajes
Popularité : +2 (2 votes)
Publicado el 18,octubre 2017 - 08:56
Bonjour,

j'essaie de mettre en place un focus sur les cellules d'une table de type excel.

C'est a dire que la cellule qui le focus, j'aimerai qu'elle ai un cadre d'une certaine couleur pour bien voir ou on est placé.

J'aimerai que cela marche autant par le clic d'une souris, que par la navigation par tabulation. Et que le cadre soit visible en sélection ou en édition, en fait dans tous les cas sur la cellule qui a le focus.

Jusqu'ici le fonctionnement est complètement aléatoire. J'ai été pour chaque colonne obligé de passer le nom de celle-ci car impossible de le trouver systématiquement.

J'aimerai si possible une procédure ou je n'ai que le nom de la table a passer.

Pour le moment je passe ma procédure a tout les événements "Entrée dans la colonne" comme suit :

ContourCellule("TABLE_atelierint","COL_typh")


et voici ce qu'elle contient :

Procedure ContourCellule(sNomTable est une chaîne,sNomColonne est une chaîne)

Trace("ici")
nIndiceLigne est un entier = IndiceEnCours()//TableSelect({sNomTable,indChamp})
nIndiceColonne est un entier = TableIndiceColonne({sNomTable,indChamp},sNomColonne,ticCréation)

nLigneOccurence est un entier = TableOccurrence({sNomTable,indChamp})
nColonneOccurence est un entier = TableOccurrence({sNomTable,indChamp},toColonne)

unCadre est un Cadre


SI nLigneOccurence = 0 ALORS
RETOUR
FIN

POUR nLig = 1 A nLigneOccurence
POUR nCol = 1 A nColonneOccurence
unCadre..TraitBas.Couleur = CouleurDéfaut
unCadre..TraitHaut.Couleur = CouleurDéfaut
unCadre..TraitGauche.Couleur = CouleurDéfaut
unCadre..TraitDroite.Couleur = CouleurDéfaut
unCadre..Epaisseur = 0
{sNomTable,indChamp}[nLig][nCol]..Cadre = unCadre
FIN
FIN

unCadre..TraitBas.Couleur = gCouleurBleuFonce
unCadre..TraitHaut.Couleur = gCouleurBleuFonce
unCadre..TraitGauche.Couleur = gCouleurBleuFonce
unCadre..TraitDroite.Couleur = gCouleurBleuFonce
unCadre..Epaisseur = 2

Trace("nligne : " + nIndiceLigne)
Trace("nCol :" + nIndiceColonne)

{sNomTable,indChamp}[nIndiceLigne][nIndiceColonne]..Cadre = unCadre
#2
Miembro registrado
68 mensajes
Popularité : +2 (2 votes)
Publicado el 18,octubre 2017 - 09:06
J'ai l'impression qu'en fait on ne peut pas voir le cadre d'une cellule lorsque l'on est en édition sur celle-ci
#3
Miembro registrado
68 mensajes
Popularité : +2 (2 votes)
Publicado el 19,octubre 2017 - 09:14
Après recherche je vois que le sujet a été posé plusieurs fois mais sans réponse.

On peut donc difficilement mettre en forme une table windev comme dans Excel. Dommage

Je n'arrive pas a faire apparaître le cadre quand je navigue de colonne en colonne via la tabulation. Je précise que la table est en saisie et on rentre donc en édition a chaque tabulation
→ Volver a WINDEV 2024