Eine Datei drucken

[Dax]

volkerw zeigt hier, wie man ohne viel Aufwand betreiben zu müssen ganz einfach eine Datei ausdrucken kann:

Delphi-Quellcode:

ShellExecute(handle, 'print', 'c:\temp\test.log', '', '', SW_HIDE);

Wenn man den Dateinamen nicht fest im Programm haben möchte, sondern beliebige Dateien ausdrucken will, muss man sich eine Variable anlegen:

Delphi-Quellcode:

var PfadZurDatei: string;

ShellExecute(handle, 'print', PChar(PfadZurDatei), '', '', SW_HIDE);

Dazu muss lediglich die Unit ShellAPI eingebunden werden.