[davidsolo]

al final realice esto "archivo .txt":

Código SQL [-]
(
    id_local        varchar(1)    not null,                
    id_prod            integer        not null,        
    id_mcodbarra        varchar(20)    not null,
    descprod        varchar(60)    not null,
    precio_vta_detalle    integer        not null,
    cantidad_escala1    integer        not null,
    precio_vta_escala1    integer        not null,
    cantidad_escala2    integer        not null,
    precio_vta_escala2    integer        not null,
    cantidad_escala3    integer     not null,
    precio_vta_escala3    integer        not null,    
    p_vta_d_neto        integer        not null,
    p_escala_1_neto        integer        not null,    
    p_escala_2_neto        integer        not null,
    p_escala_3_neto        integer        not null,
    cantidad_escala4    integer        not null,
    precio_vta_escala4    integer        not null,
    cantidad_escala5    integer        not null,
    precio_vta_escala5    integer        not null,    
    capacidad        integer        not null,
    id_lista        integer        not null,
    fecha_cambio        varchar(40)    not null,        
    usuario            varchar(30)    not null,
    equipo            varchar(30)    not null,
    usuario_actualizacion    varchar(30)    not null,
    equipo_actualizacion    varchar(30)    not null,
    flag            varchar(2)    not null,
       primary key (id_prod,id_mcodbarra)
)
engine=innodb;

y en delphi

Código Delphi [-]
procedure TFichaCreaTabla.Button1Click(Sender: TObject);
var F: TextFile;
    sLinea: String;
begin
  AssignFile( F, ExtractFilePath( Application.ExeName ) + 'tabla.txt' );
  Reset( F );
  DM.miSQL.Close;
  DM.miSQL.SQL.Clear;
  DM.miSQL.SQL.Add('create table if not exists ' + edit1.Text + ' ');
  while not Eof( F ) do
  begin
    ReadLn( F, sLinea );
    DM.miSQL.SQL.Add( sLinea );
  end;
  DM.miSQL.ExecSQL;
  CloseFile( F );
end;

y resulto...pero ahora voy por la propuesta de delphi.com.ar...