tmcuh
Messages postés458Date d'inscriptiondimanche 22 décembre 2002StatutMembreDernière intervention18 avril 2009 14 sept. 2004 à 20:04
voilà c'est résolut... encore des trucs?? lol
tmcuh
Messages postés458Date d'inscriptiondimanche 22 décembre 2002StatutMembreDernière intervention18 avril 2009 14 sept. 2004 à 19:57
bien vu, j'avais pas pensé à cà... sinon ben je vois pas pq cà marche pas à tout les coups :s... et en quoi cà foire?
Amicalement tmcuh
KaViDee
Messages postés262Date d'inscriptiondimanche 1 septembre 2002StatutMembreDernière intervention18 juin 2008 14 sept. 2004 à 19:54
ça ne marche pas a tous les coups :(
ça marche une fois apré ça foire
sinon change moi ça
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Text1.Text = UCase(Text1.Text) 'convertie le tout en majuscule
Text1.SelStart = Len(Text1) 'remet le pointeur à la fin
End Sub
par
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
ça fé + zoli kan on tape on voit pas le caractère en minuscule
tmcuh
Messages postés458Date d'inscriptiondimanche 22 décembre 2002StatutMembreDernière intervention18 avril 2009 14 sept. 2004 à 14:44
humm idée interressante je vais y pencher ;)
tmcuh
Messages postés458Date d'inscriptiondimanche 22 décembre 2002StatutMembreDernière intervention18 avril 2009 14 sept. 2004 à 14:40
il suffit de changer le rgb (dans la fonction imagefond)...le mettre à 130 peut etre... c vrai qu'il serait ptet interressant de mettre un curseur pour le niveau de lisibilité ;)...
Amicalement tmcuh
cs_EBArtSoft
Messages postés4525Date d'inscriptiondimanche 29 septembre 2002StatutModérateurDernière intervention22 avril 20199 14 sept. 2004 à 14:38
ah oui j'oublais un truc..
ne laisse pas la couleur du texte unie car il suffit de faire un filtre de couleur pour faire ressortir que le texte
apres avec un peu de pratique on retrouve la chaine
@+
cs_EBArtSoft
Messages postés4525Date d'inscriptiondimanche 29 septembre 2002StatutModérateurDernière intervention22 avril 20199 14 sept. 2004 à 14:35
Lol le probleme c'est que même un humain ne pourrais pas le decrypter... Non franchement ajoute juste un petit peu de contraste.
14 sept. 2004 à 20:04
14 sept. 2004 à 19:57
Amicalement tmcuh
14 sept. 2004 à 19:54
ça marche une fois apré ça foire
sinon change moi ça
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Text1.Text = UCase(Text1.Text) 'convertie le tout en majuscule
Text1.SelStart = Len(Text1) 'remet le pointeur à la fin
End Sub
par
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
ça fé + zoli kan on tape on voit pas le caractère en minuscule
14 sept. 2004 à 14:44
14 sept. 2004 à 14:40
Amicalement tmcuh
14 sept. 2004 à 14:38
ne laisse pas la couleur du texte unie car il suffit de faire un filtre de couleur pour faire ressortir que le texte
apres avec un peu de pratique on retrouve la chaine
@+
14 sept. 2004 à 14:35
Sinon le programme en lui même est bien :)
@+