Лабораторна робота №17 Створення підсумкового проекту

 Лабораторна робота №17  Створення підсумкового проєкту

Мета: Навчитись створювати програми мовою Delphi

Завдання 1.

Створити програму "Калькулятор", який, крім звичайних обчислень буде виконувати так звані інженерні обчислення: синуса, косинуса, інших інженерних розрахунків. На окремій вкладці калькулятора передбачити переведення таких одиниць, як метр, кілограм, вимір температури, в одиниці   США: фути (feet) й дюйми (inches) зазвичай використовуються для вимірювання висоти, довжини, ширини та відстані; на наступній вкладці передбачити  переведення у старовинні одиниці (див посилання: https://nachasi.com/city/2018/04/05/ukrayinski-tradytsijni-miry/). Передбачити ще дві вкладки переведення в інші одиниці (на самостійне опрацювання). 

Проведені розрахунки повинні виконуватись  в прямому і в зворотному порядку. Прикрасити ваші вкладки тематичними малюнками.

Оформити та продемонструвати роботу .

Додаткова інформація

Тест "Тест delphi_розробка проекту"

 Посилання 

Лекція № 32. Розробка проекту. Складання форми.

   тема розробка проекту

План

Створення інтерфейсу користувача

Принципи створення зручного інтерфейсу

Стандартні елементи інтерфейсу

Невелика палітра інструментів

Однакову відстань між елементами управління

TabOrder. "Правильний" порядок

вибір шрифтів

вибір кольорів

альтернативне управління

цеглинки інтерфейсу

Заголовок вікна (Форми)

командні кнопки

текстові написи

Меню

Лабораторна робота №16 Створення рухомих графічних примітивів

  Додаткова інформація Метод Application.ProcessMessages  

   Лабораторна робота №16  Створення рухомих графічних примітивів

Мета: Навчитись створювати -програми мовою Delphi

Завдання 1.

На Вашому попередньому малюнку (лабораторна робота 15) створити рухомий об'єкт. (Дивись приклад)

Оформити та продемонструвати роботу .

Відео: 

unit Unit1;

interface

uses

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

  Dialogs, StdCtrls, Buttons, ExtCtrls;

type

  TForm1 = class(TForm)

    Shape1: TShape;

    BitBtn1: TBitBtn;

    BitBtn2: TBitBtn;

    procedure BitBtn1Click(Sender: TObject);

    procedure FormCreate(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

  i:integer;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);

begin

   Form1.BitBtn1.Visible:=false;      //робимо кнопку старт невидимою

  for i:=0 to   (form1.clientwidth-shape1.Width) div 2 do

  // цикл до половини заданої ширини форми форми

         begin

         shape1.Visible:=false;  //фігуру зробили не видимою

         shape1.Left:=shape1.Left+1;  //змістили координату по Х

         shape1.Top:= shape1.Top -1; //змістили координату по  У

         sleep(10);             //затрика

         shape1.Visible:=true;    //фігуру зробили видимою

         application.ProcessMessages;  //метод який вимагає миттєвого виконання

        end;

        for i:=i to   form1.clientwidth-shape1.Width do

         begin

         shape1.Visible:=false;

         shape1.Left:=shape1.Left+1;

         shape1.Top:= shape1.Top +1;

         sleep(10);

         shape1.Visible:=true;

         application.ProcessMessages;

        end;

  Form1.BitBtn2.Visible:=true;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

  Form1.BitBtn2.Visible:=false;

end;

end.

Компонент Таймер, графіка в Делфі

  Текст

Програма архів
Відео (може буде корисне)

графіка в Делфі

 опрацювати інформацію: стор. 243-261 В.В.Фаронов Delphi Програмування на мові високого рівня.

procedure TForm1.Button2Click(Sender: TObject);
var
pol: array[1..3] of TPoint; // координаты точек треугольника
begin
pol[1].x :=10;
pol[1].y :=50;
pol[2].x := 40;
pol[2].y := 10;
pol[3].x := 70;
pol[3].y := 50;
Form1.Canvas.Polygon(pol);
end;

Лабораторна робота №15 Створення графічних примітивів

 Лабораторна робота №15  Створення графічних примітивів

Мета: Навчитись створювати програми мовою Delphi

Завдання 1.

Встановити компонент часу, дві кнопки Пуск та Стоп та виведення часу на екран. 

Завдання 2.

Створити програму, яка можливостями мови створить малюнок. 

Завдання 3.

Виконати підпис малюнка (ПРІЗВИЩЕ)  за допомогою графічних примітивів. 

Оформити та продемонструвати роботу.