2

Consigo pegar o nome da impressora padrão declarado Printers na seção uses:

Printer.Printers[Printer.PrinterIndex]

Se por acaso, durante a execução do programa o usuário trocar a impressora padrão. Como eu consigo pegar essa nova impressora(nome da impressora)?

5
  • Eu tentaria usar um evento Commented 31/08/2018 às 17:18
  • Seria só executar todas as vezes Printer.Printers[Printer.PrinterIndex] que precisar, a não ser que uma aplicação Delphi salve em algum tipo de cache na memoria as impressoras. Mas não entendo muito da tecnologia.
    – Syzoth
    Commented 31/08/2018 às 17:52
  • @GuilhermeNascimento, não funciona, se eu chamar o método Printer.Printers[Printer.PrinterIndex] vai trazer a impressora padrão, agora se eu mudar a impressora padrão sem fechar minha aplicação e chamar novamente o método Printer.Printers[Printer.PrinterIndex] vai continuar trazendo a primeira impressora padrão, agora se reiniciar o programa, e chamar o método dai atualiza a impressora padrão. Commented 31/08/2018 às 20:16
  • Mas você executa inteiro Printer.Printers[Printer.PrinterIndex] ou apenas pega a variavel que recebeu o valor do item deste index especifico?
    – Syzoth
    Commented 31/08/2018 às 20:23
  • @GuilhermeNascimento executo inteiro. Commented 3/09/2018 às 11:00

1 Resposta 1

3

Existe uma tratativa no Set da propriedade PrinterIndex, quando passar o valor -1 ele sempre retornará a impressora padrão do windows. Ex:

if Printer.Printers.Count > 0 then
begin
  Printer.PrinterIndex := -1;
  ShowMessage(Printer.Printers[Printer.PrinterIndex]);
end;

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .