bon alors ça je connais !
supposons ke ta RichTextBox s'appelle LeText tu fais :
If LeText.SelText = "" Then
LeText.SelText = "<B></B>"
LeText.SelStart = LeText.SelStart - 4
Else
Dim LastSelStart As Long
Dim LastText as String
LastText = LeText.SelText
LeText.SelText = "<B></B>"
LastSelStart = LeText.SelStart - 4
LeText.SelStart = LastSelStart
LeText.SelText = LastText
LeText.SelStart = LastSelStart
LeText.SelLength = Len(LastText)
LastText = ""
End If
avec ce code, ta balise s'ajoute autour du curseur ou autour du texte sélectionné si tu as sélectionné la partie ke tu veux modifer.
le -4 c la différence entre là ou sera le curseur par défaut apres l'ajout et là ou se trouve le milieu de la balise de fermeture.
"</B>" = 4 caractères donc modifier en fonction de la balise.
de rien ;-)
-------------------------------
Réponse au message :
-------------------------------
Je monte présentement un Éditeur HTML et j'ai quelques problèmes.
- J'ai un rich text box pour le code. Admettons que je veuille mettre un texte en gras (balise <B>) je dois insérer du texte de part et d'autre du curseur.
Exemple :
<HTML>
<BODY>
salut comment ça | toi ?
l'endroit où il y a une barre c'est là que je veux insérer une balise <B> d'un côté et </B> de l'autre.
Il faudrait comme qu'il détecte à quel endroit est le curseur !!!
- Deuxième question : Je veux faire un aperçu en ouvrant Internet Explorer avec un shell. Le défaut, c'est qu'il met par défaut http:// devant, mais moi j'ai pas besoin de ça pasque je veux ouvrir une page web en local...
Exemple :
Shell "C:\Program Files\Internet Explorer\iexplore.exe aperçu.html"
pis la ça me met http://aperçu.html comme url...
Quelqu'un peut-il m'aider ??
Merci beaucoup d'avance !
Kronprinz
