Hi zusammen
ich habe mir ein Form gebaut, welches ich als eine Art Report nutzen möchte.
Es beinhaltet Überschriften, Imageboxen und auch MemoBoxen, deren Inhalte aus einem anderen Form übergeben werden.
mit dem Bildern und Labeln klappt das wunderbar und werden auch nachher gedruckt. Nur die Memos werden bei Form.print nicht gedruckt. Wenn ich form.show ausprobiere sehe ich die Memo´s bzw deren Inhalte.
Delphi-Quellcode:
procedure Tfrm_anzeige.btn_printClick(Sender: TObject);
begin
frmdrucken.lb_datum.Caption:='Datum: '+DateToStr(now);
frmdrucken.lb_wenr.Caption:='WE-Nr. '+e_wenumme.Text;
frmdrucken.Memo1.Text:=M_eins.Text; //m... =memo
frmdrucken.Memo2.Text:=M_zwei.Text;
frmdrucken.Memo3.Text:=M_drei.Text;
frmdrucken.Image2.Picture.Bitmap:=im_eins.Picture.Bitmap; // im....= image
frmdrucken.Image3.Picture.Bitmap:=im_zwei.Picture.Bitmap;
frmdrucken.Image4.Picture.Bitmap:=im_drei.Picture.Bitmap;
frmdrucken.Memo1.Text:=M_eins.Text;
frmdrucken.Memo2.Text:=M_zwei.Text;
frmdrucken.Memo3.Text:=M_drei.Text;
frmdrucken.Label1.Caption:=m_eins.Text;
frmdrucken.Label2.Caption:=m_zwei.Text;
frmdrucken.Label3.Caption:=m_drei.Text;
PrintDialog1.Execute;
frmdrucken.Print;
//frmdrucken.Show;
end;
Geht das garnicht was ich vorhabe ..oder mach ich was falsch?
Danke für Eure Hilfe
Gruß Andre