请问各位大哥！！小弟正在做一个餐饮系统，需要后厨打印功能，求求各位进来看看吧！！！！

分四个厨房，每个厨房放一个打印机，我在前台点完菜后根据菜的类别对应的厨房，分别
将对应的菜品在各自的厨房打印出来，这点我想用打印服务器应该可以做到，但是他还需要
打印条码，这个东西如何在远程打印机上打印出来呀！！！！
请看以下是我的打印程序：
procedure TTPS_Show.PrintOneRecord;      //打印一条信息
var
 TF: TextFile;
begin
 AssignFile(TF, printername);
 //printername是打印机的名称，例如：//192.168.0.3/espon1
 ReWrite(TF);
 Writeln(TF, '           传菜单        ');
 Writeln(TF, '  -------------------------');
 Writeln(TF, '  单号：' + PRecord.tpid);
 writeln(TF, '  菜品名称：  ' + PRecord.mrs);
 Writeln(TF, '  流水号：  ' + PRecord.id);
 Writeln(TF, '  桌台号：  ' + PRecord.TPSName);
 Writeln(TF, '  地点号：    ' + PRecord.xmmc);
 Writeln(TF, '  数量：    ' + IntToStr(PRecord.num) + ';  单位：' + PRecord.xmdw);
 Writeln(TF, '  日期：    ' + PRecord.Date + '; 时间:' + PRecord.Time);
 Writeln(TF, '  厨房：  ' + PRecord.TPS);
 Writeln(TF, ' ');
 Writeln(TF, ' ');
 writeln(TF, ' ');
 Writeln(TF, ' ');
 Writeln(TF, ' ');
 CloseFile(TF);
end;
我现在想打印条码，如何实现？？？