Hallo,
das ist wohl die kürzeste und einfachste möglichkeit um einen Text an den Drucker zu schicken, also einen Text zu drucken.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
tf: TextFile;
begin
AssignFile(tf, 'LPT1');
Rewrite(tf);
WriteLn(tf, 'http://delphipraxis.net');
Writeln(tf, #12);
CloseFile(tf);
end;
Grüsse, Daniel