Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-11-2004
Avatar de javiermorales
javiermorales javiermorales is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 272
Poder: 21
javiermorales Va por buen camino
Export DataSet Excel D7

Buenos días a todos/as. He buscado en los foros y he encontrado varios hilos sobre la exportación directa de DataSet a Excel, pero indican unos componentes que no consigo instalar en D7.

¿Me podeis indicar una dirección donde bajar un componente para exportar la información de un DBGrid a Excel directamente y que funcione en D7?.

Y por favor, me indicais tambien la manera correcta de instalarlos.

Gracias.
__________________
Se hace lo que se puede que siempre es menos de lo que se dice
Responder Con Cita
  #2  
Antiguo 26-11-2004
Avatar de fredo
fredo fredo is offline
Miembro
 
Registrado: oct 2003
Ubicación: Chile, Valparaiso
Posts: 318
Poder: 21
fredo Va por buen camino
¿te servirar en un archiuvo csv?

Ojalá te sirva... el parametro final puedes pasarlo en blanco, sirve para agregar un resumen....

salida es un componente TSaveDialog.

Procedure TFrm_main.Exportar_Excel(XDataset:TSimpleDataSet;Final:String);
var i:Integer;
salida:TextFile;
begin
if guardar.Execute then
Begin
assignFile(salida,guardar.FileName);
Rewrite(Salida);
with XDataset do
Begin
DisableControls;
First;
for i:=0 to Fieldcount-1 do
Begin
write(salida,fields[i].fieldName+';');
end;
Writeln(Salida);
while not eof do
Begin
for i:=0 to Fieldcount-1 do
Begin
write(salida,fields[i].asstring+';');
end;
writeln(salida);
next;
end;
EnableControls;
end;
writeln(salida);
writeln(salida,Final);
CloseFile(salida);
end;
end;



Saludos
__________________
^_^

http://stna.cl
Responder Con Cita
  #3  
Antiguo 26-11-2004
Avatar de javiermorales
javiermorales javiermorales is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 272
Poder: 21
javiermorales Va por buen camino
Gracias Fredo, esta tarde lo pruebo.

Un abrazo.
__________________
Se hace lo que se puede que siempre es menos de lo que se dice
Responder Con Cita
  #4  
Antiguo 03-12-2004
Avatar de javiermorales
javiermorales javiermorales is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 272
Poder: 21
javiermorales Va por buen camino
Fredo, ha ido de maravilla. Lo he modificado sobrecargando la función para poder exportar DataSet y DBGrid. Además he hecho que se abra excel y me abra el archivo que he generado, con lo que se gana mucho en velocidad, respecto a la introducción directa de datos en excel.

Gracias.
__________________
Se hace lo que se puede que siempre es menos de lo que se dice
Responder Con Cita
  #5  
Antiguo 21-08-2007
sgarcia sgarcia is offline
Registrado
 
Registrado: ago 2005
Ubicación: Mexico DF
Posts: 5
Poder: 0
sgarcia Va por buen camino
Como paso a excel usando D7 y un TIBQuery

Saludos.
Pro favor me podrian pasar algo de codigo para poder exportar mi Qry a excel... Utilizo D7 y saco los datos de un TIBQuery, y al igual quiero que despues de guardarlo me lo despliegue en pantalla.
GRACIAS.
Responder Con Cita
Respuesta


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


La franja horaria es GMT +2. Ahora son las 18:07:50.


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