Selection de texte par paragraphe
Soyez le premier à donner votre avis sur cette source.
Vue 4 324 fois - Téléchargée 320 fois
Description
permet de selectionner un paragraphe ds un RTF
Zip avec un exemple ci-joint
Source / Exemple :
Private Sub Box1_click()
Dim passage As Boolean
Dim passage2 As Boolean
Dim a as Integer
If SelectionCheck Then
chaine = Box1.Text
a = Box1.SelStart
For i = 1 To Len(chaine)
If Mid(chaine, i, 1) = Chr(10) Then
If a > i Then
Box1.SelStart = i
passage = True
Else
If Not passage Then
Box1.SelStart = 0
passage = True
End If
passage2 = True
Box1.SelLength = i - Box1.SelStart
Exit For
End If
End If
Next
If Not passage2 Then Box1.SelLength = Len(chaine) - Box1.SelStart
end if
End Sub
Conclusion :
Zip avec un exemple ci-joint
Codes Sources
A voir également
- Selection de texte par paragraphe
- Comment découper un texte en paragraphe ✓ - Forum - Java
- Mise en forme de texte ou paragraphe - Codes sources - PHP (Chaînes de caractères)
- 1 ligne pour empêcher le click droit et la sélection de texte - Codes sources - Javascript (Navigation)
- Pas de clic droit ni de sélection de texte - Codes sources - Javascript (Navigation)
- Javascript : Permettre la sélection du texte par l'utilisateur - CodeS SourceS - Guide
Commentaire
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.