Delphi7.0 39码打印

Delphi7.0的39条形码打印范例，纯代码生成，未用控件，在屏幕上显示的时候是有些不好看，但是到打印机上打出来的就是正确的，基本上由于屏幕显示单位和程序画板不匹配的问题造成，不影响打印。