Es cierto que existen componentes de pago, aunque también podrías hacer otra cosilla, fácil de implementar y posiblemente usable.
Una forma es exportarlo por CSV, es un archivo de texto con los valores separados por coma (Comma Separated Values), se abre con Excel aunque no quedará muy bonito (solo texto).
Existe otra forma (algo más compleja) pero permite añadir negritas, subrayados, formatos y recorrer la hoja de excel a voluntad.
Suponiendo que tienes una consulta (TQuery) con todos los registros, la forma fácil sería (hecha al vuelo, sin comprobar en delphi, pero creo que vá):
Código Delphi
[-]
var lista:TStringList;
fila :string;
begin
lista := TStringlist.Create;
Query1.Open;
while not Query1.eof do
begin
fila := Query1.Fields[0].AsString;
for i:= 1 to Query1.Fields.Count -2 do
fila := fila + ', ' + Query1.Fields[i].AsString;
lista.Add(fila + Query1.Fields[Query1.Fields.Count -1].AsString;
query1.Next;
end;
lista.SaveToFile('c:\mio.csv');
lista.Free;
end;
Otra forma
Exportar por componentes de
delphi.com.ar
Si tienes problemas, aquí estaremos.
Saludos