ник: ДрЮня
нужно добавить в компонентах или референсах эту библиотеку
..\system32\comdlg32.ocx
на форму добавляете кнопку. на событие клик примерно это
CommonDialog.flags = cdlCFBoth + cdlCFEffects
CommonDialog.ShowPrinter
где CommonDialog - будет ОСХ на форме