Un lugar de encuentro para los programadores de habla hispana

Un lugar de encuentro para los programadores de habla hispana

Buscar

Entrar

Puedes acceder utilizando tu cuenta de usuario del foro.

Si no dispone de cuenta, puede crear una accediendo al formulario de registro del foro.



Cómo detectar si existe alguna impresora definida Imprimir
Ideas - Delphi

 
procedure TForm1.Button1Click(Sender: TObject);
var
  Device, Driver, Port : array [0..255] of Char;
  Modo : Integer;
begin
  Printer.GetPrinter(Device,Driver,Port,Modo);
  if Device <> '' then ShowMessage(Device)
  else ShowMessage('Sin definir impresora');
end;
 
 
 
Comentarios (0)
Para escribir un comentario debes estar registrado