Unit3.dfm - master - dorofeev_denis/Monitoring_objects

Unit3.dfm
285 строк9 KB
dorofeev_denis
create: MONITORING_OBJECTS.dpr, MONITORING_OBJECTS.dproj, Unit1.dfm, Unit1.pas, Unit2.dfm, Unit2.pas, Unit3.dfm, Unit3.pas, Для исправления статусов Росреестра.xlsx, создание схем и таблиц.sql
07 май 2026, 14:24
Верифицирован
07 май 2026, 14:24830bc00
object Form_tools: TForm_tools
  Left = 0
  Top = 0
  Caption = #1054#1073#1085#1086#1074#1083#1077#1085#1080#1103' '#1080' '#1074#1099#1075#1088#1091#1079#1082#1080
  ClientHeight = 396
  ClientWidth = 996
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 106
  TextHeight = 14
  object Label5: TLabel
    Left = 21
    Top = 129
    Width = 6
    Height = 14
    Caption = #1089
  end
  object Label6: TLabel
    Left = 133
    Top = 127
    Width = 14
    Height = 14
    Caption = #1087#1086
  end
  object Label3: TLabel
    Left = 261
    Top = 214
    Width = 172
    Height = 14
    Caption = #1082#1086#1083'-'#1074#1086' '#1086#1073#1088#1072#1073#1072#1090#1099#1074#1072#1077#1084#1099#1093' '#1089#1090#1088#1086#1082
  end
  object Label4: TLabel
    Left = 133
    Top = 214
    Width = 4
    Height = 14
    Caption = '-'
  end
  object Button_update_from_tir: TButton
    Left = 21
    Top = 8
    Width = 180
    Height = 25
    Caption = #1054#1073#1085#1086#1074#1080#1090#1100' '#1076#1072#1085#1085#1099#1077' '#1080#1079' '#1058#1048#1056
    TabOrder = 0
    OnClick = Button_update_from_tirClick
  end
  object Button_upload_to_ogv_omsu: TButton
    Left = 248
    Top = 124
    Width = 345
    Height = 25
    Caption = #1042#1099#1075#1088#1091#1079#1080#1090#1100' '#1076#1072#1085#1085#1099#1077' '#1074' '#1052#1080#1085#1080#1084#1091#1097#1077#1089#1090#1074#1086' (Excel '#1092#1072#1081#1083')'
    TabOrder = 1
    OnClick = Button_upload_to_ogv_omsuClick
  end
  object ProgressBar1: TProgressBar
    Left = 21
    Top = 186
    Width = 572
    Height = 19
    TabOrder = 2
  end
  object DateTimePicker_from: TDateTimePicker
    Left = 39
    Top = 125
    Width = 88
    Height = 21
    Date = 44158.000000000000000000
    Format = 'dd.MM.yyyy'
    Time = 0.468900960644532500
    TabOrder = 3
  end
  object DateTimePicker_to: TDateTimePicker
    Left = 151
    Top = 125
    Width = 91
    Height = 21
    Date = 44158.000000000000000000
    Format = 'dd.MM.yyyy'
    Time = 0.468900960644532500
    TabOrder = 4
  end
  object Button_statistika: TButton
    Left = 599
    Top = 123
    Width = 221
    Height = 25
    Caption = #1057#1090#1072#1090#1080#1089#1090#1080#1082#1072' '#1087#1086' '#1089#1090#1072#1090#1091#1089#1072#1084' '#1054#1053
    TabOrder = 5
    OnClick = Button_statistikaClick
  end
  object Button_upload_from_ogv_omsu: TButton
    Left = 248
    Top = 155
    Width = 345
    Height = 25
    Caption = #1047#1072#1075#1088#1091#1079#1082#1072' '#1076#1072#1085#1085#1099#1093' '#1080#1079' '#1052#1080#1085#1080#1084#1091#1097#1077#1089#1090#1074#1072
    TabOrder = 6
    OnClick = Button_upload_from_ogv_omsuClick
  end
  object GroupBox1: TGroupBox
    Left = 29
    Top = 273
    Width = 380
    Height = 102
    Caption = #1054#1090#1095#1105#1090#1085#1086#1089#1090#1100' ('#1073#1077#1079' 54044 '#1054#1053', '#1086#1073#1088#1072#1073#1086#1090#1072#1085#1085#1099#1093' '#1088#1072#1085#1077#1077')'
    TabOrder = 7
    object Label1: TLabel
      Left = 18
      Top = 69
      Width = 98
      Height = 14
      Caption = #1055#1086' '#1089#1086#1089#1090#1086#1103#1085#1080#1102' '#1085#1072
    end
    object Button_according_to_plan: TButton
      Left = 263
      Top = 62
      Width = 105
      Height = 25
      Caption = #1056#1072#1089#1089#1095#1080#1090#1072#1090#1100
      TabOrder = 0
      OnClick = Button_according_to_planClick
    end
    object ComboBox_according_to_plan: TComboBox
      Left = 16
      Top = 27
      Width = 110
      Height = 24
      Style = csDropDownList
      DropDownCount = 20
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ItemIndex = 0
      ParentFont = False
      TabOrder = 1
      Text = #1056#1077#1075#1080#1086#1085
      Items.Strings = (
        #1056#1077#1075#1080#1086#1085
        #1052#1054)
    end
    object DateTimePicker_to_plan: TDateTimePicker
      Left = 130
      Top = 66
      Width = 108
      Height = 21
      Date = 44158.000000000000000000
      Format = 'dd.MM.yyyy'
      Time = 0.468900960644532500
      TabOrder = 2
    end
  end
  object Button_difference_status: TButton
    Left = 599
    Top = 154
    Width = 259
    Height = 25
    Caption = #1056#1072#1079#1083#1080#1095#1072#1102#1097#1080#1077#1089#1103' '#1089#1090#1072#1090#1091#1089#1099' '#1056#1086#1089#1088#1077#1077#1089#1090#1088#1072' '#1080' '#1052#1054
    TabOrder = 8
    OnClick = Button_difference_statusClick
  end
  object GroupBox_with_54044: TGroupBox
    Left = 430
    Top = 273
    Width = 380
    Height = 102
    Caption = #1054#1090#1095#1105#1090#1085#1086#1089#1090#1100' ('#1089' 54044 '#1054#1053', '#1086#1073#1088#1072#1073#1086#1090#1072#1085#1085#1099#1084#1080' '#1088#1072#1085#1077#1077')'
    TabOrder = 9
    object Label2: TLabel
      Left = 18
      Top = 69
      Width = 98
      Height = 14
      Caption = #1055#1086' '#1089#1086#1089#1090#1086#1103#1085#1080#1102' '#1085#1072
    end
    object ComboBox_according_to_plan_with_54044: TComboBox
      Left = 16
      Top = 27
      Width = 110
      Height = 24
      Style = csDropDownList
      DropDownCount = 20
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ItemIndex = 0
      ParentFont = False
      TabOrder = 0
      Text = #1056#1077#1075#1080#1086#1085
      Items.Strings = (
        #1056#1077#1075#1080#1086#1085
        #1052#1054)
    end
    object DateTimePicker_to_plan_with_54044: TDateTimePicker
      Left = 130
      Top = 66
      Width = 108
      Height = 21
      Date = 44158.000000000000000000
      Format = 'dd.MM.yyyy'
      Time = 0.468900960644532500
      TabOrder = 1
    end
    object Button_according_to_plan_with_54044: TButton
      Left = 264
      Top = 62
      Width = 105
      Height = 25
      Caption = #1056#1072#1089#1089#1095#1080#1090#1072#1090#1100
      TabOrder = 2
      OnClick = Button_according_to_plan_with_54044Click
    end
  end
  object Edit_all: TEdit
    Left = 159
    Top = 211
    Width = 96
    Height = 22
    TabOrder = 10
  end
  object Edit_start: TEdit
    Left = 21
    Top = 211
    Width = 96
    Height = 22
    TabOrder = 11
  end
  object Button_load_status_rights_registered: TButton
    Left = 248
    Top = 39
    Width = 345
    Height = 54
    Caption = 
      #1047#1072#1075#1088#1091#1079#1082#1072' '#1092#1072#1081#1083#1086#1074' '#1074#1099#1075#1088#1091#1079#1082#1080' '#1087#1086' '#1089#1082#1088#1080#1087#1090#1072#1084' 1275, 1272, 1269 ('#1089#1090#1072#1090#1091#1089#1099' "' +
      #1055#1088#1072#1074#1072' '#1079#1072#1088#1077#1075#1080#1089#1090#1088#1080#1088#1086#1074#1072#1085#1099'"/"'#1047#1072#1088#1077#1075#1080#1089#1090#1088#1080#1088#1086#1074#1072#1085#1086' '#1087#1088#1072#1074#1086' '#1087#1091#1073#1083#1080#1095#1085#1086#1081' '#1089#1086#1073#1089#1090#1074 +
      #1077#1085#1085#1086#1089#1090#1080'")'
    TabOrder = 12
    WordWrap = True
    OnClick = Button_load_status_rights_registeredClick
  end
  object Button_load_status_rosreestr_from_file: TButton
    Left = 248
    Top = 8
    Width = 345
    Height = 25
    Caption = #1047#1072#1075#1088#1091#1079#1080#1090#1100' '#1089#1090#1072#1090#1091#1089#1099' '#1056#1086#1089#1088#1077#1077#1089#1090#1088#1072' '#1080#1079' '#1092#1072#1081#1083#1072
    TabOrder = 13
    OnClick = Button_load_status_rosreestr_from_fileClick
  end
  object Button_load_status_archival: TButton
    Left = 599
    Top = 39
    Width = 345
    Height = 54
    Caption = 
      #1047#1072#1075#1088#1091#1079#1082#1072' '#1092#1072#1081#1083#1086#1074' '#1074#1099#1075#1088#1091#1079#1082#1080' '#1087#1086' '#1089#1082#1088#1080#1087#1090#1072#1084' 1348, 1349, 1350 ('#1089#1090#1072#1090#1091#1089' "'#1040 +
      #1088#1093#1080#1074#1085#1099#1081'")'
    TabOrder = 14
    WordWrap = True
    OnClick = Button_load_status_archivalClick
  end
  object UniQuery_upd_from_TIR: TUniQuery
    Connection = Form_main.UniConnection1
    SpecificOptions.Strings = (
      'Oracle.FetchAll=True')
    Left = 728
    Top = 216
  end
  object OpenDialog1: TOpenDialog
    Left = 872
    Top = 232
  end
end