initial commit

한국투자증권(API)/legacy/websocket/delphi/MainForm.dfm

@@ -0,0 +1,183 @@
+object Form1: TForm1
+  Left = 0
+  Top = 0
+  Caption = #54620#44397#53804#51088#51613#44428' WebSocket '#53580#49828#53944' v1.0'
+  ClientHeight = 600
+  ClientWidth = 750
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -12
+  Font.Name = 'Segoe UI'
+  Font.Style = []
+  Position = poScreenCenter
+  OnCreate = FormCreate
+  TextHeight = 15
+  object Label1: TLabel
+    Left = 24
+    Top = 24
+    Width = 73
+    Height = 15
+    Caption = 'Approval Key:'
+  end
+  object Label2: TLabel
+    Left = 24
+    Top = 58
+    Width = 32
+    Height = 15
+    Caption = 'TR_ID:'
+  end
+  object Label3: TLabel
+    Left = 24
+    Top = 92
+    Width = 89
+    Height = 15
+    Caption = 'TR_KEY:'#51333#47785#53076#46300
+  end
+  object edtApprovalKey: TEdit
+    Left = 120
+    Top = 21
+    Width = 420
+    Height = 23
+    TabOrder = 0
+    TextHint = 'Approval Key '#51077#47141' (e.g. e44ffe64-7a22-...)'
+  end
+  object edtTrId: TEdit
+    Left = 120
+    Top = 55
+    Width = 150
+    Height = 23
+    TabOrder = 1
+    Text = 'H0STCNT0'
+    TextHint = 'TR_ID ('#50696': H0STCNT0)'
+    OnChange = edtTrIdChange
+  end
+  object edtTrKey: TEdit
+    Left = 120
+    Top = 89
+    Width = 150
+    Height = 23
+    TabOrder = 2
+    Text = '005930'
+    TextHint = #51333#47785#53076#46300' ('#50696': 005930)'
+  end
+  object btnConnect: TButton
+    Left = 560
+    Top = 19
+    Width = 170
+    Height = 30
+    Caption = #50672#44208
+    TabOrder = 3
+    OnClick = btnConnectClick
+  end
+  object btnSubscribe: TButton
+    Left = 560
+    Top = 55
+    Width = 80
+    Height = 30
+    Caption = #44396#46021
+    TabOrder = 4
+    OnClick = btnSubscribeClick
+  end
+  object btnUnsubscribe: TButton
+    Left = 650
+    Top = 55
+    Width = 80
+    Height = 30
+    Caption = #44396#46021#54644#51228
+    TabOrder = 5
+    OnClick = btnUnsubscribeClick
+  end
+  object btnDisconnect: TButton
+    Left = 560
+    Top = 91
+    Width = 170
+    Height = 30
+    Caption = #50672#44208' '#54644#51228
+    TabOrder = 6
+    OnClick = btnDisconnectClick
+  end
+  object Memo1: TMemo
+    Left = 24
+    Top = 136
+    Width = 706
+    Height = 441
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -12
+    Font.Name = 'Consolas'
+    Font.Style = []
+    ParentFont = False
+    ScrollBars = ssVertical
+    TabOrder = 7
+  end
+  object sgcWebSocketClient1: TsgcWebSocketClient
+    Port = 80
+    ConnectTimeout = 0
+    ReadTimeout = -1
+    WriteTimeout = 0
+    TLS = False
+    Proxy.Enabled = False
+    Proxy.Port = 8080
+    Proxy.ProxyType = pxyHTTP
+    HeartBeat.Enabled = True
+    HeartBeat.HeartBeatType = hbtAlways
+    HeartBeat.Interval = 30000
+    HeartBeat.Timeout = 0
+    IPVersion = Id_IPv4
+    OnConnect = sgcWebSocketClient1Connect
+    OnMessage = sgcWebSocketClient1Message
+    OnDisconnect = sgcWebSocketClient1Disconnect
+    OnError = sgcWebSocketClient1Error
+    Authentication.Enabled = False
+    Authentication.URL.Enabled = True
+    Authentication.Session.Enabled = False
+    Authentication.Basic.Enabled = False
+    Authentication.Token.Enabled = False
+    Authentication.Token.AuthName = 'Bearer'
+    Extensions.DeflateFrame.Enabled = False
+    Extensions.DeflateFrame.WindowBits = 15
+    Extensions.PerMessage_Deflate.Enabled = False
+    Extensions.PerMessage_Deflate.ClientMaxWindowBits = 15
+    Extensions.PerMessage_Deflate.ClientNoContextTakeOver = False
+    Extensions.PerMessage_Deflate.MemLevel = 9
+    Extensions.PerMessage_Deflate.ServerMaxWindowBits = 15
+    Extensions.PerMessage_Deflate.ServerNoContextTakeOver = False
+    Options.CleanDisconnect = False
+    Options.FragmentedMessages = frgOnlyBuffer
+    Options.Parameters = '/'
+    Options.RaiseDisconnectExceptions = True
+    Options.ValidateUTF8 = False
+    Specifications.Drafts.Hixie76 = False
+    Specifications.RFC6455 = True
+    NotifyEvents = neAsynchronous
+    LogFile.Enabled = False
+    QueueOptions.Binary.Level = qmNone
+    QueueOptions.Ping.Level = qmNone
+    QueueOptions.Text.Level = qmNone
+    WatchDog.Attempts = 0
+    WatchDog.Enabled = False
+    WatchDog.Interval = 10
+    Throttle.BitsPerSec = 0
+    Throttle.Enabled = False
+    LoadBalancer.Enabled = False
+    LoadBalancer.Port = 0
+    LoadBalancer.TLS = False
+    TLSOptions.VerifyCertificate = False
+    TLSOptions.VerifyDepth = 0
+    TLSOptions.Version = tlsUndefined
+    TLSOptions.IOHandler = iohOpenSSL
+    TLSOptions.OpenSSL_Options.APIVersion = oslAPI_1_0
+    TLSOptions.OpenSSL_Options.LegacyProvider.Enabled = False
+    TLSOptions.OpenSSL_Options.LegacyProvider.LibPath = oslpNone
+    TLSOptions.OpenSSL_Options.LibPath = oslpNone
+    TLSOptions.OpenSSL_Options.UnixSymLinks = oslsSymLinksDefault
+    TLSOptions.OpenSSL_Options.VersionMin = tlsUndefined
+    TLSOptions.OpenSSL_Options.X509Checks.Mode = []
+    TLSOptions.SChannel_Options.CertStoreName = scsnMY
+    TLSOptions.SChannel_Options.CertStorePath = scspStoreCurrentUser
+    TLSOptions.SChannel_Options.UseLegacyCredentials = False
+    Left = 400
+    Top = 64
+  end
+end