На нашем сайте Вы сможете найти готовые курсовые и дипломные работы по программированию
Сейчас работаем

Информационная система Университет Delphi7+Access

Задание

Разработка ИС Университет

Функционал программы

  • Ведение справочника групп, дисциплин, кафедр, преподавателей, специальностей.
  • Формирование расписание для групп университета.
  • Создание расписание на сдачу контрольных, тестов, экзаменов и т.д.

Фрагмент программного кода

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Image1: TImage;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Button4: TButton;
    Button5: TButton;
    Button6: TButton;
    Button7: TButton;
    Button8: TButton;
    Button9: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
    procedure Button5Click(Sender: TObject);
    procedure Button7Click(Sender: TObject);
    procedure Button6Click(Sender: TObject);
    procedure Button8Click(Sender: TObject);
    procedure Button9Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Close;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.Show;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Form3.Show;
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
Form4.Show;
end;

procedure TForm1.Button5Click(Sender: TObject);
begin
 Form5.Show;
end;

procedure TForm1.Button7Click(Sender: TObject);
begin
  Form6.Show;
end;

procedure TForm1.Button6Click(Sender: TObject);
begin
  Form7.Show;
end;

procedure TForm1.Button8Click(Sender: TObject);
begin
   Form8.Show;
end;

procedure TForm1.Button9Click(Sender: TObject);
begin
  Form9.Show;
end;

end.

Скриншот архива с проектом

Пояснения по запуску программы

  • Установить Аксес 2010 и выше
  • Запустить файл Project2.exe

Купить 750,00 
Сразу после оплаты Вы получите работу на электронную почту. Файлы отправляются автоматически. Исходник программ Вы сможете отредактировать, как Вам нужно.
Комментарии (0)

ramil9209

/ /

Оставить комментарий

Ты не можешь комментировать

Только зарегистрированые пользователи имеют возможность комментировать работы
Похожие работы
Другие работы автора
Новые работы
Тип Название Рейтинг Категория Стоимость
Контрольная Театр (C#, WinForms, Access) new 0 .NET (C#) 1 500,00
Исходник Автошкола (C#, WPF, SQL Server, SQLite) new 0 .NET (C#) 2 500,00
Исходник Программа Парадокс дней рождения Python new 0 Python 700,00
Исходник ИС Налогоплательщики С# + SQL Server new 0 .NET (C#) 2 500,00
Исходник Логическая игра "Бейглз" Python new 0 Python 700,00
Купить

750,00 

Сразу после оплаты Вы получите работу на электронную почту. Файлы отправляются автоматически. Исходник программ Вы сможете отредактировать, как Вам нужно.

Заказать через

Университет.zip
3560309
Оцени работу

рейтинг

Категории
Информационная система Университет Delphi7+Access
Информационная система Университет. Ведение справочника групп, дисциплин, кафедр, преподавателей, специальностей. Формирование расписание для групп университета. Создание расписание на сдачу контрольных, тестов, экзаменов и т.д.
Категория: Образование
Стоимость: 750,00