Дипломная работа: Автоматизация процесса контроля знаний учащихся ГБОУ города Москвы школы №656 А.С. Макаренко

Скачать

Заказать новую работу

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
168
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 241
Height = 311
Align = alLeft
Caption = #1042#1086#1087#1088#1086#1089#1099
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
object DBGridQuest: TDBGrid
Left = 2
Top = 15
Width = 237
Height = 294
Align = alClient
DataSource = DSQuest
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines,
dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = [fsBold]
Columns = <
item
Expanded = False
FieldName = 'Name'
Title.Caption = #1058#1077#1084#1072
Width = 214
Visible = True
169
end>
end
end
object ActionList1: TActionList
Left = 152
Top = 104
object ActionAdd: TAction
Category = 'Edit'
Caption = #1044#1086#1073#1072#1074#1080#1090#1100
Hint = #1044#1086#1073#1072#1074#1080#1090#1100
OnExecute = ActionAddExecute
end
object ActionEdit: TAction
Category = 'Edit'
Caption = #1048#1079#1084#1077#1085#1080#1090#1100
Hint = #1048#1079#1084#1077#1085#1080#1090#1100
OnExecute = ActionEditExecute
end
object ActionDel: TAction
Category = 'Edit'
Caption = #1059#1076#1072#1083#1080#1090#1100
Hint = #1059#1076#1072#1083#1080#1090#1100
OnExecute = ActionDelExecute
end
object ActionClose: TAction
Category = 'Edit'
Caption = #1047#1072#1082#1088#1099#1090#1100
Hint = #1047#1072#1082#1088#1099#1090#1100
OnExecute = ActionCloseExecute
end
object ActionImageAdd: TAction
Category = 'Edit'
Caption = #1044#1086#1073#1072#1074#1080#1090#1100'
'#1082#1072#1088#1090#1080#1085#1082#1091
Hint = #1044#1086#1073#1072#1074#1080#1090#1100'
'#1082#1072#1088#1090#1080#1085#1082#1091
OnExecute = ActionImageAddExecute
end
object ActionImageDel: TAction
Category = 'Edit'
Caption = #1059#1073#1088#1072#1090#1100'
'#1082#1072#1088#1090#1080#1085#1082#1091
Hint = #1059#1073#1088#1072#1090#1100'
'#1082#1072#1088#1090#1080#1085#1082#1091
170
OnExecute = ActionImageDelExecute
end
end
object QQuest: TQuery
AfterScroll = QQuestAfterScroll
DatabaseName = 'Test'
SQL.Strings = (
'select * from Quest order by Name')
Left = 104
Top = 184
end
object DSQuest: TDataSource
DataSet = QQuest
Left = 136
Top = 184
end
object OpenPictureDialog1: TOpenPictureDialog
DefaultExt = '*.jpg'
Filter =
'All (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg|JPEG Ima' +
'ge File (*.jpg)|*.jpg'
Left = 248
Top = 272
end
object TableQuest: TTable
DatabaseName = 'Test'
TableName = 'quest.DB'
Left = 104
Top = 120
end
end
UnitMain
object FQuest: TFQuest
Left = 208
Top = 230
Hint = #1042#1086#1087#1088#1086#1089#1099
BorderStyle = bsDialog
Caption = #1042#1086#1087#1088#1086#1089#1099
ClientHeight = 330
ClientWidth = 696
Color = clBtnFace
171
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
ShowHint = True
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object StatusBar1: TStatusBar
Left = 0
Top = 311
Width = 696
Height = 19
Panels = <>
SimplePanel = False
end
object Panel2: TPanel
Left = 241
Top = 0
Width = 455
Height = 311
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel4: TPanel
Left = 0
Top = 265
Width = 455
Height = 46
Align = alClient
BevelInner = bvLowered
TabOrder = 0
object BitBtn4: TBitBtn
Left = 339
Top = 9
Width = 99
Height = 25
Action = ActionClose
Cancel = True
Caption = #1047#1072#1082#1088#1099#1090#1100
Font.Charset = DEFAULT_CHARSET
172
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ModalResult = 1
ParentFont = False
TabOrder = 0
Glyph.Data = {
66010000424D6601000000000000760000002800000018000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888000088888000088888888888888888000EEE0FFFF8888888
888000EEEEEE0000F88888800080EEEEEEEE0000F88888888880EEEEEEEE0000
F88888888880EEEEEEEE0000F88888888880EEEEE60E0000F88888888880EEEE
6B6E0000F88888888880EEEEEEEE0000F88888888880E66666EE0000F8888888
8880E6BBB6EE0000F88888888880E6BBB6EE0000F88888888880E6BBB6EE0000
F88888888880E66BB6EE0000F88888888880EEE666EE0000F8888880008000EE
EEEE0000F8888888888888000EEE0000F8888888800008888000088888888888
88888888888888888888}
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 455
Height = 265
Align = alTop
Caption = #1042#1086#1087#1088#1086#1089
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Источник: https://baza.diplomsite.ru/previewfile/2090

Смотрите также:

17. Введение 18. Линейные программы 19. Ветвления 20. Программирование циклических алгоритмов
_-___-~1
_3 тема - Диффузия
_Роджерс Карл, Брак и его альтернативы
- Программа ГПИ
'Заповит' Рейнгольда Глиэра: стилистические особенности
'Просвещенный абсолютизм' Екатерины II и его влияние на развитие русской культуры
'Создание и продвижение интернет - платформы реферальной системы' на примере компании Бартер–кард
«Методы учета затрат на производство продукции, работ, услуг»Курсовая работа
«Теория человеческих потребностей Маслоу»