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.

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


 

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

24880. Гудвилл: трактовка, оценка, отражение в отчётности 30.5 KB
  Применительно к бизнесу гудвилл это положительное отношение потребителя товаров или услуг к их производителю обусловленное высоким качеством предлагаемых товаров услуг удобным месторасположением предприятия качественным обслуживанием.В приложении к конкретном предприятию принято выделять два вида гудвилла внутренне созданный и приобретенный. Любое спешно функционирующее предприятие должно иметь положительный внутренний гудвилл.
24881. Дивидендная политика и её влияние на рыночную капитализацию компании 35.5 KB
  Модильяни и Миллер исследовали взаимосвязь дивидендной политики и стоимости предприятия в идеальных условиях. Поэтому на совершенном рынке дивидендная политика не влияет на стоимость предприятия и благосостояние собственников. Преимущества: наличие непосредственно взаимосвязи дивидендных выплат с финансовым результатом деятельности предприятия.
24882. Доходный подход в оценке стоимости бизнеса 27.5 KB
  В рамках данного подхода стоимость предприятия рассматривается как текущая стоимость будущих доходов которые предприятие способно принести своему владельцу. В качестве показателей доходов в расчетах могут использоваться следующие показатели: прибыль; дивидендные выплаты; денежные потоки; экономическая добавленная стоимость и другие. Мостаточная стоимость.
24883. Интеллектуальные ресурсы. Амортизация интеллектуальных ресурсов 28.5 KB
  Амортизация интеллектуальных ресов. Амортизация интеллектуальных ресурсов. Нематериальные активы стоимость которых уменьшается с течением времени и амортизация по ним начисляется исходя из срока их полезного использования. Нематериальные активы по котором не проводится погашение стоимости и амортизация не начисляется.
24884. Интеллектуальная собственность. Оценка и нормативно-правовая база 28 KB
  Понятие интеллектуальная собственность определено международным правовым актом т. В конвенции дана следующая формулировка интеллектуальной собственности Интеллектуальная собственность включает права относящиеся к: Литературным художественным и научным произведениям. В соответствии с ГК РФ интеллектуальная собственность определена как самостоятельный объект гражданских прав по которым установлен жесткий режим защиты.
24885. Использование САРМ в оценке финансовых активов 27.5 KB
  Кs = Кrf Км Кrf β Кs цена обыкновенных акций как источник финансирования. Кrf безрисковая доходность ценных бумаг. Км Кrf рыночная премия за риск.
24886. Ключевые факторы в управлении стоимостью 30.5 KB
  Назовем их ключевыми факторами стоимости. Вовторых именно эти факторы стоимости помогают менеджерам высшего эшелона понять что происходит на всех остальных уровнях организации и донести до них свои планы и намерения. Фактор создания стоимости в данном случае это некая характеристика деятельности от которой зависит результативность функционирования предприятия. Для правильного определения факторов создания стоимости требуется соблюдать три важных принципа: 1.
24887. Модель стоимостных цепочек для бизнес - процессов 27 KB
  Нр связь с поставщиками поставщ поставщиков1 технологич цепочка сырье исследовя произвво маркетинг реализя обслуже 2 связь м у цепочк производствх подразделий №1№2 Минусолм явл то что необход очень большая инфо и учетная база поэтому не получило распр на практике.
24888. Опционы подходы оценке стоимости бизнеса 32 KB
  Существует два стиля опционов два подхода к вопросу о сроке действия опциона: европейский и американский. Европейский стиль означает что опцион может быть использован только на фиксированную дату.Американский стиль означает что опцион может быть использован в любой момент в пределах срока опциона.