Введение в программирование. Pascal и Delphi. Гурьянов Л.В - 173 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

172
ПРИЛОЖЕНИЕ Б
Тексты файлов ProjectCalc.dpr и UnitCalc.pas
Файл ProjectCalc.dpr
program ProjectCalc;
uses
Forms,
UnitCalc in 'UnitCalc.pas' {CalcForm};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TCalcForm, CalcForm);
Application.Run;
end.
Файл UnitCalc.pas
unit CalcUnit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls,
Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TCalcForm = class(TForm)
EditOperand1: TEdit;
EditOperand2: TEdit;
EditResult: TEdit;
OperatorLabel: TLabel;
ResultLabel: TLabel; 
                                            ПРИЛОЖЕНИЕ Б
       Тексты файлов ProjectCalc.dpr и UnitCalc.pas

  Файл ProjectCalc.dpr
  program ProjectCalc;

  uses
   Forms,
   UnitCalc in 'UnitCalc.pas' {CalcForm};

  {$R *.RES}

  begin
   Application.Initialize;
   Application.CreateForm(TCalcForm, CalcForm);
   Application.Run;
  end.

  Файл UnitCalc.pas

  unit CalcUnit;

  interface

   uses
    Windows, Messages, SysUtils, Classes, Graphics, Controls,
Forms, Dialogs,
    StdCtrls, ExtCtrls;

  type
   TCalcForm = class(TForm)
    EditOperand1: TEdit;
    EditOperand2: TEdit;
    EditResult: TEdit;
    OperatorLabel: TLabel;
    ResultLabel: TLabel;


                               172

Страницы