getprinter( ) 函数示例

clear
cprinter = getprinter( )	 && 显示 windows 的“打印设置”对话框
*** 显示所选定的打印机的名字 ***
wait window iif(empty(cprinter), 'no printer chosen', cprinter)