Категория
Информатика
Тип
реферат
Страницы
1 стр.
Дата
24.02.2008
Формат файла
.rtf — Rich Text Format (Wordpad)
Архив
18117.zip — 2.54 kb
  • vizualnoe-programmirovanie-v-delphi_18117_1.rtf — 6.07 Kb
  • Readme_docus.me.txt — 125 Bytes
Оцените работу
Хорошо  или  Плохо


Текст работы

Изучение методов визуального программирования в Delphi SDL SDL
Изучение методов визуального программирования в Delphi.
Задание: Построить графики функций ; ;
Текст программы:
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;
var
Form1: TForm1;
implementation
$R *.DFM
procedure TForm1.Button1Click(Sender: TObject);
VAR T0,TK,Q,W,Y1,Y2,Y3 :REAL;
i,H :real;
begin
Q:=StrToFloat(Edit1.);
W:=strToFloat(Edit2.);
H:=StrToFloat(Edit3.);
T0:=StrToFloat(Edit4.);
TK:=StrToFloat(Edit5.);
i:=T0;
Series1.Clear;
Series2.Clear;
Series3.Clear;
while i



Ваше мнение



CAPTCHA