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.

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


 

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

44607. Методы удаленного доступа 89.5 KB
  Этот способ часто используется на мейнфреймах и миникомпьютерах но мало распространен в ЛВС. Удаленной управление remote control это метод который позволяет удаленному пользователю получить контроль над локальными ПК в ЛВС корпорации т. управлять одним из ПК в ЛВС.
44608. Совместное использование модемов 45 KB
  Естественно их сотрудники должны иметь возможность связываться со штаб-квартирой. Совместное использование модемов При выборе архитектуры построения таких систем и поддерживающих их ПО необходимо обратить внимание на возможность: поддержки Windows и конфигурации Windows NetWre; интеграции средств защиты сервера и аутенфикации в среде предприятия; способность отсеивания пользователей на уровне портов; возможность подробной регистрации статистической информации и выполняемых операций.
44609. Передача «точка-точка» 37 KB
  Передача точка-точка Технология передачи точка-точка основана на последовательной передаче данных и обеспечивает: высокоскоростную и безошибочную передачу применяя радиоканал типа точка-точка; проникновение сигнала через стены и перекрытия; скорость передачи от 12 до 384 Кбит с на расстояние до 60 м внутри здания и 550 м в условиях прямой видимости.
44610. Локальные и глобальные сети 37.5 KB
  Иногда компьютеры могут находиться на расстоянии нескольких миль и все равно принадлежать локальной сети. Компьютеры глобальной сети ГВС WN Wide re Network могут находиться в других городах или даже странах. Информация проделывает длинный путь перемещаясь в данной сети.
44611. Пакет как основная единица информации в ВС 41.5 KB
  При разбиении данных на пакеты скорость их передачи возрастает на столько что каждый компьютер сети получает возможность принимать и передавать данные практически одновременно с остальными ПК. При разбиении данных на пакеты сетевая ОС к собственно передаваемым данным добавляет специальную добавляющую информацию: заголовок в котором указывается адрес отправителя а также информация по сбору блоков данных в исходное информационное сообщение при их приеме получателем; трейлер в котором содержится информация для проверки безошибочности в...
44612. Переключение соединений 62 KB
  Различают два основных способа переключения соединений: переключение цепей каналов; переключение пакетов. Переключение цепей создает единое непрерывное соединение между двумя сетевыми устройствами. Переключение цепей.
44613. Способы организации передачи данных между ПК 80 KB
  Схему параллельного соединения можно иллюстрировать: Параллельное соединение Как видно из рисунка параллельное соединение по восьми проводам позволяет передать байт данных одновременно. Напротив последовательное соединение подразумевает передачи данных по очереди бит за битом. Соединение бывает: симплексное полудуплексное и дуплексное. О симплексном соединении говорят когда данные перемещаются только в одном направлении Полудуплексное соединение позволяет данным перемещаться в обоих направлениях но в разное время.
44614. Основные характеристики ВС 29 KB
  Основными характеристиками ВС являются: операционные возможности сети; временные характеристики; надежность; производительность; стоимость. Операционные возможности сети характеризуются такими условиями как: предоставление доступа к прикладным программным средствам БД БЗ т.; удаленный ввод заданий; передача файлов между узлами сети; доступы к удаленным файлам; выдача справок об информационных и программных ресурсах; распределенная обработка данных на нескольких ЭВМ и т. Временные характеристики сети определяют...
44615. Древний Египет 74.5 KB
  Древний Египет План Особенности развития государства и общества. Деспотия Форма государства в странах Древнего Востока. С возникновением государства обычай и стал источником права. Восточная деспотия форма государства при которой глава государства обладающий всей полнотой власти обожествляется управление осуществляется с помощью чиновников а население несет различные государственные повинности.