Hjälp!

Använder mig av följande kod i ett MDIChildForm.
Där väljs vilken skrivare som skall användas för programmet.
Den skrivaren man valt lagras i registret.

<code>List1.Clear
'Lista namnet på alla installerade skrivare i listboxen
Dim ProgPrinter As Printer
For Each ProgPrinter In Printers
List1.AddItem ProgPrinter.DeviceName
Next ProgPrinter
List1.Text = ReadRegValue(HKEY_LOCAL_MACHINE, "SOFTWARE\TimeView\Default", "Printer")
</code>

Nu till kruxet med att använda den skrivaren jag valt.
Det går inte att kalla på värdet från registret som jag tänkte att det skulle gå

<code>Printer.deviceName = </code> och sedan registervärdet.

Hur skall jag göra??

// Jocke

<code>
Dim DeviceName As String
Dim ProgPrinter As Printer
DeviceName = ReadRegValue(HKEY_LOCAL_MACHINE, "SOFTWARE\TimeView\Default", "Printer")
For Each ProgPrinter In Printers
If ProgPrinter.DeviceName = DeviceName Then
Set Printer = ProgPrinter
Exit For
End If
Next
</code>

Tusen Tack!
Att det var så enkelt!!
//