Initial commit

2026-06-12 22:37:02 +08:00
commit 94e46587da
77 changed files with 168188 additions and 0 deletions
@@ -0,0 +1,153 @@
+object TableIPForm: TTableIPForm
+  Left = 0
+  Top = 0
+  BorderIcons = []
+  BorderStyle = bsNone
+  ClientHeight = 86
+  ClientWidth = 399
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -12
+  Font.Name = 'Segoe UI'
+  Font.Style = []
+  KeyPreview = True
+  OnCreate = FormCreate
+  OnKeyDown = FormKeyDown
+  OnMouseDown = FormMouseDown
+  OnMouseMove = FormMouseMove
+  OnShow = FormShow
+  TextHeight = 15
+  object m_panBack: TPanel
+    Left = 0
+    Top = 0
+    Width = 399
+    Height = 86
+    Align = alClient
+    BevelKind = bkFlat
+    BevelOuter = bvNone
+    Ctl3D = True
+    FullRepaint = False
+    ParentCtl3D = False
+    ShowCaption = False
+    TabOrder = 0
+    OnMouseEnter = FormMouseEnter
+    OnMouseLeave = FormMouseLeave
+    object m_btnOk: TButton
+      Left = 316
+      Top = 46
+      Width = 65
+      Height = 25
+      Caption = #30830#23450
+      TabOrder = 0
+      OnClick = OkClick
+    end
+    object m_cbChips: TComboBox
+      Left = 166
+      Top = 14
+      Width = 135
+      Height = 22
+      Hint = #35831#36873#25321#27880#30721
+      ParentCustomHint = False
+      AutoDropDown = True
+      AutoCloseUp = True
+      Color = clWhite
+      DoubleBuffered = False
+      DropDownCount = 20
+      DropDownWidth = 200
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentDoubleBuffered = False
+      ParentFont = False
+      ParentShowHint = False
+      ShowHint = False
+      TabOrder = 1
+      Text = #35831#36873#25321#27880#30721
+      OnChange = PolicyChange
+      OnCloseUp = ComboCloseUp
+    end
+    object m_cbBets: TComboBox
+      Left = 14
+      Top = 14
+      Width = 135
+      Height = 22
+      Hint = #35831#36873#25321#25171#27861
+      ParentCustomHint = False
+      AutoDropDown = True
+      AutoCloseUp = True
+      Color = clWhite
+      DoubleBuffered = False
+      DropDownCount = 20
+      DropDownWidth = 200
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentDoubleBuffered = False
+      ParentFont = False
+      ParentShowHint = False
+      ShowHint = False
+      TabOrder = 2
+      Text = #35831#36873#25321#25171#27861
+      OnChange = PolicyChange
+      OnCloseUp = ComboCloseUp
+    end
+    object m_cbIndPolicy: TCheckBox
+      Left = 166
+      Top = 50
+      Width = 97
+      Height = 17
+      Caption = #21551#29992#29420#31435#31574#30053
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 3
+    end
+    object m_leChipMul: TLabeledEdit
+      Left = 342
+      Top = 14
+      Width = 39
+      Height = 21
+      Alignment = taCenter
+      AutoSize = False
+      EditLabel.Width = 26
+      EditLabel.Height = 21
+      EditLabel.Caption = #20493#25968
+      Enabled = False
+      LabelPosition = lpLeft
+      NumbersOnly = True
+      TabOrder = 4
+      Text = ''
+      OnExit = ChipMulExit
+      OnKeyDown = ChipMulKeyDown
+    end
+    object m_cbRoad: TComboBox
+      Left = 14
+      Top = 47
+      Width = 66
+      Height = 22
+      AutoComplete = False
+      Style = csDropDownList
+      Color = clWhite
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ItemIndex = 0
+      ParentFont = False
+      TabOrder = 5
+      Text = #20845#29664#36335
+      OnCloseUp = ComboCloseUp
+      Items.Strings = (
+        #20845#29664#36335
+        #22823#36335
+        #22823#30524#36335
+        #23567#36335
+        #23567#24378#36335)
+    end
+  end
+end