42591

При натисненні на кнопку 1 змінити написання тексту деякої мітки (встановити атрібути курсив та підкреслений)

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

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

Розмістити на формі необхідні для виконання індивідуального завдання компоненти TEdit TLbel TButton. Програмний код: unit lb1; interfce uses Windows Messges SysUtils Vrints Clsses Grphics Controls Forms Dilogs StdCtrls; type TForm1 = clssTForm Button1: TButton; Button2: TButton; Edit1: TEdit; Lbel1: TLbel; procedure Button1ClickSender: TObject; procedure Button2ClickSender: TObject; privte { Privte declrtions } public { Public declrtions } end; vr Form1: TForm1;...

Украинкский

2013-10-30

66.5 KB

1 чел.

Міністерство освіти і науки, молоді та спорту України

Київська державна академія водного транспорту імені гетьмана Петра Коношевича-Сагайдачного

Звіт

По виконанню лабораторної роботи №1

З дисципліни «Основи програмування»

Виконав:

Студент І курсу

спеціальності «Програмна інженерія»

групи 1119

Харлим Сергій

Київ 2012

Завдання

1. Створити новий проект з одним головним вікном: FileNewApplication.

2. Зберігти файл проекту та файл модуля у власній директорії: FileSave Project As…

3. Змінити зовнішній вигляд форми за власним смаком:

  •  В заголовок форми додати назву групи, номер варіанту, власне прізвище та ініціали.
  •  Змінити розміри, колір та піктограму форми.

4. Розмістити на формі необхідні для виконання індивідуального завдання компоненти (TEdit, TLabel, TButton).

5. При створенні форми в мітці 1 вивести текст індивідуального завдання.

6. В редакторі коду написати необхідні процедури обробки подій, які б забезпечували необхідну функціональність додатку.

Індивідуальне завдання

15

При натисненні на кнопку 1 змінити написання тексту деякої мітки (встановити атрібути курсив та підкреслений). При натисненні на кнопку 2 в полі компоненту Edit1 вивести своє ім’я.

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

unit laba1;

interface

uses

 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

 Dialogs, StdCtrls;

type

 TForm1 = class(TForm)

   Button1: TButton;

   Button2: TButton;

   Edit1: TEdit;

   Label1: TLabel;

   procedure Button1Click(Sender: TObject);

   procedure Button2Click(Sender: TObject);

 private

   { Private declarations }

 public

   { Public declarations }

 end;

var

 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

  Label1.Caption:='Text';

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

  Label1.Caption:=Edit1.Text;

end;

end.

Результати роботи програми:


 

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

12844. День рыцарства 32 KB
  День рыцарства Период смены: основной. Возраст детей: все отряды за исключением возможно самого младшего Колво детей: участвует равное колво мальчиков и девочек. Продолжительность: 6080 мин. Оборудование: цветная бумага ножницы стулья кегли или кубики20 фломастеров
12845. Девятилетние принцессы. ОД предназначено для дня девочек 26.5 KB
  Девятилетние принцессы Период смены: основной ОД предназначено для дня девочек или чегото в этом родеВозраст: младшие отряды34 Количество детей: все девочки отряда мальчики – жюри Продолжительность: 15 часаМесто проведения: отрядное местоОборудование: незаполненн...
12846. ДЕВЯТИЛЕТНИЕ КАПИТАНЫ. СЦЕНАРИЙ ДНЯ РОЖДЕНИЯ В ЛАГЕРЕ 31.5 KB
  ДЕВЯТИЛЕТНИЕ КАПИТАНЫ. СЦЕНАРИЙ ДНЯ РОЖДЕНИЯ В ЛАГЕРЕ. Период смены: день рождения ребенка Возраст: Праздник проводится для детей 812 лет. Количество детей: в празднике участвует весь отряд Продолжительность: 152 часа возможно разделение на 2 блока: до и после обеда Место
12847. ИГРА «ДВА КОРАБЛЯ» 27.5 KB
  ИГРА ДВА КОРАБЛЯ ПЕРИОД СМЕНЫ: основной. ВОЗРАСТ: старшие отряды. КОЛИЧЕСТВО ДЕТЕЙ: в идеале 2 команды по 10 человек остальные дети – жюри если отряд большой число участников можно увеличить. ПРОДОЛЖИТЕЛЬНОСТЬ: 1час. МЕСТО ПРОВЕДЕНИЯ: отрядное место или люба
12848. ГЕРБЫ 20.5 KB
  ГЕРБЫ. Задача: познакомить детей. Период смены: орг. период. Возраст детей: старший отряд. Продолжительность: 3050 минут. Количество детей: весь отряд. Место проведения: отрядное место. Оборудование: бумага карандаши. Раздаем гербы. Их запоминае...
12849. ГАЗЕТА 23 KB
  ГАЗЕТА. Задачи: сплочение коллектива развитие творческой сообразительности показать детям то что они должны искать в окружающей жизни больше положительных моментов в отличии от современных СМИ которые освещают слишком много негативного. Период смены: серед
12850. ВЫДУМАННЫЙ ПОРТРЕТ 20.5 KB
  ВЫДУМАННЫЙ ПОРТРЕТ. Задача: познакомить детей друг с другом. Период смены: орг. период. Возраст детей: с 10 лет. Продолжительность: 4060 минут. Количество детей: весь отряд. Место проведения: отрядное место. Оборудование: инструмент сигнал которого обозначает н
12851. Ассоциации отрядное дело. Развитие ассоциативного мышления 20.5 KB
  АССОЦИАЦИИ. Задачи: развитие ассоциативного мышления. Период смены: вторая половина основного периода. Возраст детей: от 12 лет. Продолжительность: от 30 минут. Количество детей: весь отряд. Место проведения: отрядное место. Оборудование: Сначала во...
12852. Анкета отрядное дело. Знакомство детей в пионерлагере 23.5 KB
  АНКЕТА. Задачи: познакомить детей Период смены: орг. период. Возраст детей: до 11 лет. Продолжительность: от 1 часа до . Количество детей: весь отряд. Место проведения: отрядное место. Оборудование: анкеты на каждого ребёнка листы бумаги А5. Вожатый раз...