Лабораторная работа №2.

Цель работы: Изучение методов визуального программирования в Delphi.

Задание: Построить графики функций [pic]; [pic]; [pic]

Текст программы:

unit Graph;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart;

type
TForm1 = class(TForm)

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

Edit4: TEdit;

Edit5: TEdit;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Chart1: TChart;

Series1: TLineSeries;

Series2: TLineSeries;

Series3: TLineSeries;

Button1: TButton; procedure Button1Click(Sender: TObject); private

{ Private declarations } public

{ Public declarations } end;

Поделитесь этой записью или добавьте в закладки