Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые проекты » Розрахунок коефіцієнта потужності випрямляча залежно від реактивного опору і ефективного значення електродвіжующей сили

Реферат Розрахунок коефіцієнта потужності випрямляча залежно від реактивного опору і ефективного значення електродвіжующей сили





s [ TmpI]);:=300;:=0; TmpI:=1 to F do:=X2 + 5 * (sgRes.ColWidths [TmpI]);:=450;:=Rect (X1, Y1, X2 - 30, Y2) ;. Canvas.Font.Style:=[fsBold] ;. Canvas.Font.Size:=7; .Canvas.TextRect (TR, X1 + 50, 350, sgRes.Cells [F, 0]) ;. Canvas.Font.Style:=[]; TmpI:=1 to sgRes.RowCount - 1 do:=150 * TmpI + 300;:=150 * (TmpI + 1) + 300;:=Rect (X1, Y1, X2 -30, Y2) ;. Canvas.TextRect (TR, X1 + 50, Y1 + 50, sgRes.Cells [F, TmpI]) ;;;. EndDoc ;;. Orientation:=OldOrientation ;; TFCalc.bbHelpClick (Sender: TObject ); (handle, nil, PChar (ExtractFilePath (ParamStr (0)) + spravkam ), nil, nil, SW_SHOW);// Виклик довідки;.

ФОРМА 3Unit3 ;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms ,, ComCtrls, StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart ,, Printers;=class (TForm): TPageControl ;: TTabSheet ;: TTabSheet ;: TTabSheet ;: TChart ;: TLineSeries ;: TLineSeries ;: TLineSeries ;: TChart ;: TLineSeries ;: TLineSeries ;: TLineSeries ;: TChart ;: TSurfaceSeries ;: TButton ;: TButton ;: TButton;:TPrintDialog; Button1Click (Sender: TObject); Button2Click (Sender: TObject); Button3Click (Sender: TObject);

{Private declarations}

{Public declarations} ;: TFCharts; Unit2, Unit1, shellapi;

{$ R * .dfm} TFCharts.Button1Click (Sender: TObject) ;; TFCharts.Button2Click (Sender: TObject); (handle, nil, PChar (ExtractFilePath (ParamStr (0)) + laquo ; spravkam ), nil, nil, SW_SHOW);// Виклик довідки; TFCharts.Button3Click (Sender: TObject) ;, pWidth: Longint ;: TPrinterOrientation ;: TChart; PrintDlg.Execute thenPageControl1.TabIndex of

: TempChart:=Chart1;

: TempChart:=Chart2;

: TempChart:=Chart3 ;;. Cursor:=crHourGlass;:=Printer.Orientation; .Orientation:=poLandScape; .BeginDoc;:=Printer.PageHeight;:=Printer.PageWidth; .PrintPartial (Rect (pWidth div 15, pHeight div 10, - (pWidth div 20), pHeight - (pHeight div 20))) ;. EndDoc; Exception do.Abort; .EndDoc ;;;. Orientation:=OldOrientation; .Cursor: =crDefault ;;.

ФОРМА 4Unit4 ;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms ,, StdCtrls, ExtCtrls, Buttons, Shellapi;=class (TForm): TGroupBox ;: TGroupBox ;: TLabel ;: TGroupBox ;: TBitBtn ;: TBitBtn ;: TTimer ;: TImage; tAnimationTimer (Sender: TObject); FormDestroy (Sender: TObject); FormShow (Sender: TObject); BitBtn2Click (Sender: TObject); BitBtn3Click (Sender: TObject);

{Private declarations}

{Public declarations} ;: TFAbout;: integer;

{$ R * .dfm} TFAbout.tAnimationTimer (Sender: TObject) ;: integer; .Canvas.Pen.Color:=clWhite; .Canvas.Rectangle (0,0, Image1. Width, Image1.Height) ;. Canvas.Pen.Color:=clBlack; .Canvas.MoveTo (0, trunc (30 * sin (y)) + 40); x:=0 to Image1.ClientWidth do//Від лівого краю до кінця форми.Canvas.LineTo (x, trunc (30 * sin (x/10 + y)) + 40);// Власне, малюємо графік;:=y + 1 ;; TFAbout.FormDestroy (Sender: TObject) ;. Enabled:=False ;; TFAbout.FormShow (Sender: TObject) ;. Enabled:=True ;; TFAbout.BitBtn2Click ( Sender: TObject); (handle, nil, PChar (ExtractFilePath (ParamStr (0)) + spravkam ), nil, nil, SW_SHOW);// Виклик довідки; TFAbout.BitBtn3Click (Sender: TObject) ;: integer; .Canvas.Pen.Color:=clBlack;// Малюємо блакитним цветом1.Canvas.MoveTo (0, 100);// Встановлюємо точку початку малювання

for x:=0 to Image1.ClientWidth do//Від лівого краю до кінця форми

begin

Image1.Canvas.LineTo (x, trunc (30 * sin (x/10)) + 40);// Власне, малюємо графік

end ;;. FormulaDLL;

{$ R * .res} Formula (k0, X, E, k, Id, Em: Real): Real; stdcall;:=((2 * sqrt (2))/(3.14 * k)) - ((2 * Em * Id * X * k0)/(3.14 * E * k))

end;

//k - відношення ефективного струму вторинної обмотки трансформатора до середнього Випрямлену току

//Em - коефіцієнт, що враховує вплив омічного падіння напруги в колі змінного струму на середнє випрямлена напруга

//Id - величина випрямленої струму

//X - (завис) реактивний опір

//k0 -отношение коефіцієнта трансформації на даному ступені регулювання до найменшого коефіцієнту трансформації, при якому виходить номінальна електрорушійна сила ходу вторинної обмотки трансформатора

//E - (завис) ефективне значення електрорушійної сили

exports Formula index 1;.


Назад | сторінка 8 з 8





Схожі реферати:

  • Реферат на тему: Визначення меж регулювання вторинної напруги холостого ходу і числа витків ...
  • Реферат на тему: Розрахунок малопотужного трансформатора однофазного струму
  • Реферат на тему: Розробка конструкції друкованого вузла блоку електронного регулювання струм ...
  • Реферат на тему: Методи збільшення коефіцієнта посилення по струму біполярного транзистора
  • Реферат на тему: Аналіз складних електричних ланцюгів постійного струму та однофазного змінн ...