Impresoras en un combobox

[Julián]

Hola grupo aquí con una nueva consulta como puedo cargar las
impresoras en un combo instaladas en la PC ??

Encontré un ejemplo en la red. pero no me permite seleccionar las
impresoras aparecen en color gris las letras.

Las impresoras están instaladas en red, las impresoras locales si las
muestra.

Saludos

[Luis Maria Guayan]

Este artículo te puede servir:

-- Utilizando la función ANETRESOURCES() --
http://www.portalfox.com/article.php?sid=2171

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Victor Espina]

El problema se presenta cuando haces un AddItem() de una impresora cuyo nombre empieza por "\\".  En ese caso, el combo/listbox procede a mostrar el item con solo un "\" y lo desactiva. LA solucion es verificar si el nombre de la impresora empieza con "\\" y, en ese caso, incluir un "\" adicional al inicio del mismo.

Si te fijas en el codigo contenido en el link que te indico Luis Maria, se aplica justamente lo que te comento.

Saludos

Victor Espina

[Julián]

Hola que tal aquí de nuevo.

Gracias Luis María
Gracias Víctor

No había podido responder al post andaba fuera pero lo resolví con la
idea que me dio Lewis López

En el init del combobox

DIMENSION Impresoras[1,1]
CREATE CURSOR crImpresoras (Id I, Impresora C(100))
nImpresoras = APRINTERS(Impresoras)

FOR x = 1 TO nImpresoras STEP 1
INSERT INTO crImpresoras (Id, Impresora);
values (x, Impresoras[x,1])
ENDFOR

y en el activate del Form

Thisform.cbxImpresoras.Requery()

Realmente no se si sea una buena solución, espero sus cometnario.

Saludos