Programınızda yazıcı kullanmak istiyorsunuz ancak bağlı yazıcıları oğrenmek istiyorsanız aşağıdaki kod size yardımcı olacaktır.
Printers unit'i yazıcılarla ilgili isteyebileceğiniz kontrollerin neredeyse hepsini icerir.
İşe uses satırına Printers'ı ekleyerek başlayalım. Aşağıdaki kod varsayılan yazıcıyının ismini bulmanızı sağlar.



function Varsayilan : string;
begin
if (Printer.PrinterIndex > 0) then
Varsayilan := Printer.Printers[Printer.PrinterIndex]
else
Varsayilan := ";
end;


Eğer bilgisayarınıza bağlı olan yazıcıların listesini almak isterseniz once formunuza bir combobox ekleyin daha sonra aşağıdaki kodu istediğiniz bir event'e bağlayabilirsiniz.


ComboBox1.items := Printer.Printers;
__________________