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

[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 نام پرینتر رو عوض کند . دیگه برنامه من نمی تونه این پرینتر رو تشخیص بده با اینکه واقعا در سیستم نصب شده است . حالا می خوام بپرسم آیا پرینترها مشخصه خاصی مثل شماره منحصربفرد خاصی دارند که من بتونم با اونها وجودشونو تشخیص بدم .
باتشکر