Accueil > Manip’s > Delphi > Richedit (RTF) > Copier un Richedit dans un autre
Copier un Richedit dans un autre
vendredi 7 septembre 2012, par
Un moyen simple de recopier un Texte enrichi d’un RichEdit vers un autre
Plutôt que de se casser le trognon a gérer les flux et à planter la machine, le moyen le plus simple de recopier un RichEdit dans un autre en gardant tous les enrichissements
Est de passer par le presse-papier
var p : integer,
Begin
p := RTF1.Selstart; // je pointe le curseur au départ
RTF1.SelectAll; // Je sélectionne tout le texte
RTF1.CopyToClipBoard; // Je place le texte dans le presse papier
RTF2.Clear; // Je nettoie la cible
RTF2.PasteFromClipBoard; // Je colle le texte
RTF1.SetFocus; // Je reviens au Texte origine
RTF1.SelStart := P; // Je place mon curseur ou il était au départ