PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV (versiones precedentes) → Gerer l'ascenseur d'une fenetre
Gerer l'ascenseur d'une fenetre
Iniciado por Pegos, 24,jul. 2003 16:38 - 1 respuesta
Publicado el 24,julio 2003 - 16:38
Bonjour à tous,

Comment gérer par programme l'ascenseur d'une fenetre ?


Merci d'avance

Pegos
Publicado el 18,marzo 2004 - 11:38
"Pegos" <pepbob@club-internet.fr> wrote:
Bonjour à tous,

Comment gérer par programme l'ascenseur d'une fenetre ?


Merci d'avance

Pegos





////////////////////////////////////////////////////////////
dimFen est un entier //Maximum de la scroll bar
HV est un entier //Contient un paramètre permettant de savoir si c'est
une barre verticle ou horizontale
pos est un entier //Position en cours de la scroll bar
dep est un entier //Déplacement de la scroll bar
nomFen est un entier //Contient le nom de la fenêtre

//Initialisation des variables
nomFen = "MaFenetre"
dimFen = 306
dep = 70
HV = "SB_HORZ" //ou "SB_VERT" pour une barre verticale

pos = AppelDLL32( "user32" , "GetScrollPos" , Handle(nomFen), HV)
SI pos < dimFen ALORS
SI pos+dep > dimFen ALORS
dep = dimFen - pos
FIN
AppelDLL32( "user32" , "SetScrollPos" , Handle(nomFen), HV, (pos+dep), True)
AppelDLL32( "user32" , "ScrollWindow" , Handle(nomFen), -dep, 0, Null, Null)
FIN