Consejo sobre excel

[[newtron]]

A ver.... empezamos desde el principio. Dices que tienes un programa, imagino que en tu programa abrirás la base de datos, insertarás registros, etc, ¿no?. ¿Qué base de datos usas? ¿de escritorio? ¿cliente/servidor? ¿qué componentes?.

[CFPA86]

Correcto Newtron, en mi programa creo, inserto y modifico registros de una b.d. (paradox 7), hasta aca todo va bien, leyendo me he enterado de los componentes ado que hacen lo que requiero insertar datos de excel. ahi esta el problema no se como usarlos.
Gracias.

[[newtron]]

No necesitas usar ado para esto, puedes usar el componente ttable e ir añadiendo registros de forma normal.

Código Delphi [-]
procedure TFormImportaExcel.NTButton1Click(Sender: TObject);
var
   appExcel : Variant;
   N, Hoja : SmallInt;
   contenido : String;
   begin
   appExcel := CreateOleObject('Excel.Application');
   appExcel.WorkBooks.Open('C:\ARCHIVO.XLS');
   Hoja:=1;
   N:=0;
   while true do begin
    if Contenido='' then break     Tabla.append;
    Inc(N);     Contenido := appExcel.WorkBooks[1].Worksheets[Hoja].Cells[N,1]; //codigo
    Tabla.FieldByname('CODIGO').AsString:=Contenido;
    Contenido := appExcel.WorkBooks[1].Worksheets[Hoja].Cells[N,2]; //Nombre
    Tabla.FieldByname('NOMBRE').AsString:=Contenido;
    // y así tantos campos como tengas por cada registro 
    Tabla.post;
   end;
   appExcel.Quit;
   appExcel := Unassigned;
 end;

[CFPA86]

Les quiero agradecer a todos y especialmente a Newtron, fue de gran ayuda tus codigos, logre resolver mi problema, respecto a el codigo (ultimo) use la libreria ComObj (no sabia) ademas las instrucciones dentro del ciclo.
if Contenido = '' then
break;
Las coloque al final del mismo ciclo, lo expreso para referencias futuras de otros usuarios.
Reitero mis agradecimientos a todos.
Chao

[alej.villa]

yo tengo un problema parecido con excel pero es mas complicado porque los datos que estan en la hoja no tienen una secuencia sino que son datos que los arroja un query de otro programa y me lo manda a excel de una manera desordenada, como puediera hacer para seleccionar solo los datos que necesito e irlos guardando en mi base de datos, Utilizo delphi 7 y motor de base MS SQL Server 2005

[[newtron]]

Si los tienes en una query es como si estuvieran en una tabla, ¿no?, es cuestión de que los vayas cogiendo de un sitio e ir poniendolos en otro. No llego a entender el problema que comentas.

[alej.villa]

he aqui el problema, los datos me los exportan desde otro programa que yo no estoy desarrollando (el programa que los exporta es macpac o algo asi) me los pasa a excel de una manera inentendible para poderlos importar a mi base de datos que esta enlazada con el programa que estoy desarrollando fijate [IMG]file:///C:/Documents%20and%20Settings/Jos%C3%A9%20Villarroel/Escritorio/Dibujo.JPG[/IMG]