La forma más sencilla es abrir el archivo en Excel y guardarlo como archivo de Paradox.
Pero si lo quieres hacer mediante un programa tienes dos opciones (entre otras seguramente). Usar las componentes de Office (en la paleta Servers) para conectarte a una hoja de Excel de donde puedes con un ciclo copiar los valores de las celdas a una tabala paradox que previamente crees con la estructura adecuada.
Un ejemplo para esto:
Código:
var
Libro: _WORKBOOK;
Hoja: _WORKSHEET;
begin
Libro := Excel.Workbooks.Open(
'tuarchivo.xls',
false,
false,
null,
'',
null,
true,
null,
'',
true,
null,
null,
false,
0
);
Hoja := Libro.Sheets[1] as _WORKSHEET;
Excel.Visible[0] := true;
donde Excel es una componente de tipo TExcelApplication.
Y accedes a las celdas con
Hoja.Cells.Item[Row, Column] (índices están basados en 1)
Así, suponiendo que tu archivo tiene dos columnas (producto y precio) te creas una tabla paradox con las correspondientes columnas y usas una componente Table conectada a ella para copiar la hoja de Excel con un ciclo:
Código:
for Row := 1 to MaxRow do
begin
Table.Append;
Table['producto'] := Hoja.Cells.Item[Row, 1];
Table['precio'] := Hoja.Cells.Item[Row, 2];
Table.Post;
end;
La otra opción es usar ADO que te permite conectarte a una hoja de Excel como si fuera una tabla en una base de datos. En
este enlace puedes encontrar un ejemplo de conección con ADO y cómo copiar con un ciclo de la tabla ADO a la tabla Paradox.
// Saludos