Morgääähhn...
Zitat von
ssach:
aber koennte mir jemand sagen wie ich das ganze mit einem printdiaog ausfuhren kan?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
tf: TextFile; //tf = Variable zum Datei Schreiben
begin
if PrintDialog.Execute then
begin
AssignFile(tf, 'MeineDatei.endung');
Rewrite(tf);
WriteLn(tf, 'Hello World!');
end;
CloseFile(tf);
end;
Grüsse, Daniel
