6880

Головне меню програми та MDI інтерфейс

Лабораторная работа

Информатика, кибернетика и программирование

Головне меню програми та MDI інтерфейс Хід роботи 1)Створив новий проект, додав 2 форми, розмістив необхідні компоненти на формах. Далі вказав головну батьківську форму...

Украинкский

2013-01-08

74.18 KB

2 чел.

Головне меню програми та MDI інтерфейс

Хід роботи

1)Створив новий проект, додав 2 форми, розмістив необхідні компоненти на формах.

Далі вказав головну батьківську форму:

FormStyle=fsMDIForm

та дочірню форму:

FormStyle=fsMDIChild

Project->Option->Forms

Auto-Create    Available

Form1     Form2

Form3

2)Створив головне меню MainMenu1->Items

Та для елементів меню написав такий код:

void __fastcall TForm1::New1Click(TObject *Sender)

{

TForm2(this);

}

void __fastcall TForm1::Edit1Click(TObject *Sender)

{

int m=MDIChildCount-1;

for (int i=0;i<=m;i++)

{

MDIChildren[i]->Close();

}

}

void __fastcall TForm1::About1Click(TObject *Sender)

{

Form4->Show();

}

3)Для зміни ім’я активного вікна використовував такий код:

void __fastcall TForm1::Button1Click(TObject *Sender)

{

if (MDIChildCount!=0)

{

ActiveMDIChild->Caption=Edit2->Text;

}

4) Для зміни кольору вікна, використав RadioGroup:

void __fastcall TForm1::Button2Click(TObject *Sender)

{

if (MDIChildCount!=0){

switch (RadioGroup1->ItemIndex) {

case 0: ActiveMDIChild->Color=clRed;break;

case 1: ActiveMDIChild->Color=clYellow;break;

case 2: ActiveMDIChild->Color=clGreen;break;

}

5)Для сортування вікон каскадом, по горизонталі, по вертикалі також використовував RadioGroup:

void __fastcall TForm1::Button4Click(TObject *Sender)

{

switch (RadioGroup2->ItemIndex)

{case 0:Cascade();break;

case 1:TileMode=tbVertical;Tile();break;

case 2:TileMode=tbHorizontal;Tile();break;

}

}


 

А также другие работы, которые могут Вас заинтересовать

10084. Интересы участников корпоративных отношений 9.37 KB
  Интересы участников корпоративных отношений: менеджеры индивидуальные цели например максимизация оплаты труда рост активов компании как показатель их профессиональной квалификации рост штата сотрудников и пр. работники в качестве индивидуальной цели ...
10085. Картель, Синдикат, Пул 46.25 KB
  Картель Картель объединение как правило фирм одной отрасли которые вступают между собой в соглашение касающееся различных сторон коммерческой деятельности компании соглашение о ценах о рынках сбыта объемах производства и сбыта ассортименте обмене патент
10086. Классификация слияний 95.44 KB
  Узкая специализация: McDonalds Delta Airlines CocaCola Xerox; Red Cross. Mitsubishi kitpes приблизительно = 28 компаний Mitsubishi Motors Steel Aluminum oil Electric Cement Paper Glass Nicon Bank 5ое место в мире kitpes японская модель которую применяют такие группы Co: Toyota и Toshiba Nee Nissan и Canon. Классификация сл
10087. Корпоративное управление Японии 1.97 MB
  Корпоративное управление Японии. В японских фирмах первостепенное значение придается контролю и управлению непосредственно в цехе на производственном участке. Рабочие выполняют как стандартные операции когда линия работает в обычном заданном режиме так и нес
10088. Немецкая модель корпоративного управления 452.04 KB
  Немецкая модель корпоративного управления В Европейских странах к управлению корпорацией подходят с другой стороны нежели в Америке. Поэтому организация и роль управления корпорацией в немецкой системе значительно отличается от американской системы. Рассмотрим осо...
10089. Немецкая система корпоративного управления 983.35 KB
  Немецкая система корпоративного управления. В отличие от США большая часть акционерного капитала Германии находится во владении других компаний: система взаимного участия компаний во владении акциями охватывает более половины совокупного акционерного капитала в Г...
10090. Отечественная история. Образование Древнерусского государства IX-X вв. Отечественная культура 1-й половины XIX в. 387 KB
  Отечественная история Образование Древнерусского государства IXX вв. Монголотатарское нашествие на Русь и борьба против него. Причины возвышения Московского княжества и его роль в формировании Русского централизованного государства. Внутренняя и внеш
10091. Понятие, содержание, основные механизму корпоративного управления 86.48 KB
  В США 25 млн. владеют акциями 50 млн. ценными бумагами корпораций т.е. каждый 5 чел. В Швеции каждый второй. Раздел 1. Корпоративное управление 1.1 Понятие корпоративного управления его основные элементы Corporate Governance. Корпорация объединение союз ...
10092. Промислово-фінансова група (ПФГ) 124.45 KB
  Промисловофінансова група ПФГ обєднання до якого можуть входити промислові підприємства сільськогосподарські підприємства банки наукові і проектні установи інші установи і організації всіх форм власності що мають на меті отримання прибутку і яке створюєть...