Formular inklusive richedit drucken

[Snail]

Hallo,

habe ein Programm geschrieben, welches bei bestimmten Nutzereingaben die entsprechenden Eingaben z.B. an ein Richedit und mehrere Labels übergibt. Diese befinden sich auf einem extra Formular, welches für den Nutzer nicht sichtbar ist und gedruckt werden soll.
Jetzt das Problem:
Beim ausdrucken fehlen die Angaben der richedit, d.h. es ist leer, obwohl es Inhalt besitzt (beim sichtbarmachen des Formulars festgestellt). Die Labels werden einwandfrei gedruckt bloss das richedit nicht.
Zum drucken benutze ich: Form1.print
Kennt jemand den Grund? Wenn möglich bitte mit Lösungsvorschlag!


Danke schonmal,
MFG,
Snail

[Daniel B]

Hallo und herzlich Willkommen in der DP!

Form1.Print ist nicht zum "wirklichen" Drucken vergesehen, sondern eher das Formular an sich auszudrucken, bzw. samt den Komponenten da drauf.
Aber hiermit geht es:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit1.Print(RichEdit1.Lines.Text);
end;

Grüsse, Daniel :hi:

PS: Ich verschiebe das mal nach VCL-Komponenten! ;)

[Snail]

schon klar, aber dadurch wird doch aber nur das richedit gedruckt. Es soll aber das ganze form1 gedruckt werden, also einfach alles auf dem Formular ;)

und nu?

[Snail]

hab das problem gelöst... ich idiot ;) die daten, für das richedit werden quasi erst nach dem drucken an die richedit übergeben ;)

:wall:


trotzdem danke für deine mühe

[Stanlay Hanks]

Vielleicht durckt die Funktion nur sichtbare Komponenten?

[Karsten]

Hallo Snail,

kannst Du mir bitte erklären wie Du das Problem gelöst hast, bzw. wo bei Dir das Problem lag ? Ich sitze hier schon seit längeren vor meiner Druckfunktion und bekomme nicht mal einen Hauch von RichEdit gedruckt.

Habe es schon mit zwei Beiträgen versucht, aber wie es aussieht kommen die meisten mit RichEdit.Print aus.

Ich habe auf meinem (mitlerweile von Panel auf Form umgestellt) Form verschiedene RichEdit komponenten und erzeuge mir per PaintTo ein Bitmap. Das Bitmap benötige ich weil ich immer zwei Datensätze pro Seite drucke und der Vorgang sich dann nicht auf ein Print beschränkt.

Nach langer Zeit des Grübelns und Probierens habe ich mal versucht das Form per Form.Print auszudrucken, gleicher Effekt. Kein RichEdit Text, lediglich der Hintergrund.

Danke und Gruß,
Karsten