打印出来的全是乱码，这是怎么回事？？？(100分)

tf: textfile;
begin
AssignFile(tf, DM.PrinterName);
Rewrite(tf);
Writeln(tf, ' ');
Writeln(tf, ' ' + DM.AQ.FieldByName('DeptName').AsString + '结帐预览');
Writeln(tf, '-----------------------------------------------');
Writeln(tf, ' 帐单号：' + AccountID);
Writeln(tf, ' 餐桌名：' + Frm_CheckOut.LB_Table.Caption）；
Writeln(tf, '-----------------------------------------------');
Writeln(tf, ' 菜品名称 单价 数量 金额 ');
Writeln(tf, '-----------------------------------------------');
CloseFile(tf);
end
打印机是epson1600K
打印的汉字全是乱码
如果我将打印机属性中的打印处理器改成：winprint里面的text象就可以正常打印，
但打印机是按A4的长度走纸的，我要得是自己控制打印长度
谢谢各位，帮帮忙吧

顶起