Дипломная работа: База данных приёмной комиссии

begin

RvProject4.Execute;

end;

procedure TOtch.Button6Click(Sender: TObject);

begin

RvProject5.Execute;

end;

procedure TOtch.Button7Click(Sender: TObject);

begin

RvProject6.Execute;

end;

procedure TOtch.Button8Click(Sender: TObject);

begin

RvProject7.Execute;

end;

procedure TOtch.Button9Click(Sender: TObject);

begin

RvProject8.Execute;

end;

end.

Файл Unit2:

unit Unit2;

interface

uses

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

Dialogs, StdCtrls, Buttons;

type

TForm2 = class(TForm)

Label1: TLabel;