RichEdit drucken

[gangs-taas]

hey,
könnt ihr mir bei eine code sagen warum der nicht funktioniert ?

ich möchte mein RichEdit drucken und habe hier hier einen code gefunden.
Ich hab das so verstanden das das hier klappen müsste

Delphi-Quellcode:

begin
  // Create a printer selection dialog
  printDialog := TPrintDialog.Create(Form1);

  // If the user has selected a printer (or default), then print!
  if printDialog.Execute then
  begin
    myPrinter := Printer;
    with myPrinter do
    begin
      h := RichEdit1.Handle;
      Printer.BeginDoc;
      PrintRichEditIntoRect(h, Rect(25, 20, 25, 20), -PageRect_MM);
      Printer.EndDoc;
    end;
  end;
end;

aber er sagt das er nicht weiß was "PrintRichEditIntoRect" ist ...
welche unit muss ich dafür einbinden ?

eigl. ist die unit printers eingebunden ...