Is there any way of.....

[Mel Bishop]

....placing the name of a selected printer into a string variable? The following code does not comple but it conveys what I want:

#COMPILE EXE
FUNCTION PBMAIN () AS LONG
local p as string

COLOR 14,1
CLS
p = XPRINT ATTACH CHOOSE
PRINT;p;
WAITKEY$

END FUNCTION

[Paul Dixon]

Mel,
is this what you want?

FUNCTION PBMAIN () AS LONG
XPRINT   ATTACH CHOOSE
device$ = XPRINT$
PRINT device$
XPRINT CLOSE
WAITKEY$
END FUNCTION

Paul.

[Mel Bishop]

Yup. That's it. Much Grass!!