Newbie spm

Det skulle vist være Memo1.Print;

/Deacon

Eller også Memo1.Lines.Print;

sæt den her kode ind under din knap.
Husk at i USES skal du skrive printers.

var
Line:Integer;
PrintText:System.Text;
begin
if PrintDialog1.Execute then
begin
AssignPrn(PrintText);
ReWrite(PrintText);
Printer.Canvas.Font := Memo1.Font;
for Line :=0 to Memo1.Lines.Count - 1 do
Writeln(PrintText, Memo1.Lines[Line]);
System.Close(PrintText);

kan ikke få det til at virke :-(