COMO DEFINIR UM IMPRESSORA COMO PADRAO

Coloque um objeto: PrinterSetupDialog1

e um objeto Botto...no evento OnCLick digite o seguite:

PrinterSetupDialog1.Execute;



Função para pegar a impressora padrao

function GetDefaultPrinterName : string;
//
// Retorna o nome da impressora padrão do Windows
//
begin
if(Printer.PrinterIndex >= 0)then
begin
Result := Printer.Printers[Printer.PrinterIndex];
end
else
begin
Result := ´Nenhuma impressora Padrão foi detectada´;
end;
end;