PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV (versões anteriores) → Gerer l'ascenseur d'une fenetre
Gerer l'ascenseur d'une fenetre
Iniciado por Pegos, jul., 24 2003 4:38 PM - 1 resposta
Publicado em julho, 24 2003 - 4:38 PM
Bonjour à tous,

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


Merci d'avance

Pegos
Publicado em março, 18 2004 - 11:38 AM
"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