object Form1: TForm1 Left = 124 Top = 131 Caption = #53076#53092#54856#45367#48120#49464#47676#51648 ClientHeight = 864 ClientWidth = 851 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object addLabel2: TLabel Left = 8 Top = 660 Width = 143 Height = 13 Caption = #54872#44221#49468#49436' '#48276#50948'('#46321#47197#50857')' Font.Charset = HANGEUL_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel1: TLabel Left = 280 Top = 630 Width = 115 Height = 13 Caption = #50696#48708'('#54788#51116' '#49324#50857' X)' Font.Charset = HANGEUL_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel3: TLabel Left = 8 Top = 690 Width = 61 Height = 13 Caption = #52769#51221' '#49884#44036 Font.Charset = HANGEUL_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel4: TLabel Left = 8 Top = 720 Width = 75 Height = 13 Caption = #52769#51221#47581' '#51221#48372 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel5: TLabel Left = 8 Top = 750 Width = 61 Height = 13 Caption = #52769#51221' '#51452#44592 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel6: TLabel Left = 8 Top = 780 Width = 61 Height = 13 Caption = #52769#51221#49548' '#47749 Font.Charset = HANGEUL_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel7: TLabel Left = 8 Top = 810 Width = 138 Height = 13 Caption = #48120#49464#47676#51648'(PM10) '#45453#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel8: TLabel Left = 280 Top = 660 Width = 143 Height = 13 Caption = #48120#49464#47676#51648'(PM2.5) '#45453#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel9: TLabel Left = 280 Top = 690 Width = 28 Height = 13 Caption = #50728#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel10: TLabel Left = 280 Top = 720 Width = 28 Height = 13 Caption = #49845#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel11: TLabel Left = 280 Top = 750 Width = 61 Height = 13 Caption = #50724#51316' '#45453#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel12: TLabel Left = 280 Top = 780 Width = 103 Height = 13 Caption = #51060#49328#54868#51656#49548' '#45453#46020 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object addLabel13: TLabel Left = 280 Top = 810 Width = 42 Height = 13 Caption = #51088#50808#49440 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object redLabel2: TLabel Left = 8 Top = 630 Width = 141 Height = 13 Caption = #48744#44053#51008' '#54596#49688' '#51077#47141' '#49324#54637 Font.Charset = HANGEUL_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object reqLabel1: TLabel Left = 560 Top = 630 Width = 143 Height = 13 Caption = #54872#44221#49468#49436' '#48276#50948'('#50836#52397#50857')' Font.Charset = HANGEUL_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object miseAddLabel: TLabel Left = 8 Top = 840 Width = 221 Height = 13 Caption = #44032#51256#50732#48264#51648'(1~, '#49688#46041#46321#47197#54624#46412#51077#47141')' Font.Charset = HANGEUL_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 153 Top = 630 Width = 108 Height = 13 Caption = #54028#46993#51008' '#51088#46041' '#51077#47141 Font.Charset = HANGEUL_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object LogMemo: TMemo Left = 8 Top = 136 Width = 835 Height = 488 TabOrder = 0 end object addBtn: TButton Left = 425 Top = 835 Width = 75 Height = 25 Caption = '5. '#49468#49436' '#46321#47197 TabOrder = 1 OnClick = addBtnClick end object reqBtn: TButton Left = 560 Top = 649 Width = 75 Height = 25 Caption = #51221#48372' '#50836#52397 TabOrder = 2 OnClick = reqBtnClick end object Panel1: TPanel Left = 0 Top = 80 Width = 851 Height = 50 Align = alTop TabOrder = 3 object SetIntervalLabel: TLabel Left = 510 Top = 18 Width = 72 Height = 13 Caption = #51088#46041' '#49892#54665' '#51452#44592 end object Label3: TLabel Left = 640 Top = 18 Width = 11 Height = 13 Caption = #52488 end object lblCollectMode: TLabel Left = 265 Top = 18 Width = 47 Height = 13 Caption = #49688#51665' '#48169#49885 end object DebugCheck: TCheckBox Left = 8 Top = 17 Width = 80 Height = 17 Caption = #46356#48260#44536' '#47784#46300 TabOrder = 0 OnClick = DebugCheckClick end object LogCheck: TCheckBox Left = 95 Top = 17 Width = 80 Height = 17 Caption = #47196#44536' '#51200#51109 TabOrder = 1 OnClick = LogCheckClick end object AutoCheck: TCheckBox Left = 180 Top = 17 Width = 80 Height = 17 Caption = #51088#46041' '#49892#54665 TabOrder = 2 OnClick = AutoCheckClick end object cboCollectMode: TComboBox Left = 323 Top = 15 Width = 175 Height = 21 Style = csDropDownList ItemIndex = 0 TabOrder = 3 Text = '1. MariaDB ('#49892#49884#44036' DB)' OnChange = cboCollectModeChange Items.Strings = ( '1. MariaDB ('#49892#49884#44036' DB)' '2. MODBUS TCP ('#54252#53944' 502)') end object SetInterval: TEdit Left = 585 Top = 15 Width = 48 Height = 21 NumbersOnly = True TabOrder = 4 end object SetIntervalBtn: TButton Left = 660 Top = 13 Width = 55 Height = 25 Caption = #49444#51221 TabOrder = 5 OnClick = SetIntervalBtnClick end end object szDataTime: TEdit Left = 153 Top = 690 Width = 121 Height = 21 TabOrder = 4 TextHint = '2023-06-15 17:09:09' end object nArea: TEdit Left = 153 Top = 660 Width = 121 Height = 21 TabOrder = 5 Text = '1' TextHint = '0' end object szMangName: TEdit Left = 153 Top = 720 Width = 121 Height = 21 TabOrder = 6 Text = '0' end object szDataTerm: TEdit Left = 153 Top = 750 Width = 121 Height = 21 TabOrder = 7 Text = '0' end object szStationName: TEdit Left = 153 Top = 780 Width = 121 Height = 21 TabOrder = 8 end object nPm10Value: TEdit Left = 153 Top = 810 Width = 121 Height = 21 TabOrder = 9 end object fCtValue: TEdit Left = 425 Top = 695 Width = 121 Height = 21 TabOrder = 10 Text = '0' end object nPm25Value: TEdit Left = 425 Top = 659 Width = 121 Height = 21 TabOrder = 11 end object fRhValue: TEdit Left = 425 Top = 720 Width = 121 Height = 21 TabOrder = 12 Text = '0' end object fO3Value: TEdit Left = 425 Top = 750 Width = 121 Height = 21 TabOrder = 13 Text = '0' end object fNo2Value: TEdit Left = 425 Top = 780 Width = 121 Height = 21 TabOrder = 14 Text = '0' end object fUvValue: TEdit Left = 425 Top = 810 Width = 121 Height = 21 TabOrder = 15 Text = '0' end object szReserved: TEdit Left = 425 Top = 630 Width = 121 Height = 21 ParentShowHint = False ShowHint = True TabOrder = 16 Text = '0' TextHint = '0' end object reqMultiBtn: TButton Left = 641 Top = 649 Width = 85 Height = 25 Caption = #51221#48372' '#50836#52397'('#47680#54000')' TabOrder = 17 OnClick = reqMultiBtnClick end object nAreaReq: TEdit Left = 722 Top = 630 Width = 121 Height = 21 NumbersOnly = True TabOrder = 18 Text = '1' TextHint = '0' end object readBtn: TButton Left = 280 Top = 835 Width = 137 Height = 25 Caption = '4. '#48120#49464#47676#51648' '#45453#46020' '#44032#51256#50724#44592 TabOrder = 19 OnClick = readBtnClick end object miseAddress: TEdit Left = 229 Top = 835 Width = 45 Height = 21 NumbersOnly = True TabOrder = 20 Text = '1' end object Panel2: TPanel Left = 552 Top = 630 Width = 7 Height = 224 Color = clWhite ParentBackground = False TabOrder = 21 end object Panel3: TPanel Left = 0 Top = 0 Width = 851 Height = 80 Align = alTop TabOrder = 22 object loginLabel: TLabel Left = 4 Top = 7 Width = 42 Height = 13 Caption = #47196#44536#51064 Font.Charset = HANGEUL_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 576 Top = 7 Width = 267 Height = 13 Caption = #48177#44536#46972#50868#46300' '#46041#51089#51008' '#49345#45800#51032' X'#47484' '#45580#47084#51452#49464#50836 Font.Charset = HANGEUL_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #48148#53461 Font.Style = [fsBold] ParentFont = False end object loginBtn: TButton Left = 78 Top = 28 Width = 75 Height = 25 Caption = '2. '#47196#44536#51064 TabOrder = 0 OnClick = loginBtnClick end object csConnectBtn: TButton Left = 4 Top = 28 Width = 73 Height = 25 Caption = '1. '#49548#53011' '#50672#44208 TabOrder = 1 OnClick = csConnectBtnClick end object LogoutBtn: TButton Left = 233 Top = 28 Width = 75 Height = 25 Caption = '6. '#49548#53011' '#54644#51228 TabOrder = 2 OnClick = LogoutBtnClick end object AliveBtn: TButton Left = 153 Top = 28 Width = 80 Height = 25 Caption = '3. '#49888#54840' '#48372#45236#44592 TabOrder = 3 OnClick = AliveBtnClick end object ExitBtn: TButton Left = 740 Top = 23 Width = 103 Height = 25 Caption = #54532#47196#44536#47016' '#51593#49884' '#51333#47308 TabOrder = 4 OnClick = ExitBtnClick end object ClrBtn: TButton Left = 752 Top = 49 Width = 91 Height = 25 Caption = #47196#44536' '#45236#50857' '#51648#50864#44592 TabOrder = 5 OnClick = ClrBtnClick end end object aliveTimer: TTimer Enabled = False Interval = 50000 OnTimer = aliveTimerTimer Left = 380 Top = 160 end object cs: TClientSocket Active = False ClientType = ctNonBlocking Port = 0 OnConnect = csConnect OnDisconnect = csDisconnect OnRead = csRead OnError = csError Left = 380 Top = 204 end object csHome2: TClientSocket Active = False ClientType = ctNonBlocking Port = 0 OnConnect = csHome2Connect OnDisconnect = csHome2Disconnect OnRead = csHome2Read OnError = csHome2Error Left = 380 Top = 248 end object TrayIcon1: TTrayIcon OnDblClick = TrayIcon1DblClick Left = 424 Top = 204 end object AppEvt: TApplicationEvents OnMinimize = AppEvtMinimize Left = 472 Top = 204 end object tmrExit: TTimer Enabled = False Interval = 100 OnTimer = tmrExitTimer Left = 512 Top = 204 end object TotalTimer: TTimer Enabled = False Interval = 300 OnTimer = TotalTimerTimer Left = 172 Top = 144 end object cs2: TIdTCPClient ConnectTimeout = 0 Port = 0 ReadTimeout = -1 Left = 636 Top = 200 end object tmrUpInterval: TTimer Enabled = False OnTimer = tmrUpIntervalTimer Left = 92 Top = 144 end object tmrInit: TTimer Enabled = False Interval = 300 OnTimer = tmrInitTimer Left = 20 Top = 144 end object FDCon: TFDConnection Params.Strings = ( 'DriverID=MySQL') Left = 40 Top = 264 end object FDQuery1: TFDQuery Connection = FDCon Left = 96 Top = 264 end object FDPhysMySQLDriverLink1: TFDPhysMySQLDriverLink Left = 160 Top = 264 end end