Código Delphi [-]Aux.Name := 'tabAsunto'+ IntToStr(QueAsunto);
Aux.Name := 'tabAsunto'+ IntToStr(QueAsunto);