printdialog怎么用呀？

Question

printdialog.execute;
是执行。祝：身体健康！

Answer 1

printerdialog只是得到一些信息而已，具体的打印过程还需要tprinter来完成！

Answer 2

能详细一点吗？比如我现在打开了一个txt文件或dbf文件，怎么样设置打印出来呀

Answer 3

比如我现在打开了一个txt文件或dbf文件，怎么样设置打印出来呀

Answer 4

比如我现在打开了一个txt文件或dbf文件，怎么样设置打印出来呀

Answer 5

txt文件：
procedure TForm1.Button1Click(Sender: TObject);var
  MyFile: TextFile;
  SourceFile:TextFile;
  Tmp:String;
begin
  AssignPrn(MyFile);
  AssignFile(SourceFile,'FilePath');
  Reset(SourceFile);
  Rewrite(MyFile);
  Readln(SourceFile,Tmp);
  While Not EOF(SourceFile) do
  Begin
        Writeln(MyFile, Tmp);
        Readln(SourceFile,Tmp);
  System.CloseFile(MyFile);
end;
图形文件需要TPrinter.canvas来打印了，
上面的程序没有经过测试，如果有什么问题，给我mail:[email protected]