Главная      Учебники - Разные     Лекции (разные) - часть 32

 

Поиск            

 

Лабораторная работа №1 по Delphi

 

             

Лабораторная работа №1 по Delphi

Министерство общего и профессионального образования
Владимирский Государственный Университет

Кафедра УИТЭС

Лабораторная работа №1

«Исследование характеристик феррорезонансного стабилизатора напряжения»

Выполнил: Есин Г.Н.

Принял: Галас В.П.

Владимир 2000

Цель работы: Исследование характеристик феррорезонансного стабилизатора напряжения.

Описание лабораторной установки: В лабораторной работе исследуются характеристики феррорезонансного стабилизатора, трехстержневой сердечник которого имеет воздушный зазор и набран из пластин, штампуемых из холоднокатной электротехнической стали марки Э-310. В качесве нагрузки используется реостат, расчитанный на силу тока не более 1 А. Напряжение изменяют с помощью автотрансформатора, величины и контролируют вольтметром. С помощью тумблера вольтметр может быть переключен на измерение необходимого напряжения. Тумблеры используются для подключения емкостей параллельно обмотке

  1. Сняли характеристики в режимах А, Б и В:

  1. Сняли ВАХ работы стабилизатора для трех произвольно выбранных значений нагрузки в режимах А и Б.

  1. Определили влияние величины нагрузки на эффект стабилизации:

  1. Определили влияние величины емкости на эффект стабилизации:

  1. Определили потребляемую (на входе) и полезную (на выходе) мощности стабилизатора:


Вывод: согласно предыдущей таблице КПД выше для режима Б, т.е. при включенной емкости. Следовательно, выгоднее использовать феррорезонансные стабилизаторы напряжения с емкостным фильтром.
______________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________


Схема лабораторной установки:



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


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


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


unit Unit1;


interface


uses

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

StdCtrls, ExtCtrls, Buttons;


type

TForm1 = class(TForm)

ScrollBar1: TScrollBar;

ScrollBar2: TScrollBar;

Shape1: TShape;

ColorDialog1: TColorDialog;

Panel1: TPanel;

Button1: TButton;

Button2: TButton;

ComboBox1: TComboBox;

BitBtn1: TBitBtn;

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure ComboBox1Change(Sender: TObject);

procedure ScrollBar1Change(Sender: TObject);

procedure ScrollBar2Change(Sender: TObject);

procedure BitBtn1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;


var

Form1: TForm1;


implementation


{$R *.DFM}


procedure TForm1.Button2Click(Sender: TObject);

begin

if ColorDialog1.Execute then

Form1.Color:=ColorDialog1.Color;

end;


procedure TForm1.Button1Click(Sender: TObject);

begin

if colorDialog1.Execute then

Shape1.Brush.Color:=ColorDialog1.Color;

end;


procedure TForm1.ComboBox1Change(Sender: TObject);

begin

Shape1.Shape:=TShapeType(ComboBox1.ItemIndex);

end;


procedure TForm1.ScrollBar1Change(Sender: TObject);

begin

Shape1.Width:=ScrollBar1.Position*3;

end;


procedure TForm1.ScrollBar2Change(Sender: TObject);

begin

Shape1.Height:=Scrollbar2.Position*2;

end;


procedure TForm1.BitBtn1Click(Sender: TObject);

begin

Close;

end;


end.


Внешний вид программы: