关于打印的两个问题(20分)

请问各位高手两个问题
1。怎样动态打印报表？即操作员选中什么字段的内容就只打印什么字段的内容，而不是固定的打印某几个字段的内容。（不要用第三方控件）
2。怎样监控打印机的各种状态？

是并口还是串口的，下面是并口的
//从并行端口读取打印机状态
function GetPrinterStatus:byte;
asm
MOV DX,$379;
IN AL,DX;
end;
//获取打印机是否出错
function CheckPrinter:boolean;
var
temp:byte;
begin
temp:=GetPrinterStatus;
Result:=not ( ((temp and $80)=0) //打印机忙
or ((temp and $20)<>0) //打印机缺纸
or ((temp and $10)=0) //打印机未联机
or ((temp and $08)=0) );
//打印机出错;
end;

第一个问题，
你可以动态地制定QRLab的datasource和fieldName就可以了，把你选定的字段指定给QRLab
然后再打印