⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 unit1_1.inc

📁 一个虚拟串口的驱动程序源代码
💻 INC
📖 第 1 页 / 共 4 页
字号:
🔍
1234 
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight5
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(66) L(65) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel10
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel10' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel10
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(177) L(5) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboLeft6
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboLeft6' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboLeft6
 LoadAnsiStr  #0
 C2
 NewCheckBox<2>
 RESULT
 xySwap DelAnsiStr L(177) L(85) C2 TControl.SetPosition<3> L(0) L(17) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.CheckBox6
 IFDEF(USE_NAMES)
 LoadAnsiStr 'CheckBox6' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(1) C1 TControl_.SetTransparent<2>
 L(15780518)
 C1 TControl_.SetCtlColor<2>
 DEL //CheckBox6
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(177) L(121) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboRight6
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboRight6' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight6
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(201) L(5) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboLeft7
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboLeft7' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboLeft7
 LoadAnsiStr  #0
 C2
 NewCheckBox<2>
 RESULT
 xySwap DelAnsiStr L(201) L(85) C2 TControl.SetPosition<3> L(0) L(17) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.CheckBox7
 IFDEF(USE_NAMES)
 LoadAnsiStr 'CheckBox7' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(1) C1 TControl_.SetTransparent<2>
 L(15780518)
 C1 TControl_.SetCtlColor<2>
 DEL //CheckBox7
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(201) L(121) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboRight7
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboRight7' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight7
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(225) L(5) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboLeft8
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboLeft8' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboLeft8
 LoadAnsiStr  #0
 C2
 NewCheckBox<2>
 RESULT
 xySwap DelAnsiStr L(225) L(85) C2 TControl.SetPosition<3> L(0) L(17) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.CheckBox8
 IFDEF(USE_NAMES)
 LoadAnsiStr 'CheckBox8' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(1) C1 TControl_.SetTransparent<2>
 L(15780518)
 C1 TControl_.SetCtlColor<2>
 DEL //CheckBox8
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(225) L(121) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboRight8
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboRight8' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight8
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(249) L(5) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboLeft9
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboLeft9' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboLeft9
 LoadAnsiStr  #0
 C2
 NewCheckBox<2>
 RESULT
 xySwap DelAnsiStr L(249) L(85) C2 TControl.SetPosition<3> L(0) L(17) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.CheckBox9
 IFDEF(USE_NAMES)
 LoadAnsiStr 'CheckBox9' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(1) C1 TControl_.SetTransparent<2>
 L(15780518)
 C1 TControl_.SetCtlColor<2>
 DEL //CheckBox9
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(249) L(121) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboRight9
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboRight9' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight9
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(273) L(5) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboLeft10
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboLeft10' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboLeft10
 LoadAnsiStr  #0
 C2
 NewCheckBox<2>
 RESULT
 xySwap DelAnsiStr L(273) L(85) C2 TControl.SetPosition<3> L(0) L(17) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.CheckBox10
 IFDEF(USE_NAMES)
 LoadAnsiStr 'CheckBox10' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(1) C1 TControl_.SetTransparent<2>
 L(15780518)
 C1 TControl_.SetCtlColor<2>
 DEL //CheckBox10
 L(17)
 C1
 NewComboBox<2>
 RESULT
L(273) L(121) C2 TControl.SetPosition<3> L(0) L(61) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.cboRight10
 IFDEF(USE_NAMES)
 LoadAnsiStr 'cboRight10' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0) C1 TControl_.SetCtl3D<2>
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 L(-2147483643)
 C1 TControl_.SetCtlColor<2>
 L(0) C1 TControl_.SetCurIndex<2>
 DEL //cboRight10
 LoadAnsiStr 'Save Configuration' #0
 C2
 NewButton<2>
 RESULT
L(301) L(46) C2 TControl.SetPosition<3> L(0) L(105) C2 TControl.SetSize<3> xySwap DelAnsiStr
 DUP LoadSELF AddWord_Store ##TForm1.btnSave
 IFDEF(USE_NAMES)
 LoadAnsiStr 'btnSave' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 DUP TControl_.GetFont<1> RESULT
 L(10)
 L(4)
 C2 TGraphTool.SetInt<3>
 DEL // Font
 DEL //btnSave
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(66) L(100) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel1
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel1' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel1
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(162) L(100) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel11
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel11' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel11
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(186) L(65) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel12
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel12' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel12
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(186) L(100) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel13
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel13' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel13
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(210) L(65) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel14
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel14' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel14
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(210) L(100) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel15
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel15' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel15
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(234) L(65) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel16
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel16' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel16
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(234) L(100) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel17
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel17' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel17
 L(8388608)
 L(8388608)
 LoadSELF AddWord_LoadRef ##TForm1.GradientPanel5
 NewGradientPanel<3>
 RESULT
L(258) L(65) C2 TControl.SetPosition<3> L(4) L(22) C2 TControl.SetSize<3>
 DUP LoadSELF AddWord_Store ##TForm1.GradientPanel18
 IFDEF(USE_NAMES)
 LoadAnsiStr 'GradientPanel18' #0
 C2 TObj_.SetName<2>
 DelAnsiStr
 ENDIF
 L(0)
 C1 TControl_.SetHasBorder<2>
 L(0) C1 AddWord_Store ##TControl_.fTabStop
 DEL //GradientPanel18
1234

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -