请问各位高手：怎样检测该机器是否有打印机和怎样访问打印队列？

[xiaoguoru]

同上。

[jishiping]

1、该机器是否有打印机？
使用 Printer()->Printers->Count>0 判断是否有打印机。

2、访问当前选择的打印机的打印队列，主要使用API函数EnumJobs枚举。下面是一个例子：
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD dwNum;
DWORD dwSize;
HANDLE hPrinter;
char buf[1024];
JOB_INFO_1* pji;

if (!OpenPrinter(Printer()->Printers->Strings[
Printer()->PrinterIndex].c_str(),&hPrinter,
NULL)) {
ShowMessage(SysErrorMessage(GetLastError()));
return;
}
Memo1->Clear(); pji = (JOB_INFO_1*)buf;
for(int n=0; 1; n++) {
if (!EnumJobs(hPrinter,n,1,1,buf,sizeof(buf),
&dwSize,&dwNum) || dwNum==0)
break;
if (n!=0) Memo1->Lines->Add("");
Memo1->Lines->Add(AnsiString("Job ")+n);
Memo1->Lines->Add(AnsiString("UserName: ")+
pji->pUserName);
Memo1->Lines->Add(AnsiString("Document: ")+
pji->pDocument);
Memo1->Lines->Add(AnsiString("Status: ")+
pji->pStatus);
Memo1->Lines->Add(AnsiString("TotalPages: ")+
pji->TotalPages);
Memo1->Lines->Add(AnsiString("PagesPrinted: ")+
pji->PagesPrinted);
}
ClosePrinter(hPrinter);
}

[jishiping]

OpenPrinter 的第一个参数是打印机的名称。上面的 Printer()->Printers->Strings[
Printer()->PrinterIndex] 就是系统选择的缺省的打印机名称。如果想要枚举其它的打
印机队列，只要更改OpenPrinter的第一个参数就可以了。打印机的名字可以从Printer()
->Printers->Strings[Index]取得（Index是打印机的序号，从0开始）。