Discussion :

[echap2000]

Bonjour,

J'ai deux composants RichEdit (l'un pour l'en-tête et le deuxième pour le pied de page).

Pour imprimer la feuille, je fusionne les deux richedit de cette façon là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
	for (int i=0; i < Rich1->Lines->Count; i++) {
		RichFusion->Lines->Add(Rich1->Lines->Strings[i]);
	}
 
	for (int i=0; i < Rich2->Lines->Count; i++) {
		RichFusion->Lines->Add(Rich2->Lines->Strings[i]);
             }

Le problème ce que ça perd le format. c'est-à-dire la mise en forme.

Comme solution J'ai essayé de passer par SaveToStream(MemoryStream) etc. là la mise en forme reste telle quelle mais en ce moment là, il faudrait que j'additionne deux memorystream.. mais comment?


Merci de m'éclaircir parce que là je suis à court d'idée ..

[rtg57]

Une petite question: à quoi servira le RichEdit de fusion ?

Parce que s'il faut garder la mise en forme, une astuce consisterait à copier carrément les parties d'écran représentant l'en-tête et le pied de page, grâce aux procédures de la classe TBitmap. C'est une idée

[echap2000]

c''est pour imprimer un ticket en fait.. entre les deux y aura les produits vendus.

[ero-sennin]

Salut,

Logiquement, ce morceau de code devrait te permet de fusionner 2 RichEdit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Rich1->SelStart=0;
  Rich1->SelLength=Rich1->Text.Length();
  Rich1->CopyToClipboard();
  RichFusion->PasteFromClipboard();
  Rich2->SelStart=0;
  Rich2->SelLength=Rich2->Text.Length();
  Rich2->CopyToClipboard();
  RichFusion->PasteFromClipboard();
}

En espérant que celà soit OK
Bon Courage
Cordialement