Программа

[Нюська-дуська]

Нужна программа демонстрирующая применение компонента MainMenu и PrograssBar

[AlDelta]

А мне нужна квартира. Что будем делать?

[phomm]

с квартирой не помогу.. самому нужна )) да и в Тюмень точно не вариант переезжать..

а вот с кодом помогу маленько: кидайте на форму компонент маинменю и програссбар, в маинменю создайте пункт mi1 а прогрессбар назовите pb1, нажмите на пункт меню двойным щелчком, появится заготовка кода , и Вам нужно будет добиться следующего:

procedure TForm1.mi1Click(Sender: TObject);
begin
pb1.Position := pb1.Position+1;
end;

всё, комплилируйте и жмите пункт меню