Código SQL
[-] tabla := 'T12345';
Query6.Close;
Query6.SQL.Clear;
Query6.SQL.Add('CREATE TABLE '+tabla+'(');
Query6.SQL.Add('CODIGO DOUBLE PRECISION NOT NULL,');
Query6.SQL.Add('nota SMALLINT,');
Query6.SQL.Add('INSUFICIENTE SMALLINT,');
Query6.SQL.Add('SUFICIENTE SMALLINT,');
Query6.SQL.Add('BUENO SMALLINT,');
Query6.SQL.Add('MUYBUENO SMALLINT,');
Query6.SQL.Add('total SMALLINT,');
Query6.SQL.Add('PROMEDIO DOUBLE PRECISION)');
Query6.ExecSQL;
lo puedes hacer para los para las llaves, etc.