TRichEdit

CGI

- Titre : TRichEdit

- Auteur : CGI

- Parution : 12 octobre 2002

- Licence : Copyright 2002-2016 CGi - Tous droits réservés CGi. Toutes reproduction, utilisation ou diffusion de ce document par quelque moyen que ce soit autre que pour un usage personnel doit faire l'objet d'une autorisation écrite de la part de l'auteur, propriétaire des droits intellectuels. Les codes sources de ce document sont fournis en l'état. L'utilisateur les utilise à ses risques et périls, sans garantie d'aucune sorte de la part de l'auteur. L'auteur n'est responsable d'aucun dommage subi par l'utilisateur pouvant résulter de l'utilisation ou de la distribution des codes sources de ce document. De la même façon, l'auteur n'est en aucun cas responsable d'une quelconque perte de revenus ou de profits, ou de données, ou de tous dommages directs ou indirects, susceptibles de survenir du fait de l'utilisation des codes sources de ce document, quand bien même l'auteur aurait été averti de la possibilité de tels dommages. L'utilisation des codes sources de ce document vaut acceptation par l'utilisateur des termes de la licence ci-dessus.

Sommaire

- I. Exemple d'utilisation d'un TRichEdit : (Micro traitement de textes)

- II. Sauvegarde et Impression avec un RichEdit

- III. Formats de paragraphes

- IV. Insertion de texte formaté

I - Exemple d'utilisation d'un TRichEdit : (Micro traitement de textes)

Sur une Form (Form1) poser :

- un Panel (Panel1) avec les propriétés :

- Align à alTop,

- Caption à (vide) ;

- un TRichEdit (RichEdit1) avec la propriété : Align à alClient ;

- une TFontDialog (FontDialog1).

Sur Panel1 poser :

- un bouton (Button1) avec la propriété : Caption => « Police » ;

- deux CheckBox :

- CheckBox1 avec la propriété : Caption à « Gras »,

- CheckBox2 avec la propriété : Caption à « Italique » ;

- une ComboBox (ComboBox1) avec sa propriété Items remplie avec une série de valeurs de tailles de Fontes (valeurs numériques entières).

Sur l'événement OnClick de Button1 : appel de la boîte de dialogue de changement de fonte préalablement affecté avec la fonte de la position du curseur (caret). Puis changement de la fonte de la sélection ou de la position du caret. Puis redonner le focus au RichEdit.

void __fastcall TForm1::Button1Click(TObject *Sender)
{
FontDialog1->Font->Assign(RichEdit1->SelAttributes);

if (FontDialog1->Execute())
{
RichEdit1->SelAttributes->Assign(FontDialog1->Font);
}
RichEdit1SelectionChange(NULL); //voir plus loin dans ce document.
RichEdit1->SetFocus();
}

Sur l'événement OnClick de CheckBox1 : mise de la fonte en Gras ou non selon que la case est cochée ou pas. Puis redonner le focus au RichEdit.

void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
if(CheckBox1->Checked)
RichEdit1->SelAttributes->Style =
RichEdit1->SelAttributes->Style << fsBold;
else
RichEdit1->SelAttributes->Style =
RichEdit1->SelAttributes->Style >> fsBold;
RichEdit1->SetFocus();
}

Sur l'événement OnClick de CheckBox2 : mise de la fonte en Italique ou non selon que la case est cochée ou pas. Puis redonner le focus au RichEdit.

void __fastcall TForm1::CheckBox2Click(TObject *Sender)
{
if(CheckBox2->Checked)
RichEdit1->SelAttributes->Style =
RichEdit1->SelAttributes->Style << fsItalic;
else
RichEdit1->SelAttributes->Style =
RichEdit1->SelAttributes->Style >> fsItalic;
RichEdit1->SetFocus();
}

Sur l'événement OnChange de ComboBox1 : attribution de la nouvelle taille de fonte.

Sur l'événement OnClick de ComboBox1 : redonner le focus au RichEdit.

Et sur l'événement OnKeyPress de ComboBox1 : redonner le focus au RichEdit si touche « Entrée » enfoncée et interdire les caractères non numériques.

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
RichEdit1->SelAttributes->Size = StrToInt(ComboBox1->Text);
}

void __fastcall TForm1::ComboBox1Click(TObject *Sender)
{
RichEdit1->SetFocus();
}

void __fastcall TForm1::ComboBox1KeyPress(TObject *Sender, char &Key)
{
if (Key == 13) RichEdit1->SetFocus();
if ((Key < '0' || Key >'9') && Key != 8) Key = NULL;
}

Et sur l'événement OnSelectionChange de RichEdit1 : donner aux contrôles permettant de modifier les propriétés du texte la valeur correspondant à la propriété du texte de la position en cours du curseur (caret).

void __fastcall TForm1::RichEdit1SelectionChange(TObject *Sender)
{
if(RichEdit1->SelAttributes->Style.Contains(fsBold))
CheckBox1->Checked = true;
else
CheckBox1->Checked = false;

if(RichEdit1->SelAttributes->Style.Contains(fsItalic))
CheckBox2->Checked = true;
else
CheckBox2->Checked = false;

ComboBox1->Text = RichEdit1->SelAttributes->Size;

}

Voir aide C++ Builder sur les formats de texte rubrique TTextAttributes.

Pour utiliser la touche de tabulation sur le RichEdit, il faut mettre sa propriété WantTabs à true.

J'ai volontairement utilisé des contrôles simples pour ne pas surcharger l'exemple et ce concentrer sur le composant TRichEdit.

II - Sauvegarde et Impression avec un RichEdit

Pour imprimer le contenu d'un RichEdit, il faut utiliser la méthode Print avec en paramètre une AnsiString contenant le titre de l'impression.

RichEdit1->Print("Titre du document");

La sauvegarde et le chargement de fichiers sont tout aussi simples.

Laisser la Propriété PlainText du RichEdit à false pour garder le format du texte lors de la sauvegarde ou du chargement du fichier.

RichEdit1->Lines->SaveToFile("Fichier.rtf"); //Sauvegarge.

RichEdit1->Lines->LoadFromFile("Fichier.rtf"); //Chargement

III - Formats de paragraphes

Alignements de paragraphes : le paragraphe qui contient le curseur (Caret) sera aligné à droite à gauche ou centré en fonction de la ligne de code suivante qui sera exécutée.

//Alignement à gauche
RichEdit1->Paragraph->Alignment = taLeftJustify ;

//Alignement au centre
RichEdit1->Paragraph->Alignment = taCenter;

//Alignement à droite
RichEdit1->Paragraph->Alignment = taRightJustify;

Voir aide C++ Builder rubrique TParaAttributes pour les autres possibilités de format de paragraphe. (Retrait 1re ligne, retrait à gauche, retrait à droite, les bulets, et les tabulations.)

IV - Insertion de texte formaté

Nous allons insérer du texte formaté à la position du curseur (Caret). Dans cet exemple nous changerons sa couleur.

RichEdit1->SelAttributes->Color = clRed;
RichEdit1->SelText = " Rouge";
RichEdit1->SelAttributes->Color = clGreen;
RichEdit1->SelText = " Vert";
RichEdit1->SelAttributes->Color = clBlue;
RichEdit1->SelText = " Bleu";
RichEdit1->SelText = "\r\n"; //Ligne suivante

La position du curseur peut être modifiée avec la propriété SelStart du RichEdit.

Dans ce document, je vous ai parlé des principales propriétés d'un RichEdit. Pour plus de détails, voir aide C++ Builder. Mais vous avez déjà matière à vous entraîner à sa manipulation.

RichEditement votre !

CGi