none
Combinaison de formats avec un texte dans un RtBox RRS feed

  • Question

  • Bonsoir,

    je peine à partir d'un clic droit avec ContextMenu à combiner les formats de police. La taille se reduit quand je passe en gras ou inversement. Je perd le gras quand je souligne etc.. Comment faire pour memoriser la sélection dans le RTBox en taille et format, puis la completer avec un format complémentaire ? Par exemple, passer de police 10, gras à 12, gras, rouge et souligné?

    Merci de votre contribution a cette prise de tête... Bon c vendredi soir....

    vendredi 21 janvier 2011 18:32

Réponses

  • Bonjour,

    Il y a longtemps j'avais jouer avec RTB, personnellement je faisais une récupération du texte sélectionner puis testais si le texte était en gras ou d'autre format puis j'additionnais la mise en forme additionnelle a celle sélectionner. je vais recherché si j'ai encore ce code et je vous le donnerais.

     

    A bientot


    Cordialement, Troxsa
    • Marqué comme réponse domi27 samedi 22 janvier 2011 16:30
    vendredi 21 janvier 2011 21:10
    Auteur de réponse
  • Bonjour Domi,

    RTBox ? Tu parles du RTF ?

    Voici la copie de mon pense-bête concernant le RTF :

    SelectionStart = ' début sélection
     SelectionLength = ' longueur sélection
     SelectedText = ' texte sélectionné
     SelectionColor = System.Drawing.Color.Red ' couleur
     SelectionFont = New Font("Courier New", 12, FontStyle.Bold)
     DeselectAll() ' désélectionne tout
    

    Toutefois je ne ais pas si tu peux tout faire, faudrait voir dans "new Font" si tu peux rajouter un paramètre, ou si un paramètre " souligné + ? " existe ?

    Cordialement.



    Joseph Attila PUSZTAY
    EhJoe       Logiciels       Romans       Ecrire
    • Modifié EhJoe samedi 22 janvier 2011 09:29 addendum
    • Marqué comme réponse domi27 samedi 22 janvier 2011 16:29
    samedi 22 janvier 2011 09:27

Toutes les réponses

  • Bonjour,

    Il y a longtemps j'avais jouer avec RTB, personnellement je faisais une récupération du texte sélectionner puis testais si le texte était en gras ou d'autre format puis j'additionnais la mise en forme additionnelle a celle sélectionner. je vais recherché si j'ai encore ce code et je vous le donnerais.

     

    A bientot


    Cordialement, Troxsa
    • Marqué comme réponse domi27 samedi 22 janvier 2011 16:30
    vendredi 21 janvier 2011 21:10
    Auteur de réponse
  • je n'ai pas trouvé mon ancien code (de toute façon il devrais pas etre beau a voir vu que c’était dans mes débuts de dev :P)

    J'ai trouvé un code qui a l'air d'être complet : http://jab.developpez.com/tutoriels/dotnet/ctrlrtf/


    Cordialement, Troxsa
    vendredi 21 janvier 2011 21:49
    Auteur de réponse
  • Merci de ces infos TROXSA, je vais tester le code jab

     

    Cordialement

    Domy

    samedi 22 janvier 2011 08:05
  • Bonjour Domi,

    RTBox ? Tu parles du RTF ?

    Voici la copie de mon pense-bête concernant le RTF :

    SelectionStart = ' début sélection
     SelectionLength = ' longueur sélection
     SelectedText = ' texte sélectionné
     SelectionColor = System.Drawing.Color.Red ' couleur
     SelectionFont = New Font("Courier New", 12, FontStyle.Bold)
     DeselectAll() ' désélectionne tout
    

    Toutefois je ne ais pas si tu peux tout faire, faudrait voir dans "new Font" si tu peux rajouter un paramètre, ou si un paramètre " souligné + ? " existe ?

    Cordialement.



    Joseph Attila PUSZTAY
    EhJoe       Logiciels       Romans       Ecrire
    • Modifié EhJoe samedi 22 janvier 2011 09:29 addendum
    • Marqué comme réponse domi27 samedi 22 janvier 2011 16:29
    samedi 22 janvier 2011 09:27
  • Bonsoir Joe, TroXA

    Merci du coup de main, ça m'a permis de rebondir pour trouver le code.

    Pour Info : pour conserver le format de la selection et le completer, voici la méthode que j'utilise au final dans un Rtb

    Au niveau de la couleur pas de pb :

    Mcontext.SelectionColor = Color.Red

    Au niveau de l'agrandissement ou diminution de la taille police : (mon Rtb s'appele Mcontext)

     

     

    '12 points

     

     

    Dim currentFont As System.Drawing.Font = Mcontext.SelectionFont

     

     

    Dim newFStyle As System.Drawing.FontStyle = Mcontext.SelectionFont.Style

    Mcontext.SelectionFont =

     

    New Font(currentFont.FontFamily, 12, newFStyle)

    Au niveau du style :

     

     

    Dim currentFont As System.Drawing.Font = Mcontext.SelectionFont

     

     

    Dim newFStyle As System.Drawing.FontStyle = Mcontext.SelectionFont.Style

     

     

    Dim sz As Single = Mcontext.selectionFont.Size

    newFStyle = Mcontext.SelectionFont.style + System.Drawing.

     

    FontStyle.Bold

    Mcontext.SelectionFont =

     

    New Font(currentFont.FontFamily, sz, newFStyle)

    Cordialement

    Domi

    samedi 22 janvier 2011 16:29