Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Servers
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 23-09-2007
pcicom pcicom is offline
Miembro
 
Registrado: may 2003
Ubicación: MONTERREY MEXICO
Posts: 253
Poder: 24
pcicom Va por buen camino
OTRA FORMA es que CREES el XLS al vuelo como un archivo tipo HTML con extencin de EXCEL .xls, y despues lo abres..


Código PHP:
procedure SendToExcelFromHTML(aDataSet: TDataSet); 
var
  
xFile:TextFile;
  
cFile:String; 
  
I, Row: Integer; 
begin 
  cFile 
:= 'reporte.xls';
  
AssignFile(xFile,cFile);
  
writeln(xFile,'<table border=1>');
  
writeln(xFile,'<th>');
  
  for 
I := 0 to aDataSet.Fields.Count - 1 do 
    
writeln(xFile,'<td>' + aDataSet.Fields[i].DisplayLabel + '</td>'); 

  
writeln(xFile,'</th>');
 
  try 
      
aDataSet.First; 
      while 
not aDataSet.EOF do 
      
begin
        Application
.processmessagess;
        
writeln(xFile,'<tr>');

        for 
I := 0 to aDataSet.Fields.Count - 1 do 
           
writeln(xFile,'<td>' + aDataSet.Fields[i].AsString + '</td>'); 
        
aDataSet.Next; 
        
writeln(xFile,'</tr>');
        
Inc(Row); 
      
end; 
  
finally 

  end
; 

  
writeln(xFile,'</table>');
  
closeFile(xFile);
 
  
ShellExecute(Form1.Handle,nil,PChar(cFile),'','',SW_SHOWNORMAL);   
  
end; 

La cuestión es que al implementarlo demora mucho para mostrar el resultado, esto cuando el dataset es grande[/quote]

<table>
__________________
Poco ha de saber el que no pregunta.. Yo por eso soy un pregunton

Última edición por pcicom fecha: 23-09-2007 a las 16:22:22.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Alguien puede recomedar algun componente VCL para código de Barras ??? QuarkBcn Impresión 5 29-04-2007 15:07:55
Donde encuentro el codigo de CAERQUES dtomeysoto Conexión con bases de datos 6 19-05-2006 23:28:58
Ehm, alguien me puede facilitar éste código? gatsu PHP 3 09-07-2004 14:35:01
donde encuentro manuales de Kylix con codigo gaoss Lazarus, FreePascal, Kylix, etc. 0 25-03-2004 21:25:30
alguien sabe donde encuentro quickreport en delphi 7 pzala Impresión 2 30-11-2003 20:22:40


La franja horaria es GMT +2. Ahora son las 21:20:42.


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