TStringList drucken

[ereetzer]

Zitat von sakura:

So sollte es gehen.

Delphi-Quellcode:

procedure TForm1.BitBtn14Click(Sender: TObject);
var
  aRichEdit: TRichEdit;
  i: integer;
begin
  aRichEdit := TRichEdit.Create(Self);
  try
    aRichEdit.Lines.Assign(FileListBox1.Items);
    aRichEdit.Print('Test');
    aRichEdit.Free;
  finally
    aRichEdit.Free;
  end;
  FileList.free;
end;

......

ok, habe jetzt die Zeile:

Code:

    aRichEdit.Parent := Form1;

eingefügt. Jetzt druckt er so, wie er soll, bringt aber noch die Fehlermeldung: Format '%p' ungültig oder nicht kompatibel mit Argument?
Was bedeutet das denn nun schon wieder?

ereetzer