Белгі-ленген нысан
|
Object Inspector терезесінің астары
|
Қасиеттің аты/ Оқиғаның аты
|
Атқарылатын әрекет
|
Forml
|
Properties
|
Caption
|
Пішінге «Менің мәзірім» атын орнату
|
Events
|
OnMouseDown
|
Var p:TPoint; begin
p.X :=X;
p.Y :=Y;
p := ClientToScreen (p); PopupMenu1.Popup (p.X, p.Y); end;
|
Мәзір редакторын іске қосу (пішіндегі мәзір белгісін екі рет шерту)
|
Forml.MainMenul
|
Properties (Object Inspector терезесінде ешбір нысан таңдалмаған)
|
Caption
|
Мәзір пунктіне - Файл мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N1 атын меншіктейді.
|
Мәзірдің бұрыннан бар және енді жасалған пункттерінің бірінен-біріне тышқанды шерту арқылы немесе курсорлық пернелердің көмегімен ауысуға болады.
|
Forml.MainMenul
|
Properties
|
Caption
|
Мәзір пунктіне - Шығу мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N2 атын меншіктейді.
|
Events (Мәзір жолындағы Шығу пункт-інде шерту)
|
N2Click
|
Close;
|
Файл пунктінде шертіңіз. Мәзір редакторы осы пункт ішінен тағы бір дайындама әзірлеп қойды. Бұл дайындама жұмыс істеп тұрған бағдарламаның Файл пунктін таңдаған кезде ашылатын мәзірге арналған. Дайындамаларды пайдаланып, осы мәзірден мынадай екі пункт құрыңыз: Суреттер (система оған N3 атын меншіктейді) және Шығу (N4). Мәзір редакторында Суреттер пунктін таңдап, сосын Ctrl + Оңға пернелерін бірге басыңыз.
|
N4: TMenuItem
|
Events
|
OnClick
|
Ашылатын тізімнен бұрыннан бар N2Click өңдеуіш-процедураны таңдаймыз
|
Forml.MainMenul
|
Properties
|
Caption
|
Мәзір пунктіне – Ата-ана мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N5 атын меншіктейді.
|
N5: TMenuItem
|
Events (Пішіндегі Ата-ана пунктіндегі мәзір жолынан таңдау)
|
OnClick
|
Image1.Picture.LoadFromFile('C:\Documents and Settings\М±ратбек\Мои документы\Мои рисунки\Atanam.bmp');
|
Forml.MainMenul
|
Properties
|
Caption
|
Мәзір пунктіне – АӘД сабағы мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N6 атын меншіктейді.
|
N6: TMenuItem
|
Events (АӘД сабағы пунктіндегі мәзір жолынан таңдау)
|
OnClick
|
Image1.Picture.LoadFromFile ('C:\Documents and Settings\М±ратбек\Мои документы\Мои рисунки\NvpSp1.bmp');
|
Мәзір редакторының терезесін жауып, енді мәзір жолы бағдарлама-ның бас Пішінінде пайда болатындығына көз жеткізіңіз.
|
PopupMenu
(Standard астары)
|
Properties
|
Caption
|
Мәзір пунктіне – Ата-ана мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N7 атын меншіктейді.
|
Caption
|
Мәзір пунктіне – АӘД сабағы мәтінін енгізіп, сосын Enter-ді басу. Жүйе оған N8 атын меншіктейді.
|
N7
|
Events
|
OnClick
|
Ашылатын тізімнен бұрыннан бар N5Click өңдеуіш-процедураны таңдаймыз
|
N8
|
Events
|
OnClick
|
Ашылатын тізімнен бұрыннан бар N6Click өңдеуіш-процедураны таңдаймыз
|
Image
(Additional астары)
|
Properties
|
Stretch
|
True мәнін меншіктеу
|
4. Жобаны сақтаңыз, сосын оны іске қосып, орындалуын тексеріп көріңіз.
