Предыдущая страница реферата | 4  5  6  7  8  9  10  11  12  13  14 | Следующая страница реферата

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

Dialogs, StdCtrls, Grids, Menus;

type

TForm2 = class(TForm)

Label3: TLabel;

Button1: TButton;

Label5: TLabel;

MainMenu1: TMainMenu;

N1: TMenuItem;

N4: TMenuItem;

N2: TMenuItem;

StringGrid1: TStringGrid;

Label1: TLabel;

Button2: TButton; procedure Button1OnClick(Sender: TObject); procedure Button2OnClick(Sender: TObject); procedure N4Click(Sender: TObject); procedure N2Click(Sender: TObject); procedure StringGrid1KeyPress(Sender: TObject; var Key: Char);

private

{ Private declarations } public

{ Public declarations } end;

var

Form2: TForm2;

I, J: Integer;

implementation

uses Unit1, Unit6, Unit3;

{$R *.dfm}

procedure TForm2.N4Click(Sender: TObject); begin close;

Form1.Close; end;

Рекомендуем скачать другие рефераты по теме: баллов рефераты, 7 ответов.



Предыдущая страница реферата | 4  5  6  7  8  9  10  11  12  13  14 | Следующая страница реферата

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