PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2025 → WINDEV Tests automatiques
WINDEV Tests automatiques
Débuté par Freed, 19 juin 2025 15:25 - 3 réponses
Membre enregistré
2 messages
Posté le 19 juin 2025 - 15:25
Bonjour,

Novice sur Windev, je cherche à savoir si il est possible dans les test automatiques en utilisant la fonction PiloteSaisie de choisir un enregistrement dans une table ?

Cdt

Freed
Membre enregistré
20 messages
Posté le 19 juin 2025 - 18:03
Bonjour,
Voici le code que j'utilise pour modifier une cellule d'un champ table :

// Avec :
// chTABLE : le champ table
// nIndice : l'indice du champ table
// chColonne : le nom complet de la colonne du champ table

chTABLE est un Champ
nIndice est un entier
chColonne est un Champ

TableSelectMoins(chTABLE)
DonneFocus(chTABLE)
TableSelectPlus(chTABLE, nIndice)
ExécuteTraitement(chTABLE, trtSelection)
unPoint est un Point
unPoint.X = (chColonne[nIndice]..X + (chColonne..Largeur / 2))
unPoint.Y = (chColonne[nIndice]..Y + (chTABLE..HauteurLigne / 2))
PiloteSouris(chTABLE, psClicGauche, unPoint.X, unPoint.Y)
PiloteSouris(chTABLE, psClicGauche, unPoint.X, unPoint.Y)
DonneFocus(chColonne)
chColonne = ""
chColonne..Curseur = 1
chColonne..FinCurseur = Taille(chColonne)+10
PiloteSaisie(chColonne, sValeur)


Bien cordialement,
NN12
Membre enregistré
2 messages
Posté le 20 juin 2025 - 08:56
Bonjour, et merci de votre réponse.

Petite question, d'ou vient le sValeur ?

Bonne journée

NN12 a écrit :
Bonjour,
Voici le code que j'utilise pour modifier une cellule d'un champ table :

// Avec :
// chTABLE : le champ table
// nIndice : l'indice du champ table
// chColonne : le nom complet de la colonne du champ table

chTABLE est un Champ
nIndice est un entier
chColonne est un Champ

TableSelectMoins(chTABLE)
DonneFocus(chTABLE)
TableSelectPlus(chTABLE, nIndice)
ExécuteTraitement(chTABLE, trtSelection)
unPoint est un Point
unPoint.X = (chColonne[nIndice]..X + (chColonne..Largeur / 2))
unPoint.Y = (chColonne[nIndice]..Y + (chTABLE..HauteurLigne / 2))
PiloteSouris(chTABLE, psClicGauche, unPoint.X, unPoint.Y)
PiloteSouris(chTABLE, psClicGauche, unPoint.X, unPoint.Y)
DonneFocus(chColonne)
chColonne = ""
chColonne..Curseur = 1
chColonne..FinCurseur = Taille(chColonne)+10
PiloteSaisie(chColonne, sValeur)


Bien cordialement,
NN12
Membre enregistré
20 messages
Posté le 23 juin 2025 - 08:25
Bonjour,
C'est justement la valeur que tu souhaites saisir dans la cellule de ton champ table.
NN12
Message modifié, 23 juin 2025 - 08:25