[ApxaHGe1]

Даже при таком раскладе я получаю оверфлоу!

Код:

procedure TForm4.Button1Click(Sender: TObject);
begin
prefix:='Music';
ZTable1.TableName:=prefix;
ZTable1.Active:=True;
DataSource1.DataSet.Active:=True;
end;