60798

Створення головного меню і контекстного меню доданку

Конспект урока

Педагогика и дидактика

Вставка в форму головного і контекстного меню об‘єкти типу MinMenu і PopupMenu. Щоб ввести назви команд головного меню форми виберітьоб‘єкт MinMenu1 і двічі клацніть на його властивості Items.

Украинкский

2014-05-21

54 KB

0 чел.

Тема:  Створення головного меню і контекстного меню доданку.

1. Вставка в форму головного і контекстного меню ( об‘єкти типу MainMenu і PopupMenu).

Компоненти MainMenu   і PopupMenu   знаходяться на закладці Standard. Розташуйте їх в довільному місці форми ( на етапі виконування програми вони будуть невидимими).

Щоб ввести назви команд головного меню форми виберітьоб‘єкт MainMenu1 і двічі клацніть на його властивості Items. Другий засіб – двічі клацніть на самому об‘єкті.

Для задання назв команд контекстного меню форми треба аналогічно змінити значення властивості Items об‘єкту PopupMenu1 або прямо в вкні Form1. MainMenu1 ввести відповідні назви в шаблонах, що з‘являються ( це порожні області на малюнку)..

2. Програмування команди «Поле виведення» в меню «Очистити».

Клацніть по команді «Очистити», а потім – «Поле виведення».

Записати команду виклику методу Clear для очищення поля виведення об‘єкту Memo1.

procedure TForm1.N5Click(Sender: TObject);

 // Тут N5 – ім‘я команди «Поле виведення»

begin

 Memo1.Clear;          // Виклик методу Clear для очищення багаторядкового поля         

                                  //     редагування   Memo1.

end;


3. Програмування команди «Поля введення» в меню «Очистити».

Клацніть по команді «Очистити», а потім – «Поля введення».

Задати компонентам Edit1.Text та Edit2.Text значення «порожній рядок» - одинарні лапки, що стоять поруч (без пробілу). Це аналог нуля для числових величин.

procedure TForm1.N4Click(Sender: TObject);

begin

 

 Edit1.Text := ‘’;

  Edit2.Text := ‘’;

end;

3. Програмування команди  «Обчислити» головного меню.

Програмний код для команди «Обчислити» взяти із попередноього віранту задачі.

4. Програмування команди  «Закрити» головного меню.

Програмний код для команди «Закрити» взяти із попередноього віранту задачі.

Інтерфейс доданку


Програмний код

procedure TForm1.N3Click(Sender: TObject);

begin

Close

end;

procedure TForm1.N1Click(Sender: TObject);

var a,b,c,S : real;

    code    : integer;

    str1     : string[10];

    str2     : string[10];

begin

Val(Edit1.Text,a,code);

Val(Edit2.Text,b,code);

c:=Sqrt(a*a+b*b);

S:=a*b/2;

Str(c:8:2,str1);

Str(S:8:2,str2);

Memo1.Lines.Add('   Гіпотенуза    '+ str1);

Memo1.Lines.Add('   Площа          '+ str2);

end;

procedure TForm1.N4Click(Sender: TObject);

begin

Edit1.Text:='';

Edit2.Text:='';

end;

procedure TForm1.N5Click(Sender: TObject);

begin

Memo1.Clear;

end;

end.


 

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

69185. Преобразователь оборотов 33 KB
  Преобразователь оборотов преобразователь предназначен для непрерывного преобразования электрического частотного сигнала датчика оборотов в пропорциональный ему выходной электрический сигнал постоянного тока 001мА. Преобразователь предназначен для работы при температуре...
69186. Измеритель осевого сдвига ротора турбины 32 KB
  Принцип действия датчика осевого сдвига ДОС ротора основан на индуктивном методе измерения линейных перемещений с применением дифференциально-трансформаторной схемы. Первичная обмотка датчика ОСР соединяется последовательно с обмоткой возбуждения компенсирующего датчика КД.
69187. Измеритель относительного расширения ротора турбины 36 KB
  Изменение выходного напряжения датчика ОРР осуществляется вторичным прибором КСД1049 и основано на компенсационном принципе измерения. Первичные обмотки датчика ОРР и дифференциально-трансформаторного датчика прибора соединяются последовательно...
69188. Измерение механических величин 46.5 KB
  Это привело к необходимости измерений основных механических величин параметров турбины: осевого сдвига; относительного расширения ротора; прогиба ротора; прослушивания уплотнений ТГ; сигнализатора валоповорота; теплового расширения корпуса турбины; измерение оборотов турбины...
69189. Измерение температуры тел по их тепловому излучению 39 KB
  Спектр электромагнитного излучения большинства твердых и жидких тел является непрерывным и содержит волны всех длин от λ=0 до λ=∞. Суммарная энергия полного излучения и энергия излучения волн определенной длины тела зависит от температуры тела.
69190. Измерение давления 59.5 KB
  Средства измерения давления в атомной энергетике составляют около половины общего количества средств измерений. На АЭС существуют специфические условия роботы приборов для измерения давления: широкий диапазон измерений 05 50 Мпа 5 500 кгс см2; высокая температура и радиационные...
69191. Электрические уровнемеры 51.5 KB
  Принцип действия этих уровнемеров основан на зависимости от уровня жидкости электрических параметров преобразователей: емкости индуктивности и активного сопротивления. Емкостной преобразователь уровня это электрический конденсатор емкость которого изменяется в зависимости...
69192. Измерение расхода жидкости, газа и пара 37.5 KB
  В соответствии с применяемыми методами измерений расхода и количества вещества измерительные приборы применяемые на АЭС разделяют на следующие группы: расходомеры постоянного перепада давления ротаметрические ; расходомеры переменного перепада давления; крыльчатые...
69193. Уровнемеры с дистанционной передачей показаний 38.5 KB
  Принцип действия: в поплавковом уровнемере чувствительный элемент это поплавок плавающий на поверхности жидкости. Поплавок перемещается в верх или в низ вместе с перемещением контролируемого уровня жидкости его перемещение передается на показывающее устройство или на преобразователь...