تشخیص اینکه آیا یک پرینتر در سیستم عامل نصب است یا نه؟

[tayebeh]

باسلام
چطور میشه در یک برنامه تشخیص داد که یک پرینتر مثلا lq2180 نصب شده است یا نه؟در ضمن آیا می شود تشخیص داد که چه paper size هایی را پشتیبانی می کند؟
باتشکر

[حامد مصافی]

      Dim pkSize As PaperSize

      Dim printDoc As New PrintDocument

      Dim i As Integer

      Dim sc As Printing.PrinterSettings.StringCollection

      sc = System.Drawing.Printing.PrinterSettings.InstalledP  rinters

      For i = 0 To sc.Count - 1

         cboPrinters.Items.Add(sc(i))

      Next

این لیست همه چاپگر ها

      Dim i As Integer

      psc = printDoc.PrinterSettings.PaperSizes

      For i = 0 To psc.Count - 1

         pkSize = psc.Item(i)

         If pkSize.Height <> 0 And pkSize.Width <> 0 Then

            cboPaperSize.Items.Add(pkSize.PaperName)

         End If

      Next

و لیست انواع کاغذ ها

Imports System.Drawing.Printing

[tayebeh]

باتشکر از جوابتون
من در برنامه ام دنبال پرینتر ال کیو 2180 می گردم .کد شما نام کلیه پرینترها رو به من می دهد و من بر اساس نامشون تشخیص می دم که پرینتر 2180 نصب شده یا نه؟ولی اگر کاربری پرینتر 2180 روی سیستمش نصب باشد ولی در قسمت printers & fax نام پرینتر رو عوض کند . دیگه برنامه من نمی تونه این پرینتر رو تشخیص بده با اینکه واقعا در سیستم نصب شده است . حالا می خوام بپرسم آیا پرینترها مشخصه خاصی مثل شماره منحصربفرد خاصی دارند که من بتونم با اونها وجودشونو تشخیص بدم .
باتشکر