Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #7  
Antiguo 31-05-2004
Ivan JR Ivan JR is offline
Registrado
 
Registrado: may 2004
Posts: 9
Poder: 0
Ivan JR Va por buen camino
Bueno a lo que tu te refieres es como seleccionar otra impresora.. diferente a la que tienes por default.

este es un ejemplo de como obtienes de la impresora y de ahí la pones como predeterminada

function TForm1.fSetDefaultImpresora(
iNumImpresora: integer): Boolean;
var
iniFile : TIniFile;
TempStr1,tempStr2 : string;
begin
Result := True;
with Printer do
Begin
PrinterIndex := iNumImpresora;
iIndexImpresora := iNumImpresora;
TempStr1 := Printers[PrinterIndex];
System.Delete(TempStr1,pos('on',TempStr1),length(TempStr1));
iniFile := TIniFile.Create('WIN.INI');
Try
tempStr2 := iniFile.ReadString('device',TempStr1,'');
iniFile.WriteString('windows','device',TempStr1+','+tempStr2);
iniFile.Free;
except
result := False;
iniFile.Free;
exit;
end;
end;
end;
donde tu index podría ser uno fijo o adaptalar a una tabla de configuracion o como lo requieras.. yo no trabajo con Rave.. utilizo aun el quick report, ojalá te sirva
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 17:37:47.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi