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.

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


 

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

35005. Экономические функции, государства 31 KB
  Государство берет на себя задачу обеспечения правовой базою и некоторых важнейших услуг являющихся предпосылкой эффективного функционирования рыночной экономики. Государство устанавливает также законные правила игры регулирующие отношения между предприятиями поставщиками ресурсов и потребителями. Основные услуги обеспечиваемые государством включают применение полицейских сил для поддержания общественного порядка введение стандартов измерения веса и качества продуктов создание денежной системы облегчающей Обмен товаров и услуг....
35006. Методы воздействия государства на экономику 29.5 KB
  Государственное регулирование это форма целенаправленного воздействия государства на функционирующую экономическую систему с целью обеспечения пли поддержания определенных процессов изменений экономических явлений или их связей. В развитых странах есть два пути сокращения государственных расходов: уменьшение расточительства государственных органов и сужение сферы деятельности государства. Другая форма денежнокредитных отношений активное участие государства в операциях на рынке ценных бумаг с целью регулирования количества обращающихся...
35007. Роль, макроэкономических показателей 33.5 KB
  В мире успешно функционирует система национальных счетов СНС приспособленная к условиям рыночной экономики. В тот период она была связана прежде всего с обслуживанием интересов органов государственного уиравления а сегодня СНС проникла во все сферы экономической и общественнополитической жизни общества. В феврале 1993 года на очередной сессии Статистической комиссии ООН в НьюЙорке была принята новая усовершенствованная СНС. В конце 1992 года Верховный Совет Российской Федерации одобрил государственную программу перехода...
35008. ВНП и его расчет по доходам и расходам 35.5 KB
  При расчете ВНП учитывается только рыночная стоимость конечных продуктов и исключается промежуточная продукция. Поскольку в стоимость конечных продуктов входят все уже имевшие место промежуточные сделки покупка покрышек ткани производителями конечной продукции то отдельный учет промежуточной продукции означал бы двойной счет и завышенную оценку ВНП. Следует подчеркнуть одну из особенностей ВНП: он измеряет стоимость продукции произведенной факторами производства находящимися в собственности граждан данной страны даже если они живут...
35009. ВНП 31.5 KB
  Различают индекс потребительских цен ИПЦ и индекс цен ВНП или дефлятор ВНП который отражает не только цены потребительских товаров и услуг но и инвестиционных товаров. Дефлятор ВНП помогает проводить корректировку объема ВНП за определенное время измерять рост его реального объема по сравнению с номинальным. Номинальный ВНП измеряется в текущих ценах реальный в постоянных базовых ценах.
35010. Экономический цикл 26.5 KB
  Развитие экономики в режиме циклических колебаний прослеживается уже более 170 лет. Период движения экономики от одного кризиса к другому называется экономическим циклом. Вместе с тем подъем выводящий экономику на новый уровень в ее поступательном развитии заканчивается новой бездной краха Для сглаживания пиков экономической конъюнктуры государство использует разнообразные экономические инструментарии от льгот по налогообложению доходов до прямых вложений государственных средств в развитие экономики. Несмотря на определенные успехи...
35011. Безработица как макроэкономическая проблема 25.5 KB
  Отметим следующие виды безработицы: Фрикционная безработица порождена постоянным движением населения из одного региона в другой от профессии к профессии сменой этапов жизни учеба работа рождение ребенка и т. Технологическая безработица связана с внедрением в массовое производство достижений НТР. Структурная безработица вызвана масштабными структурными преобразованиями в экономике и невозможностью трудоустроиться изза несовпадения структуры спроса и предложения рабочей силы различной квалификации.
35012. Экономические издержки безработицы 28.5 KB
  По свидетельству американских специалистов потеря работы связана с психической травмой уступающей по уровню стресса только смерти ближайшего родственника или заключению в тюрьму. Это нормально если часть людей не работает потому что вынуждены поменять профессию или место работы. Меры государственной поддержки безработных сводятся к двум основным направлениям: социальной защите людей оставшихся без работы и содействие трудоустройству. Как правило его получают лица зарегистрированные на бирже труда имеющие стаж работы и вносившие...
35013. Естественный уровень безработицы 24.5 KB
  Это нормально если часть людей не работает потому что вынуждены поменять профессию или место работы. Меры государственной поддержки безработных сводятся к двум основным направлениям: социальной защите людей оставшихся без работы и содействие трудоустройству. Как правило его получают лица зарегистрированные на бирже труда имеющие стаж работы и вносившие определенное время взносы в фонд занятости. Биржи ведут учет свободных рабочих мест и граждан обращающихся по вопросам трудоустройства информируют граждан и работодателей...