Основы алгоритмизации и программирования

ГБОУ НЕФТЕкамский машиностроительный колледж Практическая работа Основы алгоритмизации и программирования"

Студент Кутузов Евгений Вячеславович Руководитель

З.Р. Салимьянова

Тема: Знакомство с Delphi.

Задача: Разработать программу пересчета длины из фунтов в килограммы.

Форма. Свойства.

Таблица 1. Свойства формы (объекта TForm)

1. Перечислить компоненты формы:

— Edit1;

— Label1, Label2;

— Button1.

2. Таблицы значений свойств компонент.

Таблица 2. Значения свойств поля ввода-редактирования (Edit1).

Таблица 3. Значения свойств полей метки 1. (Label1)

Таблица 4. Значения свойств полей метки 2. (Label2)

Таблица 5. Значения свойств командной кнопки Перерасчет. (Button1)

3. Окончательный вид формы приложения

4. Листинг главного модуля приложения

program Dduim1;

uses

Forms,

Duim1 in 'Duim1.pas' {Form1};

{$R *.res}

begin

Application.Initialize;

Application.CreateForm (TForm1, Form1);

Application.Run;

end.

5. Листинг модуля программы

unit Duim1;

interface

uses

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

Dialogs, StdCtrls;

type

TForm1 = class (TForm)

Label1: TLabel;

Button1: TButton;

Edit1: TEdit;

Label2: TLabel;

procedure Button1Click (Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1. Button1Click (Sender: TObject);

var

f, k: real;

begin

f:=StrToFloat (Edit1.Text);

k:=f*2.54;

Label2.Caption:=Edit1.Text+'дюйм/ов/а это '+

FloatToStrF (k, ffGeneral, 4,2)+' сантиметр/ов/а';

end;

end.

программирование delphi поле командный

6. Перечислить файлы с расширениями, которые образуются после сохранения проекта.

Пр1.DCU, ПР1. DFM

7. Вывод: Научилась создавать простейший проект в Delphi с использованием следующих объектов: Edit, Label, Button.