Menampilkan Nama Printer Pada Combobox di Delphi

Untuk Menampilan Nama Printer Pad COmbobx Pertama-tama  :
1. Tambahkan Pada Uses  printers dan Winspool. ( uses  printers, Winspool; )
2. Masukan Kode Berikut Pada Event form show

procedure TForm1.FormShow(Sender: TObject);
begin
// Tampilkan Printer ke Combobox
ComboBox1.Items.Assign(Printer.Printers);
// Tampilkan Default Printer ke Edit
Printer.PrinterIndex := -1;
end;

cuma gitu doank simpel kan.