Como pegar a impressora selecionada

Delphi

02/08/2003

AI GALERA..

turma estou desenvolvendo aqui um aplicativo onde o usuário vai escolher a impresorra para uso padrão. pois é um uma rede.

minha dúvida é. como pegar o nome da impressora selecionada por ele ? :roll: :?:


DESDE JÁ SOU GRATO!
ANDESON DE JESUS


Ajmsistemas

Ajmsistemas

Curtidas 0

Respostas

Edilcimar

Edilcimar

02/08/2003

PrinterSetupDialog1.Execute


GOSTEI 0
Ajmsistemas

Ajmsistemas

02/08/2003

PrinterSetupDialog1.Execute


olá amigo... é fiz o mesmo só que como é em uma rede e preciso que meu aplicativo use sempre um única impressora... sou seja preciso salvar o nome dela para quando mandar imprimir o aplicativo usar a que esta salva em suas configurações.

obrigado.. :D

a empresa tem 3 impressora e cada impressora tem uma função e a principal não é a do sistema por isso preciso pegar e salva o nome da impresora para o aplicativo.


GOSTEI 0
Adilsond

Adilsond

02/08/2003

Para pegar as impressoras instaladas no computador:

uses Printers;

ListBox1.Items.Assign(Printer.Printers); // pegas as impressoras
ListBox1.ItemIndex := Printer.PrinterIndex; // posiciona na impressora atual

Para escolher a impressora voce pode guardar o nome da impressora e localiza-la pelo método indexof do TStringList e mudar a impressora:

Printer.PrinterIndex := ListBox1.ItemIndex; // muda a impressora

Espero ter ajudado...


GOSTEI 0
Jrfigueiredo

Jrfigueiredo

02/08/2003

olá Adilson

Como fasso para que a impressora selecionada fique gravada como padrão para o meu programa ?
um grande abraço

Rubens


GOSTEI 0
POSTAR