刚学BCB,这段DELPHI打印程序如何转成BCB?(100分)

F

Fairys

Unregistered / Unconfirmed
GUEST, unregistred user!
各位编程高手:
我刚学BCB,这段DELPHI打印程序如何转成BCB?
procedure TForm1.btnPrintClick(Sender: TObject);
var
F:TextFile;
begin

AssignPrn(F);
ReWrite(F);
Printer.Canvas.Font.Size:=18;
Printer.Canvas.Font.Name:='黑体';
Writeln(F,'打印测试文字');
CloseFile(F);
end;
 
请各位大虾帮帮小弟!
 
哎!没人理我!
 
好长时间没有用BCB了,好象这段代码可以直接用。
 
这段代码是不能直用的!
 
顶部