Initial commit

2026-06-13 00:05:19 +08:00
commit 754cd7ccdb
402 changed files with 123771 additions and 0 deletions
@@ -0,0 +1,97 @@
+object PayMentForm: TPayMentForm
+  Left = 0
+  Top = 0
+  BorderStyle = bsNone
+  Caption = 'PayMentForm'
+  ClientHeight = 261
+  ClientWidth = 418
+  Color = clBtnFace
+  DoubleBuffered = True
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  Position = poMainFormCenter
+  Scaled = False
+  OnCreate = FormCreate
+  OnShow = FormShow
+  TextHeight = 13
+  object m_pGeneralDialogPanel: TGeneralDialogPanel
+    Left = 0
+    Top = 0
+    Width = 418
+    Height = 261
+    Caption = #25903#20184#26126#32454
+    Color = 5064257
+    ParentBackground = False
+    TabOrder = 0
+    object m_pTextButtonOK: TTextButton
+      Left = 278
+      Top = 220
+      Width = 56
+      Height = 25
+      ModalResult = mrYes
+      ParentShowHint = False
+      ShowHint = True
+      Text = #30830#23450
+    end
+    object m_pTextButtonCancel: TTextButton
+      Left = 342
+      Top = 220
+      Width = 56
+      Height = 25
+      ModalResult = mrCancel
+      ParentShowHint = False
+      ShowHint = True
+      Text = #21462#28040
+    end
+    object m_pLabelBlance: TLabel
+      Left = 143
+      Top = 40
+      Width = 135
+      Height = 14
+      Caption = #24403#21069#36134#25143#29616#26377' 0 '#21809#20316#38899#31526
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 13613739
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object m_lblRecharge: TLabel
+      Left = 22
+      Top = 209
+      Width = 144
+      Height = 14
+      Cursor = crHandPoint
+      Caption = #36134#25143#20313#39069#19981#36275#65292#35831#20805#20540#20817#25442
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clHighlight
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = [fsUnderline]
+      ParentFont = False
+      OnClick = RechargeClick
+      OnMouseEnter = RechargeMouseEnter
+      OnMouseLeave = RechargeMouseLeave
+    end
+    object m_lblVIP: TLabel
+      Left = 22
+      Top = 231
+      Width = 158
+      Height = 14
+      Cursor = crHandPoint
+      Caption = #25104#20026'VIP'#65292#20813#21151#33021#36153#65292#39118#26684'8'#25240
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clHighlight
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = [fsUnderline]
+      ParentFont = False
+      OnClick = VIPClick
+      OnMouseEnter = VIPMouseEnter
+      OnMouseLeave = VIPMouseLeave
+    end
+  end
+end