Модератор: Модераторы



const
 correct = 6;
var
 wdh: integer;
...
wdh:=0;
for i:=0 to MainMenu1.Items.Count-1 do
 begin
  wdh:=wdh+Canvas.GetTextWidth(MainMenu1.Items[0].Caption)+correct; 
 end;
// на выходе wdh будет содержать примерную ширину меню


Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1