Допустим пользователь при помощи CommonForm(Printer) выбрал необходимый принтер. Т.е у меня установлен соответствующий Printer обьект. Я хочу сохранить в ini его имя(или ещё что нибудь), для того что бы потом при загрузке установить принтер, выбранный ранее. Пытался сохранить/восстановить Printer.DevoceName, но это свойтсво только для чтения. Что ещё можно придумать ?

Здравствуйте, Tom, Вы писали:

Tom>Допустим пользователь при помощи CommonForm(Printer) выбрал необходимый принтер. Т.е у меня установлен соответствующий Printer обьект. Я хочу сохранить в ini его имя(или ещё что нибудь), для того что бы потом при загрузке установить принтер, выбранный ранее. Пытался сохранить/восстановить Printer.DevoceName, но это свойтсво только для чтения. Что ещё можно придумать ?

Попробуй использовать объект Global. У него есть два свойства: Printer и Printers!
Printers это коллекция принтеров установленных в твоей системе, пройтись по ней ты можешь при помощи For Each'a.

Удачи !

Здравствуйте, Tom, Вы писали:

Tom>Допустим пользователь при помощи CommonForm(Printer) выбрал необходимый принтер. Т.е у меня установлен соответствующий Printer обьект. Я хочу сохранить в ini его имя(или ещё что нибудь), для того что бы потом при загрузке установить принтер, выбранный ранее. Пытался сохранить/восстановить Printer.DevoceName, но это свойтсво только для чтения. Что ещё можно придумать ?

Одно из возможных решений:

Сохраняете Printer.DeviceName

При открытии:
1) Читаете сохраненное имя в PrefferedPrinterName;
2) Пишите код:
Dim X as Printer

For Each X in Printers
if X.DeviceName = PrefferedPrinterName Then
Set Printer = X
End If
Next


Только надо будет учесть, что набор принтеров в системе не постоянен.

Желаю удачи!