20/04/2024 		Windev et les Api WindowsNb de visiteurs en ligne : 1
>> Introduction << >> Codes et Forum << >> Download <<

Rubrique : 3 - Champs       Sujet : Edit (textes)
Auteur Message
 °¨¨ JL ¨¨° Posté le : 23/06/2000 12:00:00

// Déterminer la première ligne visible *******
em_getfirstvisibleline est un entier long = 0xCE
nb est un entier long=sendmessage(handle("saisie1"), em_getfirstvisibleline , 0 , 0 )
info(nb)



// Déterminer le nombre de lignes *******
em_getlinecount est un entier long = 0xBA
nb est un entier long = sendmessage(handle("saisie1"), em_getlinecount , 0 , 0 )
info("Ce champ a "nb+" ligne(s)")



// Déterminer quel est le caractère affiché pour un champ password *******
em_getpasswordchar est un entier long = 0xD2
car est un entier = sendmessage(handle("saisie1"), em_getpasswordchar , 1 , 0 )
info(car+" "+caract(car))



// Modifier le caractère password **********
em_setpasswordchar est un entier long = 0xCC

// on remplace le * par X
sendmessage(handle("saisie1"), em_setpasswordchar , asc("X") , 0 )



// Enlever le style password *******
sendmessage(handle("saisie1"), em_setpasswordchar , 0 , 0 )



// Faire défiler le champ ********
em_scroll est un entier long = 0xB5

// les différentes possibilités
sb_lineup est un entier = 0
sb_linedown est un entier = 1
sb_pageup est un entier = 2
sb_pagedown est un entier = 3

sendmessage(handle("saisie1"), em_scroll , sb_linedown , 0 )



// Mettre le champ en lecture seule ********
em_setreadonly = 0xCF
sendmessage(handle("saisie1"), em_setreadonly , 1 , 0 )
// ou saisie possible
sendmessage(handle("saisie1"), em_setreadonly , 0 , 0 )



// Modifier la position des tabulations ********
em_settabstops est un entier long= 0xCB
tabstop est un entier long=3 // nb de tabulations
stoptab est un tableau de 3 entiers long
stoptab[1]=50
stoptab[2]=80
stoptab[3]=100
sendmessage(handle("saisie1"), em_settabstops , tabstop , &stoptab )



// Modifier la sélection *********
em_setsel est un entier long= 0xB1

// sélection du caractère 5 à 50
sendmessage(handle("saisie1"), em_setsel , 5 , 20 )

// ou sélection du champ en entier
sendmessage(handle("saisie1"), em_setsel , 0 , -1 )



// Récupérer le nombre de cartères maxi *******
em_getlimittext est un entier long = 0xD5
nb est un entier long=sendmessage(handle("saisie1"), em_getlimittext , 0 , 0 )
Info("La limite est de : "+nb)



// Modifier le nombre de caractères maxi *******
em_setlimittext est un entier long = 0xC5

// limite à 15 caractères
sendmessage(handle("saisie1"), em_setlimittext , 15 , 0 )



// Modifier le style *********
gw_style est un entier long=-16
gw_exstyle est un entier long=-20
es_uppercase est un entier long = 0X8 // saisie uniquement en majuscules
es_lowercase est un entier long = 0X10 // minuscules
es_number est un entier long = 0x2000 // que des chiffres

appeldll32("user32","GetWindowLongA", handle("saisie1") , gw_style )

sty est un entier long=oubinaire(res,ES_UPPERCASE) // pour les majuscules

appeldll32("user32","SetWindowLongA", handle("saisie1") , gw_style , sty )



// Récupérer les caractères sélectionnés *********
em_getsel est un entier long= 0xB0
sel est un entier long=sendmessage(handle("saisie1"), em_getsel , 0 , 0 )
info("La sélection va du caractère "+poidsfaible(sel)+" à "+poidsfort(sel))



// Récupérer les marges ***********
em_getmargins est un entier long= 0xD4
marge est un entier long=sendmessage(handle("saisie1"), em_getmargins , 0 , 0 )
info("La marge gauche est de "+poidsfaible(nb)+", celle de droite "+poidsfort(nb))



// Modifier les marges *************
em_setmargins est un entier long = 0xD3
mar est un entier long
mg, md sont des entiers
mg=100 // nouvelle marge gauche
md=20 // nouvelle marge droite

transfert(&mar,&mg,2)
transfert(&mar+2,&md,2)

sendmessage(handle("saisie1"), em_setmargins , 0x3 , mar )