简单的问题(50分)

请问，在delphi中如何判断计算机上有没有安装打印机？

首先在uses增加Printers，再准备一个列表框listbox
放置一个按键执行下面的代码，就可以知道本机器上有没有安装打印机了
procedure TForm1.ButtonClick(Sender: Tobject);
begin
listbox1.Items.Clear;
listbox1.Items.Assign(Printer.Printers);
end;