Дипломная работа: Автоматизация учебного процесса и составления расписания занятий в учебном заведении (на примере ОЧУ ВО "Академия МНЭП МНЭПУ")

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
89
Томский Государственный Университет Систем Управления и
Радиоэлектроники (ТУСУР). - Томск : Эль Контент, 2013.
10. Информационные технологии : учебное пособие / Федеральное
государственное автономное образовательное учреждение высшего
профессионального образования «Северо-Кавказский федеральный
университет», Министерство образования и науки Российской Федерации ;
сост. К.А. Катков, И.П. Хвостова и др. - Ставрополь : СКФУ, 2014.
11. Информационные технологии в образовании : учебное пособие / Федеральное
государственное автономное образовательное учреждение высшего
профессионального образования «Северо-Кавказский федеральный
университет», Министерство образования и науки Российской Федерации ;
сост. В.В. Журавлев. - Ставрополь : СКФУ, 2014.
12. Информационные технологии в производстве и бизнесе : учебник /
А.Г. Схиртладзе, В.Б. Моисеев, А.В. Чеканин, В.А. Чеканин ; Федеральное
государственное бюджетное образовательное учреждение высшего
профессионального образования «Пензенский государственный
технологический университет», Минобрнауки России. - Пенза : ПензГТУ,
2015.
13. Красильникова, В.А. Использование информационных и коммуникационных
технологий в образовании : учебное пособие / В.А. Красильникова. - М. :
Директ-Медиа, 2013. - 292 с.
14. Лыткина, Е.А. Применение информационных технологий : учебное пособие /
Е.А. Лыткина ; Федеральное государственное автономное образовательное
учреждение высшего профессионального образования «Северный
(Арктический) федеральный университет имени М. В. Ломоносова»,
Министерство образования и науки Российской Федерации. - Архангельск :
САФУ, 2015.
15. Майстренко, А.В. Информационные технологии в науке, образовании и
инженерной практике : учебное пособие / А.В. Майстренко, Н.В. Майстренко
; Министерство образования и науки Российской Федерации, Федеральное
государственное бюджетное образовательное учреждение высшего
90
профессионального образования «Тамбовский государственный технический
университет». - Тамбов : Издательство ФГБОУ ВПО «ТГТУ», 2014.
16. Макарова, Т.В. Компьютерные технологии в сфере визуальных
коммуникаций: работа с растровой графикой в Adobe Photoshop : учебное
пособие / Т.В. Макарова ; Федеральное государственное бюджетное
образовательное учреждение высшего образования «Омский
государственный технический университет», Минобрнауки России. - Омск :
Издательство ОмГТУ, 2015.
17. Маркин, А.В. Построение запросов и программирование на SQL : учебное
пособие / А.В. Маркин. - 3-е изд., перераб. и доп. - М. : Диалог-МИФИ, 2014.
18. Милехина, О.В. Информационные системы: теоретические предпосылки к
построению : учебное пособие / О.В. Милехина, Е.Я. Захарова, В.А. Титова ;
Министерство образования и науки Российской Федерации, Новосибирский
государственный технический университет. - 2-е изд. - Новосибирск : НГТУ,
2014.
19. Моделирование систем: Подходы и методы : учебное пособие / В.Н. Волкова,
Г.В. Горелова, В.Н. Козлов и др. ; Министерство образования и науки
Российской Федерации, Санкт-Петербургский государственный
политехнический университет. - СПб. : Издательство Политехнического
университета, 2013.
20. Технология программирования / Ю.Ю. Громов, О.Г. Иванова, М.П. Беляев,
Ю.В. Минин ; Министерство образования и науки Российской Федерации,
Федеральное государственное бюджетное образовательное учреждение
высшего профессионального образования «Тамбовский государственный
технический университет». - Тамбов : Издательство ФГБОУ ВПО «ТГТУ»,
2013.
21. Щелоков, С.А. Базы данных : учебное пособие / С.А. Щелоков ;
Министерство образования и науки Российской Федерации, Федеральное
государственное бюджетное образовательное учреждение высшего
профессионального образования «Оренбургский государственный
университет», Кафедра программного обеспечения вычислительной техники
91
и автоматизированных систем. - Оренбург : Оренбургский государственный
университет, 2014.
22. Официальный сайт ОЧУ ВО «Академия МНЭПУ», www.mnepu.ru
92
ПРИЛОЖЕНИЕ
unit ViborU;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, sButton, Grids, DBGrids, acDBGrid, Mask, sMaskEdit,
sCustomComboEdit, sTooledit, DB, IBTable, IBCustomDataSet, IBQuery,
DBCtrls, sDBLookupComboBox, sLabel,ComObj;
type
TViborF = class(TForm)
IBQuery1: TIBQuery;
DataSource1: TDataSource;
DataSource2: TDataSource;
sDateEdit1: TsDateEdit;
sDBGrid1: TsDBGrid;
sButton1: TsButton;
sDateEdit2: TsDateEdit;
sLabel1: TsLabel;
sLabel2: TsLabel;
sLabel3: TsLabel;
sDBLookupComboBox1: TsDBLookupComboBox;
IBQuery2: TIBQuery;
sLabel4: TsLabel;
sButton2: TsButton;
procedure sButton1Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure sButton2Click(Sender: TObject);
private
{ Private declarations }
93
public
{ Public declarations }
end;
var
ViborF: TViborF;
implementation
uses DMU, Main_U;
{$R *.dfm}
function StringToPWide(sStr: string; var iNewSize: integer): PWideChar;
var
pw: PWideChar;
iSize: integer;
begin
iSize := Length(sStr) + 1;
iNewSize := iSize * 2;
pw := AllocMem(iNewSize);
MultiByteToWideChar(CP_ACP, 0, PChar(sStr), iSize, pw, iNewSize);
Result := pw;
end;
procedure TViborF.sButton1Click(Sender: TObject);
begin
IBQuery1.Active:=False;
IBQuery1.ParamByName('par1').AsDate:=sDateEdit1.Date;
IBQuery1.ParamByName('par2').asDate:=sDateEdit2.Date;
Источник: https://baza.diplomsite.ru/previewfile/2352