bonjour a tous
j'ai posé la question comment changer la couleur du texte des label il y a quelques jours
bbil m'avais répondu
je voudrais faire la même chose avec les inptut type texte dans mon hta
quelqu'un a une idée??
au plaisir
bonjour a tous
j'ai posé la question comment changer la couleur du texte des label il y a quelques jours
bbil m'avais répondu
je voudrais faire la même chose avec les inptut type texte dans mon hta
quelqu'un a une idée??
au plaisir
Tu veux dire quelque chose comme ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part <input type="text" style="background-color:#ffb7d6" size="16" name="txt" value="Entrer votre Texte ici">
et tu as essayé d'utiliser le même code en remplaçant ton label par un input type texte ??
Code html : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27 <head> <TITLE>couleur ..</TITLE> <HTA:APPLICATION ID="Monhta" APPLICATIONNAME="Couleur LABEL HTA" SCROLL="no" SINGLEINSTANCE="yes" > </head> <script language="VBScript"> Sub ChangeCouleur (str) MonLabel.style.color = str MonInput.style.color = str end sub </script> <BODY> <LABEL id="MonLabel">MonTexte</LABEL> </BR> </BR> <input type="text" value="MonTexte" id="MonInput" /> <input type="button" value="ROUGE" onClick='ChangeCouleur "red"'/> <input type="button" value="VERT" onClick='ChangeCouleur "green"'/> <input type="button" value="BLEU" onClick='ChangeCouleur "BLUE"'/> <input type="button" value="JAUNE" onClick='ChangeCouleur "yellow"'/> <input type="button" value="NOIR" onClick='ChangeCouleur "black"'/> </body>
bonjour hackoofr et bbil
pour hackoofr
non ca n'est pas, ca ca je sais faire dailleur moi je le declare dans un css "class"
ce que je veux moi c'est dynamiquement dans une sub en vbs
pour bbil:
oui bill j'ai bien essayer la meme que tu m'avais donné en changeant le nom du control mais ca ne fonctionne pas avec les textbox
puré de puré de zut
autant pour moi
j'avais donné le meme nom au div et a l'ID
mille excuses ca fonctionne
si ca te derange pas dis moi si la fonction se declare comme ca
merci pour le coup de main
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 for i = 1 to 10 with document .all("Texto"&i).style.color="red"'pour changer la couleur 'ca marche .all("Texto"&i).style.font="arial" 'ca marche pas .all("Texto"&i).style.font.size=15 'ca marche pas next
au plaisir
Il manque le end with, et les propriété du style sont à changer:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 For i = 0 to 2 with document .all("Texto" & i).style.color="red" .all("Texto" & i).style.fontfamily ="arial" .all("Texto" & i).style.fontSize=15 end with next
bonjour bbil
ca fonctionne parfaitement bien
sans trop abuser je supose que pour ecrire en gras ,italic,souligné
par deduction ca serai:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 with document .all("Texto" & i).style.fontweith='bold" .all("Texto" & i).style.font="italic" .all("Texto" & i).style.font ="underline" end with
mais je crois que ca marche pas
merci pour le coup de main
au plaisir
On est un peu loin du VBScript... mais bon :
Jette un petit coup d'oeil ici : http://cyberzoide.developpez.com/html/style.php3
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 (...) .all("Texto" & i).style.fontStyle = "italic" .all("Texto" & i).textdecoration = "underline" (...)
par exemple ... en supprimant les "-"
bonjour bbil
merci pour le coup de main
et oui j'avais deja vu que pour gerrer les font il fallait enlever le trait d'union
j'essai ca dessuite
au plaisir
bonjour bbil
ca ne fonctionne pas pour le text decoration
je ne sais pas pourquoi???
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 sub souligner() if souligne.value="souligné" then for i = 1 to 5 document.all("Texto" & i).textdecoration = "underline" next souligne.value="pas souligné" else for i= 1 to 5 document.all("Texto" & i).textdecoration = "none" next souligne.value="souligné" end if end sub
une idée
au plaisir
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager