Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-08-2014
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Poder: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
principiodual,

Cita:
Empezado por principiodual
...algún ejemplo...¿Como cargar un archivo en Excel?...estoy aprendiendo con Delphi...no me gustaría instalar ninguna librería...


Revisa este información:
Espero sea útil

Nelson.
Responder Con Cita
  #2  
Antiguo 25-08-2014
principiodual principiodual is offline
Miembro
NULL
 
Registrado: ago 2014
Posts: 26
Poder: 0
principiodual Va por buen camino
Cita:
Empezado por nlsgarcia Ver Mensaje
principiodual,




Revisa este información:
Espero sea útil

Nelson.
Muchas gracias voy a chequearlo de todas maneras pero me parece haberlo revisado ya... es que tengo toda la mañana en ello. Se agradece.
Responder Con Cita
  #3  
Antiguo 25-08-2014
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Poder: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
principiodual,

Cita:
Empezado por principiodual
...voy a chequearlo de todas maneras pero me parece haberlo revisado ya...


El link sugerido en el Msg #7 y los links que este contiene, muestran ejemplos de como usar Excel desde Delphi por medio de Automatización, sin instalar ningún componente o librería adicional.

Espero sea útil

Nelson.
Responder Con Cita
  #4  
Antiguo 25-08-2014
principiodual principiodual is offline
Miembro
NULL
 
Registrado: ago 2014
Posts: 26
Poder: 0
principiodual Va por buen camino
Muchas gracias a todos, me sirvió una respuesta en código de un ejemplo del amigo nlsgarcía en un tema que me pasó, no había probado ese ejemplo por desanimo ya que tenía toda la mañana en esto, pero me anime a probar todos los códigos de los enlaces que me mandarón e inclusive reintentar con otros que ya habría probado y este fué el único que funcionó, ya por lo menos sé o tengo una idea de como trabajarlos y si es cierto Ecfisa, tengo que instalar algunos componentes, al parecer o tengo la librería que mencionaste mal o me falta instalarla...
muchas gracias a todos por comentar, seguiré investigando el resto de la semana y probando en base a este ejemplo que me funciono.
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
   Excel, WrkS, WrkB : OLEVariant;
   Row, Col : Integer;
   Rows, Cols : Integer;

begin

   Excel := CreateOleObject('Excel.Application');
   Excel.Workbooks.Open(GetCurrentDir+'\TestData.xlsx');

   WrkS := Excel.Worksheets[1];
   Cols := WrkS.UsedRange.Columns.Count;
   Rows := WrkS.UsedRange.Rows.Count;

   for Row:= 1 to StringGrid1.RowCount do
         StringGrid1.Rows[Row].Clear;

   StringGrid1.FixedRows := 1;
   StringGrid1.FixedCols := 1;
   StringGrid1.RowCount := Rows + 1;
   StringGrid1.ColCount := Cols + 1;

   for Row:= 1 to StringGrid1.RowCount do
      for Col:= 1 to StringGrid1.ColCount  do
         StringGrid1.Cells[Col,Row]:= Excel.ActiveSheet.Cells[Row,Col].Value;

   Excel.Quit;    

end;
Ya tengo un código base sobre el que puedo trabajar y es full entendible, pienso cargar lo que tenga del excel a un stringrid como el ejemplo muestra y de allí guardarlo a una base de datos en db2... ya veré como puedo hacer para que el usuario pueda cargar el archivo excel que desee mediante el objeto Opendialog...

Última edición por ecfisa fecha: 26-08-2014 a las 00:06:42. Razón: etiquetas Delphi
Responder Con Cita
  #5  
Antiguo 25-08-2014
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Poder: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
principiodual,

Cita:
Empezado por principiodual
...Ya tengo un código base sobre el que puedo trabajar...


Cita:
Empezado por principiodual
...ya veré como puedo hacer para que el usuario pueda cargar el archivo Excel que desee mediante el objeto Opendialog...


Revisa este información:
Espero sea útil

Nelson.
Responder Con Cita
  #6  
Antiguo 26-08-2014
principiodual principiodual is offline
Miembro
NULL
 
Registrado: ago 2014
Posts: 26
Poder: 0
principiodual Va por buen camino
Cita:
Empezado por nlsgarcia Ver Mensaje
principiodual,







Revisa este información:
Espero sea útil

Nelson.
ok muchas gracias, la revisaré.
Responder Con Cita
Respuesta



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
E2202 required package 'rtl' not found pnsd_89 Varios 3 17-07-2013 17:26:39
[Fatal Error] Required package 'EverButton' not found belpab Varios 3 14-12-2007 20:54:04
Required package 'Jcl' not found Cecil OOP 3 11-10-2007 21:01:43
[Fatal Error] Required package 'FreeRep6' not found yoyo12 Impresión 3 04-05-2007 14:29:44
[Fatal Error]Required package 'dcloffice2... Albis API de Windows 3 17-01-2004 19:34:55


La franja horaria es GMT +2. Ahora son las 03:50:25.


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