PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

|
|
|
FR
Accueil → WINDEV 2024 → Commander l'ascenceur verticale de la table 2 acvec l'ascensseur de la table1
Commander l'ascenceur verticale de la table 2 acvec l'ascensseur de la table1
Débuté par daniel.rosanoff, 06 fév. 2006 10:20 - 2 réponses
#1
Posté le 06 février 2006 - 10:20
Comment faire pour pouvoir commander l ascenceur vertical de la 2ème table avec l'ascensenceur de la 1ère table.

grace à Michel Lahellec je commande les ascenseurs horizontaux mais je n'arrive pas a modifier ce code pour les verticaux.

hwndbarh est un entier
hwndbarh=AppelDLL32( "user32" , "FindWindowExA" , Handle(GrilleSource ), Null, "WDSCROLLBAR" , Null )
SI hwndbarh ALORS
SendMessage( Handle(GrilleDesti ) , _EVE.wmessage , _EVE.wparam , hwndbarh)
FIN

Le débutant.
#2
Posté le 06 février 2006 - 18:28
Bonjour,

Je m'y prends autrement, j'ai fait ce code moi-même ce n'est peut-être pas le meilleur mais regarde si ça peut te convenir :
Dans le code Ascenseur vertical (WM_VSCROLL) de la table :

numligne est entier
numligne, x, y sont des entiers
x=2 //en pixel dans la table
y=2 //en pixel dans la table
//on récupère le numéro de ligne de la première ligne visible de la table
numligne = TableInfoXYtable1, tiNumLigne,x ,y)
//on positionne les autres tables à la bonne ligne
TablePosition(table2,numligne)

Pour moi ça fonctionne. J'ai des clones que je fais défiler tous en même temps en adaptant ce code avec un boucle de 1 à nb de clones.

Cordialement,
Julie
#3
Posté le 06 février 2006 - 22:41
Formidable merci pour ta réponse

le débutant
→ Revenir à WINDEV 2024