Ver Mensaje Individual
  #13  
Antiguo 04-09-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por ingabraham Ver Mensaje
deseo que al darle clic a un boton me abra la impresora para configurarla, y luego imprimir el groupbox que desee.

como lo hago???
Hola.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  prn: TPrinter;
begin
  if PrinterSetupDialog1.Execute then
  begin
    prn:= TPrinter.Create;
    try
      prn.BeginDoc;
      PrintControl(prn, GroupBox1, 100, 50);
      prn.EndDoc;
    finally
      prn.Free;
    end;
  end;
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....