test1.hsp
#include "hspprint.as" enumprn plist pnum=stat mes "プリンタの数="+pnum if pnum=0 : goto *noprn mes "プリンタ一覧" notesel plist repeat notemax noteget s1,cnt mes "ID"+cnt+" : "+s1 loop getdefprn kitei mes "規定のプリンタ="+kitei stop *noprn mes "プリンタはありません。
sample\hspprint\test1.hsp - 2014/09/19
test2.hsp
#include "hspprint.as" *start cls enumprn plist pnum=stat mes "プリンタの数="+pnum if pnum=0 : goto *noprn getdefprn def_printer 規定のプリンター mes "プリンタ一覧" useid = 0 notesel plist repeat notemax noteget s1,cnt mes "ID"+cnt+" : "+s1 if s1=def_printer :
sample\hspprint\test2.hsp - 2014/09/19