[marcoszorrilla]

Código Delphi [-]
if FileExists(cNomTemp) then
  DeleteFile(cNomTemp);

  if Not FileExists(cNomTemp) then
  begin
    Try
    DmPan.QrTemporales.Close;
    DmPan.QrTemporales.Sql.Clear;
    DmPan.QrTemporales.Sql.Add('Create Table '+QuotedStr(cNomTemp));
    DmPan.QrTemporales.Sql.Add('(');
    DmPan.QrTemporales.Sql.Add('Codigo        Char(07),');
    DmPan.QrTemporales.Sql.Add('Producto      Char(15),');
    DmPan.QrTemporales.Sql.Add('Cantidad  Numeric(10,2),');
    DmPan.QrTemporales.Sql.Add('Total     Numeric(10,2),');
    DmPan.QrTemporales.Sql.Add('Fecha              Date');
    DmPan.QrTemporales.Sql.Add(')');
    DmPan.QrTemporales.ExecSQL;
    Except
    ShowMessage('Error al crear la tabla temporal de facturas.');
    end;
   end;

Asi se crea una tabla nueva, para agregar campos no tienes más que utilizar: ALTER TABLE.

Un Saludo.