Utilice vb.net para agregar controles de impresión

Procedimiento TForm1.Button1Click(Remitente: TObject);

var

MyFile: TextFile

SourceFile:TextFile;

Tmp:

Inicio

AssignPrn(MyFile

AssignFile(SourceFile,'FilePath'); p> Reset(SourceFile);

Rewrite( MyFile);

Readln( SourceFile,Tmp

Mientras no sea EOF(SourceFile)

Comenzar

Writeln(MyFile, Tmp);

Readln( SourceFile,Tmp

System.CloseFile(MyFile); >

fin;

Los archivos gráficos requieren TPrinter.canvas para imprimir.