Модератор: Модераторы
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 будет содержать примерную ширину меню
Сейчас этот форум просматривают: Yandex [Bot] и гости: 22