Ver Mensaje Individual
  #4  
Antiguo 12-01-2009
Avatar de Kipow
Kipow Kipow is offline
Miembro
 
Registrado: abr 2006
Ubicación: Guatemala
Posts: 329
Reputación: 21
Kipow Va por buen camino
Código Delphi [-]
try    
   qryDatos.DisableControls;    
   imprimirbtn.enabled := false;    
   Application.CreateForm(Tf_Reporte, f_Reporte);    
   f_reporte.RepListas.Prepare;    
   f_reporte.RepListas.Preview;     
finally    
   qrydatos.EnableControls;    
   imprimirbtn.enabled := true; 
end;


Responder Con Cita