Hi,

там не один прикол ... , что именно ты хотел побороть ?

В IDE достаточно потягать мышь ...

Run Time :
i : integer;

BM.Categories.Insert(i,'Name Category');
или
BM.Categories.Add(''Name Category');

uB:=TdxBarButton.Create(nil); { BarMan.Owner [DX (c)] иногда глючит по освобождению ресурсов при унаследовании выше 2, лучше потом руками Free}

uB.Category:=i;
... Name, Caption, ... ets

BM.Bars[0].ItemLinks.Add().Item:=uG;

фокусировка

with BM.Bars[0].ItemLinks[0] do (BarControl as TdxBarControl).BarGetFocus(Control);

ну и
BM.Bars[0].Visible:=True;