Приложение "ARM продавца офисной техники" в среде Delphi 7+ Microsoft Access 2016
object Form1: TForm1 Left = 578 Top = 173 Width = 544 Height = 488 Caption = #1040#1056#1052' '#1087#1088#1086#1076#1072#1074#1094#1072' '#1086#1092#1080#1089#1085#1086#1081' '#1090#1077#1093#1085#1080#1082#1080 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 16 Width = 82 Height = 18 Caption = #1058#1080#1087' '#1090#1077#1093#1085#1080#1082#1080 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 16 Top = 80 Width = 105 Height = 18 Caption = #1052#1072#1088#1082#1072' '#1090#1077#1093#1085#1080#1082#1080 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 16 Top = 142 Width = 164 Height = 18 Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1090#1086#1074#1072#1088#1072 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 16 Top = 320 Width = 59 Height = 18 Caption = #1050#1086#1088#1079#1080#1085#1072 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label14: TLabel Left = 16 Top = 264 Width = 135 Height = 16 Caption = #1042#1074#1077#1076#1080#1090#1077' '#1085#1086#1084#1077#1088' '#1090#1086#1074#1072#1088#1072 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False WordWrap = True end object GroupBox5: TGroupBox Left = 240 Top = 16 Width = 273 Height = 393 Caption = #1054#1090#1076#1077#1083' '#1079#1072#1082#1072#1079#1072 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 10 end object GroupBox1: TGroupBox Left = 256 Top = 40 Width = 241 Height = 129 Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103' '#1086' '#1087#1086#1082#1091#1087#1072#1090#1077#1083#1077 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 object Label3: TLabel Left = 16 Top = 26 Width = 30 Height = 16 Caption = #1060#1048#1054 end object Label4: TLabel Left = 16 Top = 58 Width = 50 Height = 16 Caption = #1058#1077#1083#1077#1092#1086#1085 end object Label5: TLabel Left = 17 Top = 93 Width = 38 Height = 16 Caption = #1040#1076#1088#1077#1089 end object Edit1: TEdit Left = 104 Top = 23 Width = 121 Height = 24 TabOrder = 0 end object Edit2: TEdit Left = 104 Top = 55 Width = 121 Height = 24 TabOrder = 1 end object Edit3: TEdit Left = 104 Top = 91 Width = 121 Height = 24 TabOrder = 2 end end object RadioGroup1: TRadioGroup Left = 256 Top = 184 Width = 241 Height = 129 Caption = #1058#1080#1087' '#1076#1086#1089#1090#1072#1074#1082#1080 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemIndex = 0 Items.Strings = ( #1057' '#1076#1086#1089#1090#1072#1074#1082#1086#1081' '#1085#1072' '#1076#1086#1084 #1044#1086#1089#1090#1072#1074#1082#1072' '#1087#1086#1095#1090#1086#1081 #1041#1077#1079' '#1076#1086#1089#1090#1072#1074#1082#1080) ParentFont = False TabOrder = 0 end object Button1: TButton Left = 368 Top = 349 Width = 128 Height = 36 Caption = #1054#1092#1086#1088#1084#1080#1090#1100' '#1079#1072#1082#1072#1079 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = Button1Click end object Memo1: TMemo Left = 16 Top = 168 Width = 201 Height = 55 Alignment = taCenter Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 3 end object Button3: TButton Left = 120 Top = 289 Width = 99 Height = 25 Caption = #1042' '#1082#1086#1088#1079#1080#1085#1091 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = Button3Click end object Memo3: TMemo Left = 15 Top = 344 Width = 185 Height = 56 Alignment = taCenter Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 5 end object Button4: TButton Left = 199 Top = 342 Width = 25 Height = 25 Caption = '-' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = Button4Click end object ComboBox1: TComboBox Left = 16 Top = 40 Width = 201 Height = 24 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 7 OnChange = ComboBox1Change Items.Strings = ( #1053#1086#1091#1090#1073#1091#1082#1080 #1059#1083#1100#1090#1088#1072#1073#1091#1082#1080 #1058#1077#1083#1077#1092#1086#1085#1099 #1055#1083#1072#1085#1096#1077#1090#1099) end object ComboBox2: TComboBox Left = 16 Top = 104 Width = 201 Height = 24 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 8 OnChange = ComboBox2Change end object Edit4: TEdit Left = 18 Top = 288 Width = 49 Height = 25 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 9 end object XPManifest1: TXPManifest Left = 208 Top = 384 end object MainMenu1: TMainMenu Left = 208 Top = 8 object N1: TMenuItem Caption = #1052#1077#1085#1102 object N2: TMenuItem Caption = #1042#1089#1077' '#1079#1072#1082#1072#1079#1099 OnClick = N2Click end object N3: TMenuItem Caption = #1042#1099#1093#1086#1076 OnClick = N3Click end end end end
1. Архангельский А.Я. Программирование в Delphi 7. - М.: ЗАО «Издательство Бином-Пресс», 2003. — 1152 с.: ил.
2. Фаронов В.В. Программирование баз данных в Delphi 7. Издательство: Питер ISBN: 978-5-318-00100-9
3. Дарахвелидзе П.Г., Марков Е.П. Delphi - среда визуального программирования: - СПб.: BHV - Санкт-Петербург, 1996. - 352с.
4. Гофман В.Э., Хомоненко А.Д. Delphi. Быстрый старт. - СПб.: БХВ - Санкт-Петербург, 2002. - 208с.: ил. (ч/з ПаУ)
5. Бобровский С.И. Delphi 7. Учебный курс СПб.: Питер, 2004. — 736 с.
6. В. Гофман, А. Хомоненко Delphi
7. Наиболее полное руководство. -2008.: ил. 7. А.Я. Архангельский Программирование в Delphi 7 2003
8. Митчелл К. Керман Программирование и отладка в Delphi. Учебный курс 2004
9. С.В. Глушаков, А. Л. Клевцов Программирование в среде Delphi 7.0 2003
10. Базы данных: интеллектуальная обработка информации В.В. Корнеев, А.Ф. Гареев, С.В. Васютин. - М.: Нолидж, 200. - 352с.: ил. (ч/з ПаУ)
