form_RFMT6139Reg.cpp
上传用户:gelin96
上传日期:2017-01-08
资源大小:20993k
文件大小:121k
源码类别:

MTK

开发平台:

C++ Builder

  1. /*****************************************************************************
  2. *  Copyright Statement:
  3. *  --------------------
  4. *  This software is protected by Copyright and the information contained
  5. *  herein is confidential. The software may not be copied and the information
  6. *  contained herein may not be used or disclosed except with the written
  7. *  permission of MediaTek Inc. (C) 2005
  8. *
  9. *  BY OPENING THIS FILE, BUYER HEREBY UNEQUIVOCALLY ACKNOWLEDGES AND AGREES
  10. *  THAT THE SOFTWARE/FIRMWARE AND ITS DOCUMENTATIONS ("MEDIATEK SOFTWARE")
  11. *  RECEIVED FROM MEDIATEK AND/OR ITS REPRESENTATIVES ARE PROVIDED TO BUYER ON
  12. *  AN "AS-IS" BASIS ONLY. MEDIATEK EXPRESSLY DISCLAIMS ANY AND ALL WARRANTIES,
  13. *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
  14. *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT.
  15. *  NEITHER DOES MEDIATEK PROVIDE ANY WARRANTY WHATSOEVER WITH RESPECT TO THE
  16. *  SOFTWARE OF ANY THIRD PARTY WHICH MAY BE USED BY, INCORPORATED IN, OR
  17. *  SUPPLIED WITH THE MEDIATEK SOFTWARE, AND BUYER AGREES TO LOOK ONLY TO SUCH
  18. *  THIRD PARTY FOR ANY WARRANTY CLAIM RELATING THERETO. MEDIATEK SHALL ALSO
  19. *  NOT BE RESPONSIBLE FOR ANY MEDIATEK SOFTWARE RELEASES MADE TO BUYER'S
  20. *  SPECIFICATION OR TO CONFORM TO A PARTICULAR STANDARD OR OPEN FORUM.
  21. *
  22. *  BUYER'S SOLE AND EXCLUSIVE REMEDY AND MEDIATEK'S ENTIRE AND CUMULATIVE
  23. *  LIABILITY WITH RESPECT TO THE MEDIATEK SOFTWARE RELEASED HEREUNDER WILL BE,
  24. *  AT MEDIATEK'S OPTION, TO REVISE OR REPLACE THE MEDIATEK SOFTWARE AT ISSUE,
  25. *  OR REFUND ANY SOFTWARE LICENSE FEES OR SERVICE CHARGE PAID BY BUYER TO
  26. *  MEDIATEK FOR SUCH MEDIATEK SOFTWARE AT ISSUE.
  27. *
  28. *  THE TRANSACTION CONTEMPLATED HEREUNDER SHALL BE CONSTRUED IN ACCORDANCE
  29. *  WITH THE LAWS OF THE STATE OF CALIFORNIA, USA, EXCLUDING ITS CONFLICT OF
  30. *  LAWS PRINCIPLES.  ANY DISPUTES, CONTROVERSIES OR CLAIMS ARISING THEREOF AND
  31. *  RELATED THERETO SHALL BE SETTLED BY ARBITRATION IN SAN FRANCISCO, CA, UNDER
  32. *  THE RULES OF THE INTERNATIONAL CHAMBER OF COMMERCE (ICC).
  33. *
  34. *****************************************************************************/
  35. /*****************************************************************************
  36.  *
  37.  * Filename:
  38.  * ---------
  39.  *   form_RFMT6139Reg.cpp
  40.  *
  41.  * Project:
  42.  * --------
  43.  *   Maui META APP
  44.  *
  45.  * Description:
  46.  * ------------
  47.  *  MT6139 register read/write form source
  48.  *
  49.  * Author:
  50.  * -------
  51.  *  Andy Ueng (mtk00490)
  52.  *
  53.  *============================================================================
  54.  *             HISTORY
  55.  * Below this line, this part is controlled by PVCS VM. DO NOT MODIFY!!
  56.  *------------------------------------------------------------------------------
  57.  * $Revision$
  58.  * $Modtime$
  59.  * $Log$
  60.  * 
  61.  *------------------------------------------------------------------------------
  62.  * Upper this line, this part is controlled by PVCS VM. DO NOT MODIFY!!
  63.  *============================================================================
  64.  ****************************************************************************/
  65. //---------------------------------------------------------------------------
  66. #include <vcl.h>
  67. #pragma hdrstop
  68. #ifndef _FORM_MAIN_H_
  69. #include "form_main.h"
  70. #endif
  71. #include "form_RFMT6139Reg.h"
  72. #ifndef  _MISC_H_
  73. #include "misc.h"
  74. #endif
  75. //---------------------------------------------------------------------------
  76. #pragma package(smart_init)
  77. #pragma resource "*.dfm"
  78. TfrmMT6139Reg *frmMT6139Reg;
  79. //===========================================================================
  80. static void CNF_GetMT6139AllFromReg( void )
  81. {   frmMT6139Reg->CNF_GetMT6139AllFromReg();
  82. }
  83. //---------------------------------------------------------------------------
  84. static void CNF_SetMT6139AllToReg( void )
  85. {   frmMT6139Reg->CNF_SetMT6139AllToReg();
  86. }
  87. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  88. static void  CNF_GetMT6139CW0FromReg( void )
  89. {
  90.     frmMT6139Reg->CNF_GetMT6139CW0FromReg();
  91. }
  92. //---------------------------------------------------------------------------
  93. static void  CNF_SetMT6139CW0ToReg( void )
  94. {
  95.     frmMT6139Reg->CNF_SetMT6139CW0ToReg();
  96. }
  97. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  98. static void  CNF_GetMT6139CW1FromReg( void )
  99. {
  100.     frmMT6139Reg->CNF_GetMT6139CW1FromReg();
  101. }
  102. //---------------------------------------------------------------------------
  103. static void  CNF_SetMT6139CW1ToReg( void )
  104. {
  105.     frmMT6139Reg->CNF_SetMT6139CW1ToReg();
  106. }
  107. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  108. static void  CNF_GetMT6139CW2FromReg( void )
  109. {
  110.     frmMT6139Reg->CNF_GetMT6139CW2FromReg();
  111. }
  112. //---------------------------------------------------------------------------
  113. static void  CNF_SetMT6139CW2ToReg( void )
  114. {
  115.     frmMT6139Reg->CNF_SetMT6139CW2ToReg();
  116. }
  117. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  118. static void  CNF_GetMT6139CW3FromReg( void )
  119. {
  120.     frmMT6139Reg->CNF_GetMT6139CW3FromReg();
  121. }
  122. //---------------------------------------------------------------------------
  123. static void  CNF_SetMT6139CW3ToReg( void )
  124. {
  125.     frmMT6139Reg->CNF_SetMT6139CW3ToReg();
  126. }
  127. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  128. static void  CNF_GetMT6139CW4FromReg( void )
  129. {
  130.     frmMT6139Reg->CNF_GetMT6139CW4FromReg();
  131. }
  132. //---------------------------------------------------------------------------
  133. static void  CNF_SetMT6139CW4ToReg( void )
  134. {
  135.     frmMT6139Reg->CNF_SetMT6139CW4ToReg();
  136. }
  137. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  138. static void  CNF_GetMT6139CW5FromReg( void )
  139. {
  140.     frmMT6139Reg->CNF_GetMT6139CW5FromReg();
  141. }
  142. //---------------------------------------------------------------------------
  143. static void  CNF_SetMT6139CW5ToReg( void )
  144. {
  145.     frmMT6139Reg->CNF_SetMT6139CW5ToReg();
  146. }
  147. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  148. static void  CNF_GetMT6139CW6FromReg( void )
  149. {
  150.     frmMT6139Reg->CNF_GetMT6139CW6FromReg();
  151. }
  152. //---------------------------------------------------------------------------
  153. static void  CNF_SetMT6139CW6ToReg( void )
  154. {
  155.     frmMT6139Reg->CNF_SetMT6139CW6ToReg();
  156. }
  157. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  158. static void  CNF_GetMT6139CW7FromReg( void )
  159. {
  160.     frmMT6139Reg->CNF_GetMT6139CW7FromReg();
  161. }
  162. //---------------------------------------------------------------------------
  163. static void  CNF_SetMT6139CW7ToReg( void )
  164. {
  165.     frmMT6139Reg->CNF_SetMT6139CW7ToReg();
  166. }
  167. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  168. static void  CNF_GetMT6139CW8FromReg( void )
  169. {
  170.     frmMT6139Reg->CNF_GetMT6139CW8FromReg();
  171. }
  172. //---------------------------------------------------------------------------
  173. static void  CNF_SetMT6139CW8ToReg( void )
  174. {
  175.     frmMT6139Reg->CNF_SetMT6139CW8ToReg();
  176. }
  177. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  178. static void  CNF_GetMT6139CW9FromReg( void )
  179. {
  180.     frmMT6139Reg->CNF_GetMT6139CW9FromReg();
  181. }
  182. //---------------------------------------------------------------------------
  183. static void  CNF_SetMT6139CW9ToReg( void )
  184. {
  185.     frmMT6139Reg->CNF_SetMT6139CW9ToReg();
  186. }
  187. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  188. static void  CNF_GetMT6139CW10FromReg( void )
  189. {
  190.     frmMT6139Reg->CNF_GetMT6139CW10FromReg();
  191. }
  192. //---------------------------------------------------------------------------
  193. static void  CNF_SetMT6139CW10ToReg( void )
  194. {
  195.     frmMT6139Reg->CNF_SetMT6139CW10ToReg();
  196. }
  197. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  198. static void  CNF_GetMT6139CW11FromReg( void )
  199. {
  200.     frmMT6139Reg->CNF_GetMT6139CW11FromReg();
  201. }
  202. //---------------------------------------------------------------------------
  203. static void  CNF_SetMT6139CW11ToReg( void )
  204. {
  205.     frmMT6139Reg->CNF_SetMT6139CW11ToReg();
  206. }
  207. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  208. static void  CNF_GetMT6139CW15FromReg( void )
  209. {
  210.     frmMT6139Reg->CNF_GetMT6139CW15FromReg();
  211. }
  212. //---------------------------------------------------------------------------
  213. static void  CNF_SetMT6139CW15ToReg( void )
  214. {
  215.     frmMT6139Reg->CNF_SetMT6139CW15ToReg();
  216. }
  217. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  218. //---------------------------------------------------------------------------
  219. __fastcall TfrmMT6139Reg::TfrmMT6139Reg(TComponent* Owner)
  220.         : TForm(Owner)
  221. {
  222.     // CW0
  223.     m_edtCW0AFC[0] = edtCW0AFC0;
  224.     m_edtCW0AFC[1] = edtCW0AFC1;
  225.     m_edtCW0AFC[2] = edtCW0AFC2;
  226.     m_edtCW0AFC[3] = edtCW0AFC3;
  227.     m_edtCW0AFC[4] = edtCW0AFC4;
  228.     m_edtCW0AFC[5] = edtCW0AFC5;
  229.     m_edtCW0SYNCP[0] = edtCW0SYNCP0;
  230.     m_edtCW0SYNCP[1] = edtCW0SYNCP1;
  231.     m_edtCW1BAND[0] = edtCW1BAND0;
  232.     m_edtCW1BAND[1] = edtCW1BAND1;
  233.     // CW1
  234.     m_edtCW1N_INTEGER[0] = edtCW1N_INTEGER0;
  235.     m_edtCW1N_INTEGER[1] = edtCW1N_INTEGER1;
  236.     m_edtCW1N_INTEGER[2] = edtCW1N_INTEGER2;
  237.     m_edtCW1N_INTEGER[3] = edtCW1N_INTEGER3;
  238.     m_edtCW1N_INTEGER[4] = edtCW1N_INTEGER4;
  239.     m_edtCW1N_INTEGER[5] = edtCW1N_INTEGER5;
  240.     m_edtCW1N_INTEGER[6] = edtCW1N_INTEGER6;
  241.     m_edtCW1N_FRACTION[0] = edtCW1N_FRACTION0;
  242.     m_edtCW1N_FRACTION[1] = edtCW1N_FRACTION1;
  243.     m_edtCW1N_FRACTION[2] = edtCW1N_FRACTION2;
  244.     m_edtCW1N_FRACTION[3] = edtCW1N_FRACTION3;
  245.     m_edtCW1N_FRACTION[4] = edtCW1N_FRACTION4;
  246.     m_edtCW1N_FRACTION[5] = edtCW1N_FRACTION5;
  247.     m_edtCW1N_FRACTION[6] = edtCW1N_FRACTION6;
  248.     m_edtCW1N_FRACTION[7] = edtCW1N_FRACTION7;
  249.     // CW2
  250.     m_edtCW2DC_DAC_AI[0] = edtCW2DC_DAC_AI0;
  251.     m_edtCW2DC_DAC_AI[1] = edtCW2DC_DAC_AI1;
  252.     m_edtCW2DC_DAC_AI[2] = edtCW2DC_DAC_AI2;
  253.     m_edtCW2DC_DAC_AI[3] = edtCW2DC_DAC_AI3;
  254.     m_edtCW2DC_DAC_AI[4] = edtCW2DC_DAC_AI4;
  255.     m_edtCW2DC_DAC_AI[5] = edtCW2DC_DAC_AI5;
  256.     m_edtCW2DC_DAC_AQ[0] = edtCW2DC_DAC_AQ0;
  257.     m_edtCW2DC_DAC_AQ[1] = edtCW2DC_DAC_AQ1;
  258.     m_edtCW2DC_DAC_AQ[2] = edtCW2DC_DAC_AQ2;
  259.     m_edtCW2DC_DAC_AQ[3] = edtCW2DC_DAC_AQ3;
  260.     m_edtCW2DC_DAC_AQ[4] = edtCW2DC_DAC_AQ4;
  261.     m_edtCW2DC_DAC_AQ[5] = edtCW2DC_DAC_AQ5;
  262.     m_edtCW2MODE[0] = edtCW2MODE0;
  263.     m_edtCW2MODE[1] = edtCW2MODE1;
  264.     m_edtCW2MODE[2] = edtCW2MODE2;
  265.     m_edtCW2GAIN_TABLE[0] = edtCW2GAIN_TABLE0;
  266.     m_edtCW2GAIN_TABLE[1] = edtCW2GAIN_TABLE1;
  267.     m_edtCW2GAIN_TABLE[2] = edtCW2GAIN_TABLE2;
  268.     m_edtCW2GAIN_TABLE[3] = edtCW2GAIN_TABLE3;
  269.     m_edtCW2GAIN_TABLE[4] = edtCW2GAIN_TABLE4;
  270.     m_edtCW2GAIN_TABLE[5] = edtCW2GAIN_TABLE5;
  271.     // CW4
  272.     m_edtCW4CAL_DELAY[0] = edtCW4CAL_DELAY0;
  273.     m_edtCW4CAL_DELAY[1] = edtCW4CAL_DELAY1;
  274.     m_edtCW4VCO_VSET[0] = edtCW4VCO_VSET0;
  275.     m_edtCW4VCO_VSET[1] = edtCW4VCO_VSET1;
  276.     m_edtCW4CALMODE[0] = edtCW4CALMODE0;
  277.     m_edtCW4CALMODE[1] = edtCW4CALMODE1;
  278.     m_edtCW4SYNPFD[0] = edtCW4SYNPFD0;
  279.     m_edtCW4SYNPFD[1] = edtCW4SYNPFD1;
  280.     // CW5
  281.     m_edtCW5RESB[0] = edtCW5RESB0;
  282.     m_edtCW5RESB[1] = edtCW5RESB1;
  283.     m_edtCW5RESB[2] = edtCW5RESB2;
  284.     m_edtCW5RESB[3] = edtCW5RESB3;
  285.     m_edtCW5RESB[4] = edtCW5RESB4;
  286.     m_edtCW5RES[0] = edtCW5RES0;
  287.     m_edtCW5RES[1] = edtCW5RES1;
  288.     m_edtCW5RES[2] = edtCW5RES2;
  289.     m_edtCW5RES[3] = edtCW5RES3;
  290.     m_edtCW5RES[4] = edtCW5RES4;
  291.     // CW6
  292.     m_edtCW6VCO_SCA[0] = edtCW6VCO_SCA0;
  293.     m_edtCW6VCO_SCA[1] = edtCW6VCO_SCA1;
  294.     m_edtCW6VCO_SCA[2] = edtCW6VCO_SCA2;
  295.     m_edtCW6VCO_SCA[3] = edtCW6VCO_SCA3;
  296.     m_edtCW6VCO_SCA[4] = edtCW6VCO_SCA4;
  297.     m_edtCW6VCO_SCA[5] = edtCW6VCO_SCA5;
  298.     m_edtCW6VCO_SCA[6] = edtCW6VCO_SCA6;
  299.     // CW7
  300.     m_edtCW7RX_GAIN[0] = edtCW7RX_GAIN0;
  301.     m_edtCW7RX_GAIN[1] = edtCW7RX_GAIN1;
  302.     m_edtCW7RX_GAIN[2] = edtCW7RX_GAIN2;
  303.     m_edtCW7RX_GAIN[3] = edtCW7RX_GAIN3;
  304.     m_edtCW7RX_GAIN[4] = edtCW7RX_GAIN4;
  305.     m_edtCW7RX_GAIN[5] = edtCW7RX_GAIN5;
  306.     m_edtCW7RX_GAIN[6] = edtCW7RX_GAIN6;
  307.     m_edtCW7RX_GAIN[7] = edtCW7RX_GAIN7;
  308.     // CW8
  309.     m_edtCW8RX_CTRL_SW[0] = edtCW8RX_CTRL_SW0;
  310.     m_edtCW8RX_CTRL_SW[1] = edtCW8RX_CTRL_SW1;
  311.     m_edtCW8RX_CTRL_SW[2] = edtCW8RX_CTRL_SW2;
  312.     m_edtCW8RX_CTRL_SW[3] = edtCW8RX_CTRL_SW3;
  313.     m_edtCW8RX_CTRL_SW[4] = edtCW8RX_CTRL_SW4;
  314.     
  315.     m_edtCW8DC_DAC_BI[0] = edtCW8DC_DAC_BI0;
  316.     m_edtCW8DC_DAC_BI[1] = edtCW8DC_DAC_BI1;
  317.     m_edtCW8DC_DAC_BI[2] = edtCW8DC_DAC_BI2;
  318.     m_edtCW8DC_DAC_BI[3] = edtCW8DC_DAC_BI3;
  319.     m_edtCW8DC_DAC_BI[4] = edtCW8DC_DAC_BI4;
  320.     m_edtCW8DC_DAC_BI[5] = edtCW8DC_DAC_BI5;
  321.     m_edtCW8DC_DAC_BI[6] = edtCW8DC_DAC_BI6;
  322.     m_edtCW8DC_DAC_CI[0] = edtCW8DC_DAC_CI0;
  323.     m_edtCW8DC_DAC_CI[1] = edtCW8DC_DAC_CI1;
  324.     m_edtCW8DC_DAC_CI[2] = edtCW8DC_DAC_CI2;
  325.     m_edtCW8DC_DAC_CI[3] = edtCW8DC_DAC_CI3;
  326.     m_edtCW8DC_DAC_CI[4] = edtCW8DC_DAC_CI4;
  327.     m_edtCW8DC_DAC_CI[5] = edtCW8DC_DAC_CI5;
  328.     m_edtCW8DC_DAC_CI[6] = edtCW8DC_DAC_CI6;
  329.     // CW9
  330.     m_edtCW9DC_DAC_BQ[0] = edtCW9DC_DAC_BQ0;
  331.     m_edtCW9DC_DAC_BQ[1] = edtCW9DC_DAC_BQ1;
  332.     m_edtCW9DC_DAC_BQ[2] = edtCW9DC_DAC_BQ2;
  333.     m_edtCW9DC_DAC_BQ[3] = edtCW9DC_DAC_BQ3;
  334.     m_edtCW9DC_DAC_BQ[4] = edtCW9DC_DAC_BQ4;
  335.     m_edtCW9DC_DAC_BQ[5] = edtCW9DC_DAC_BQ5;
  336.     m_edtCW9DC_DAC_BQ[6] = edtCW9DC_DAC_BQ6;
  337.     m_edtCW9DC_DAC_CQ[0] = edtCW9DC_DAC_CQ0;
  338.     m_edtCW9DC_DAC_CQ[1] = edtCW9DC_DAC_CQ1;
  339.     m_edtCW9DC_DAC_CQ[2] = edtCW9DC_DAC_CQ2;
  340.     m_edtCW9DC_DAC_CQ[3] = edtCW9DC_DAC_CQ3;
  341.     m_edtCW9DC_DAC_CQ[4] = edtCW9DC_DAC_CQ4;
  342.     m_edtCW9DC_DAC_CQ[5] = edtCW9DC_DAC_CQ5;
  343.     m_edtCW9DC_DAC_CQ[6] = edtCW9DC_DAC_CQ6;
  344.     // CW10
  345.     m_edtCW10AM_DACI[0] = edtCW10AM_DACI0;
  346.     m_edtCW10AM_DACI[1] = edtCW10AM_DACI1;
  347.     m_edtCW10AM_DACI[2] = edtCW10AM_DACI2;
  348.     m_edtCW10AM_DACI[3] = edtCW10AM_DACI3;
  349.     m_edtCW10AM_DACI[4] = edtCW10AM_DACI4;
  350.     m_edtCW10AM_DACI[5] = edtCW10AM_DACI5;
  351.     m_edtCW10AM_DACI[6] = edtCW10AM_DACI6;
  352.     m_edtCW10AM_DACQ[0] = edtCW10AM_DACQ0;
  353.     m_edtCW10AM_DACQ[1] = edtCW10AM_DACQ1;
  354.     m_edtCW10AM_DACQ[2] = edtCW10AM_DACQ2;
  355.     m_edtCW10AM_DACQ[3] = edtCW10AM_DACQ3;
  356.     m_edtCW10AM_DACQ[4] = edtCW10AM_DACQ4;
  357.     m_edtCW10AM_DACQ[5] = edtCW10AM_DACQ5;
  358.     m_edtCW10AM_DACQ[6] = edtCW10AM_DACQ6;
  359.     // CW11
  360.     m_edtCW11TXBIAST[0] = edtCW11TXBIAST0;
  361.     m_edtCW11TXBIAST[1] = edtCW11TXBIAST1;
  362.     m_edtCW11TX_PW[0] = edtCW11TX_PW0;
  363.     m_edtCW11TX_PW[1] = edtCW11TX_PW1;
  364.     m_edtCW11TXVAPC[0] = edtCW11TXVAPC0;
  365.     m_edtCW11TXVAPC[1] = edtCW11TXVAPC1;
  366.     m_edtCW11TXFLT[0] = edtCW11TXFLT0;
  367.     m_edtCW11TXFLT[1] = edtCW11TXFLT1;
  368.     m_edtCW11TXFLT[2] = edtCW11TXFLT2;
  369.     m_edtCW11TXFLT[3] = edtCW11TXFLT3;
  370.     m_edtCW11TXMODGAIN[0] = edtCW11TXMODGAIN0;
  371.     m_edtCW11TXMODGAIN[1] = edtCW11TXMODGAIN1;
  372.     m_edtCW11TXMODGAIN[2] = edtCW11TXMODGAIN2;
  373.     // CW15
  374.     m_edtCW15AUXOUT_SELETCION[0] = edtCW15AUXOUT_SELETCION0;
  375.     m_edtCW15AUXOUT_SELETCION[1] = edtCW15AUXOUT_SELETCION1;
  376.     m_edtCW15AUXOUT_SELETCION[2] = edtCW15AUXOUT_SELETCION2;
  377.     m_edtCW15AUXOUT_SELETCION[3] = edtCW15AUXOUT_SELETCION3;
  378.     m_edtCW15AUXOUT_SELETCION[4] = edtCW15AUXOUT_SELETCION4;
  379.     m_edtCW15AUXOUT_SELETCION[5] = edtCW15AUXOUT_SELETCION5;
  380.     m_edtCW15AUXOUT_SELETCION[6] = edtCW15AUXOUT_SELETCION6;
  381.     m_edtCW15ADDRESS_DATA_OUT[0] = edtCW15ADDRESS_DATA_OUT0;
  382.     m_edtCW15ADDRESS_DATA_OUT[1] = edtCW15ADDRESS_DATA_OUT1;
  383.     m_edtCW15ADDRESS_DATA_OUT[2] = edtCW15ADDRESS_DATA_OUT2;
  384.     m_edtCW15ADDRESS_DATA_OUT[3] = edtCW15ADDRESS_DATA_OUT3;
  385. }
  386. //---------------------------------------------------------------------------
  387. void __fastcall TfrmMT6139Reg::FormCreate(TObject *Sender)
  388. {
  389.     Init();    
  390. }
  391. //---------------------------------------------------------------------------
  392. void __fastcall TfrmMT6139Reg::FormActivate(TObject *Sender)
  393. {
  394.     if( m_bInit )
  395.     {
  396.         m_bInit = false;
  397.         m_uiFinalRfid = frmMainSel->Get_FinalRFID();
  398.         btnReadAllRegClick( NULL );
  399.     }    
  400. }
  401. //===========================================================================
  402. void TfrmMT6139Reg::Init( void )
  403. {
  404.     m_bInit = true;
  405. }
  406. //---------------------------------------------------------------------------
  407. void  TfrmMT6139Reg::ShowHintLabel( TControl *sender, char* hint )
  408. {
  409.    TPoint pt0 = this->ClientOrigin;
  410.    TPoint pt1 = sender->ClientOrigin;
  411.    lblHint->Left = (pt1.x-pt0.x);
  412.    lblHint->Top  = (pt1.y-pt0.y)+sender->Height+3;
  413.    lblHint->Caption = hint;
  414.    lblHint->Visible = true;
  415.    HintTimer->Enabled = true;
  416. }
  417. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  418. void TfrmMT6139Reg::ReDrawCW0Fields( void )
  419. {
  420.     edtCW0POR->Text = IntToStr( m_sMT6139CW0.uc_por );
  421.     edtCW0GPO->Text = IntToStr( m_sMT6139CW0.uc_gpo );
  422.     edtCW0VCOSEL->Text = IntToStr( m_sMT6139CW0.uc_vcosel );
  423.     for( int i=0; i<MT6139_CW0_AFC_LEN; i++ )
  424.     {
  425.         m_edtCW0AFC[i]->Text = IntToStr( ((m_sMT6139CW0.uc_afc & (0x01<<i)) >> i) );
  426.     }
  427.     edtCW0FLT->Text = IntToStr( m_sMT6139CW0.uc_flt );
  428.     edtCW0DIEN->Text = IntToStr( m_sMT6139CW0.uc_dien );
  429.     edtCW0SYNPW->Text = IntToStr( m_sMT6139CW0.uc_synpw );
  430.     for( int i=0; i<MT6139_CW0_SYNCP_LEN; i++ )
  431.     {
  432.         m_edtCW0SYNCP[i]->Text = IntToStr( ((m_sMT6139CW0.uc_syncp & (0x01<<i)) >> i) );
  433.     }
  434. }
  435. //---------------------------------------------------------------------------
  436. void TfrmMT6139Reg::ReDrawCW1Fields( void )
  437. {
  438.     edtCW1TRX->Text = IntToStr( m_sMT6139CW1.uc_trx );
  439.     for( int i=0; i<MT6139_CW1_BAND_LEN; i++ )
  440.     {
  441.         m_edtCW1BAND[i]->Text = IntToStr( ((m_sMT6139CW1.uc_band & (0x01<<i)) >> i) );
  442.     }
  443.     edtCW1BUF_MODE->Text = IntToStr( m_sMT6139CW1.uc_bufmode );
  444.     for( int i=0; i<MT6139_CW1_N_INTEGER_LEN; i++ )
  445.     {
  446.         m_edtCW1N_INTEGER[i]->Text = IntToStr( ((m_sMT6139CW1.uc_n_integer & (0x01<<i)) >> i) );
  447.     }
  448.     for( int i=0; i<MT6139_CW1_N_FRACTION_LEN; i++ )
  449.     {
  450.         m_edtCW1N_FRACTION[i]->Text = IntToStr( ((m_sMT6139CW1.uc_n_fraction & (0x01<<i)) >> i) );
  451.     }
  452. }
  453. //---------------------------------------------------------------------------
  454. void TfrmMT6139Reg::ReDrawCW2Fields( void )
  455. {
  456.     for( int i=0; i<MT6139_CW2_DC_DAC_AI_LEN; i++ )
  457.     {
  458.         m_edtCW2DC_DAC_AI[i]->Text = IntToStr( ((m_sMT6139CW2.uc_dc_dac_ai & (0x01<<i)) >> i) );
  459.     }
  460.     for( int i=0; i<MT6139_CW2_DC_DAC_AQ_LEN; i++ )
  461.     {
  462.         m_edtCW2DC_DAC_AQ[i]->Text = IntToStr( ((m_sMT6139CW2.uc_dc_dac_aq & (0x01<<i)) >> i) );
  463.     }
  464.     edtCW2AUTO_CAL->Text = IntToStr( m_sMT6139CW2.uc_auto_cal );
  465.     for( int i=0; i<MT6139_CW2_MODE_LEN; i++ )
  466.     {
  467.         m_edtCW2MODE[i]->Text = IntToStr( ((m_sMT6139CW2.uc_mode & (0x01<<i)) >> i) );
  468.     }
  469.     for( int i=0; i<MT6139_CW2_GAIN_TABLE_LEN; i++ )
  470.     {
  471.         m_edtCW2GAIN_TABLE[i]->Text = IntToStr( ((m_sMT6139CW2.uc_gain_table & (0x01<<i)) >> i) );
  472.     }
  473. }
  474. //---------------------------------------------------------------------------
  475. void TfrmMT6139Reg::ReDrawCW3Fields( void )
  476. {
  477.     edtCW3TXDIVIL->Text = IntToStr( m_sMT6139CW3.uc_txdivil );
  478.     edtCW3RFMIXPI->Text = IntToStr( m_sMT6139CW3.uc_rfmixpi );
  479.     edtCW3RFMIXPQ->Text = IntToStr( m_sMT6139CW3.uc_rfmixpq );
  480.     edtCW3RFLNAP->Text = IntToStr( m_sMT6139CW3.uc_rflnap );
  481.     edtCW3SYNDIVP->Text = IntToStr( m_sMT6139CW3.uc_syndivp );
  482.     edtCW3SYNPFDP->Text = IntToStr( m_sMT6139CW3.uc_synpfdp );
  483.     edtCW3RXDIVP->Text = IntToStr( m_sMT6139CW3.uc_rxdivp );
  484.     edtCW3IFPGAP2->Text = IntToStr( m_sMT6139CW3.uc_ifpgap2 );
  485.     edtCW3IFPGAP1->Text = IntToStr( m_sMT6139CW3.uc_ifpgap1 );
  486.     edtCW3IFPOLP->Text = IntToStr( m_sMT6139CW3.uc_ifpolp );
  487. }
  488. //---------------------------------------------------------------------------
  489. void TfrmMT6139Reg::ReDrawCW4Fields( void )
  490. {
  491.     edtCW4OTAEN->Text = IntToStr( m_sMT6139CW4.uc_otaen );
  492.     edtCW4FLDIS->Text = IntToStr( m_sMT6139CW4.uc_fldis );
  493.     for( int i=0; i<MT6139_CW4_CAL_DELAY_LEN; i++ )
  494.     {
  495.         m_edtCW4CAL_DELAY[i]->Text = IntToStr( ((m_sMT6139CW4.uc_cal_delay & (0x01<<i)) >> i) );
  496.     }
  497.     for( int i=0; i<MT6139_CW4_VCO_VSET_LEN; i++ )
  498.     {
  499.         m_edtCW4VCO_VSET[i]->Text = IntToStr( ((m_sMT6139CW4.uc_vco_vset & (0x01<<i)) >> i) );
  500.     }
  501.     
  502.     edtCW4DREAD->Text = IntToStr( m_sMT6139CW4.uc_dread );
  503.     for( int i=0; i<MT6139_CW4_CAL_MODE_LEN; i++ )
  504.     {
  505.         m_edtCW4CALMODE[i]->Text = IntToStr( ((m_sMT6139CW4.uc_calmode & (0x01<<i)) >> i) );
  506.     }
  507.     edtCW4LGAC->Text = IntToStr( m_sMT6139CW4.uc_lgac );
  508.     edtCW4MODREG->Text = IntToStr( m_sMT6139CW4.uc_modreg );
  509.     edtCW4C_FRA_IN->Text = IntToStr( m_sMT6139CW4.uc_c_fra_in );
  510.     edtCW4SXRSTDIV->Text = IntToStr( m_sMT6139CW4.uc_sxrstdiv );
  511.     edtCW4SYNTYP->Text = IntToStr( m_sMT6139CW4.uc_syntyp );
  512.     for( int i=0; i<MT6139_CW4_SYN_PFD_LEN; i++ )
  513.     {
  514.         m_edtCW4SYNPFD[i]->Text = IntToStr( ((m_sMT6139CW4.uc_synpfd & (0x01<<i)) >> i) );
  515.     }
  516.     edtCW4SCA_CR_FI->Text = IntToStr( m_sMT6139CW4.uc_sca_cr_fi );
  517. }
  518. //---------------------------------------------------------------------------
  519. void TfrmMT6139Reg::ReDrawCW5Fields( void )
  520. {
  521.     
  522.     for( int i=0; i<MT6139_CW5_RESB_LEN; i++ )
  523.     {
  524.         m_edtCW5RESB[i]->Text = IntToStr( ((m_sMT6139CW5.uc_resb & (0x01<<i)) >> i) );
  525.     }
  526.     for( int i=0; i<MT6139_CW5_RES_LEN; i++ )
  527.     {
  528.         m_edtCW5RES[i]->Text = IntToStr( ((m_sMT6139CW5.uc_res & (0x01<<i)) >> i) );
  529.     }
  530. }
  531. //---------------------------------------------------------------------------
  532. void TfrmMT6139Reg::ReDrawCW6Fields( void )
  533. {
  534.     edtCW6T_CLK->Text = IntToStr( m_sMT6139CW6.uc_t_clk );
  535.     edtCW6T_LATCH->Text = IntToStr( m_sMT6139CW6.uc_t_latch );
  536.     edtCW6VCOBUFP->Text = IntToStr( m_sMT6139CW6.uc_vco_bufp );
  537.     edtCW6MONITOR->Text = IntToStr( m_sMT6139CW6.uc_monitor );
  538.     edtCW6SIO5->Text = IntToStr( m_sMT6139CW6.uc_sio5 );
  539.     for( int i=0; i<MT6139_CW6_VCO_SCA_LEN; i++ )
  540.     {
  541.         m_edtCW6VCO_SCA[i]->Text = IntToStr( ((m_sMT6139CW6.uc_vco_sca & (0x01<<i)) >> i) );
  542.     }
  543.     edtCW6VCOSET->Text = IntToStr( m_sMT6139CW6.uc_vcoset );
  544. }
  545. //---------------------------------------------------------------------------
  546. void TfrmMT6139Reg::ReDrawCW7Fields( void )
  547. {
  548.     edtCW7LPF_CORNER->Text = IntToStr( m_sMT6139CW7.uc_lpf_corner );
  549.     edtCW7MAN_CAL->Text = IntToStr( m_sMT6139CW7.uc_man_cal );
  550.     edtCW7AUTO_GAIN_SEL->Text = IntToStr( m_sMT6139CW7.uc_auto_gain_select );
  551.     for( int i=0; i<MT6139_CW7_RX_GAIN_LEN; i++ )
  552.     {
  553.         m_edtCW7RX_GAIN[i]->Text = IntToStr( ((m_sMT6139CW7.uc_rx_gain & (0x01<<i)) >> i) );
  554.     }
  555. }
  556. //---------------------------------------------------------------------------
  557. void TfrmMT6139Reg::ReDrawCW8Fields( void )
  558. {
  559.     for( int i=0; i<MT6139_CW8_RX_CTRL_SW_LEN; i++ )
  560.     {
  561.         m_edtCW8RX_CTRL_SW[i]->Text = IntToStr( ((m_sMT6139CW8.uc_rx_ctrl_sw & (0x01<<i)) >> i) );
  562.     }
  563.     edtCW8RX_CTRL_SWEN->Text = IntToStr( m_sMT6139CW8.uc_rx_ctrl_swen );
  564.     for( int i=0; i<MT6139_CW8_DC_DAC_BI_LEN; i++ )
  565.     {
  566.         m_edtCW8DC_DAC_BI[i]->Text = IntToStr( ((m_sMT6139CW8.uc_dc_dac_bi & (0x01<<i)) >> i) );
  567.     }
  568.     for( int i=0; i<MT6139_CW8_DC_DAC_CI_LEN; i++ )
  569.     {
  570.         m_edtCW8DC_DAC_CI[i]->Text = IntToStr( ((m_sMT6139CW8.uc_dc_dac_ci & (0x01<<i)) >> i) );
  571.     }
  572. }
  573. //---------------------------------------------------------------------------
  574. void TfrmMT6139Reg::ReDrawCW9Fields( void )
  575. {
  576.     edtCW9PWR_DAC_AM->Text = IntToStr( m_sMT6139CW9.uc_pwr_dac_am );
  577.     edtCW9PWR_DAC_A->Text  = IntToStr( m_sMT6139CW9.uc_pwr_dac_a );
  578.     edtCW9PWR_DAC_B->Text  = IntToStr( m_sMT6139CW9.uc_pwr_dac_b );
  579.     edtCW9PWR_DAC_C->Text  = IntToStr( m_sMT6139CW9.uc_pwr_dac_c );
  580.     for( int i=0; i<MT6139_CW9_DC_DAC_BQ_LEN; i++ )
  581.     {
  582.         m_edtCW9DC_DAC_BQ[i]->Text = IntToStr( ((m_sMT6139CW9.uc_dc_dac_bq & (0x01<<i)) >> i) );
  583.     }
  584.     for( int i=0; i<MT6139_CW9_DC_DAC_CQ_LEN; i++ )
  585.     {
  586.         m_edtCW9DC_DAC_CQ[i]->Text = IntToStr( ((m_sMT6139CW9.uc_dc_dac_cq & (0x01<<i)) >> i) );
  587.     }
  588. }
  589. //---------------------------------------------------------------------------
  590. void TfrmMT6139Reg::ReDrawCW10Fields( void )
  591. {
  592.     for( int i=0; i<MT6139_CW10_AM_DACI_LEN; i++ )
  593.     {
  594.         m_edtCW10AM_DACI[i]->Text = IntToStr( ((m_sMT6139CW10.uc_am_daci & (0x01<<i)) >> i) );
  595.     }
  596.     for( int i=0; i<MT6139_CW10_AM_DACQ_LEN; i++ )
  597.     {
  598.         m_edtCW10AM_DACQ[i]->Text = IntToStr( ((m_sMT6139CW10.uc_am_dacq & (0x01<<i)) >> i) );
  599.     }
  600. }
  601. //---------------------------------------------------------------------------
  602. void TfrmMT6139Reg::ReDrawCW11Fields( void )
  603. {
  604.     edtCW11TXDIV_GC1->Text = IntToStr( m_sMT6139CW11.uc_txdiv_gc1 );
  605.     edtCW11TXDIV_GC0->Text = IntToStr( m_sMT6139CW11.uc_txdiv_gc0 );
  606.     for( int i=0; i<MT6139_CW11_TXBIAST_LEN; i++ )
  607.     {
  608.         m_edtCW11TXBIAST[i]->Text = IntToStr( ((m_sMT6139CW11.uc_txbiast & (0x01<<i)) >> i) );
  609.     }
  610.     for( int i=0; i<MT6139_CW11_TX_PW_LEN; i++ )
  611.     {
  612.         m_edtCW11TX_PW[i]->Text = IntToStr( ((m_sMT6139CW11.uc_tx_pw & (0x01<<i)) >> i) );
  613.     }
  614.     for( int i=0; i<MT6139_CW11_TXVAPC_LEN; i++ )
  615.     {
  616.         m_edtCW11TXVAPC[i]->Text = IntToStr( ((m_sMT6139CW11.uc_txvapc & (0x01<<i)) >> i) );
  617.     }
  618.     for( int i=0; i<MT6139_CW11_TXFLT_LEN; i++ )
  619.     {
  620.         m_edtCW11TXFLT[i]->Text = IntToStr( ((m_sMT6139CW11.uc_txflt & (0x01<<i)) >> i) );
  621.     }
  622.     for( int i=0; i<MT6139_CW11_TXMODGAIN_LEN; i++ )
  623.     {
  624.         m_edtCW11TXMODGAIN[i]->Text = IntToStr( ((m_sMT6139CW11.uc_txmodgain & (0x01<<i)) >> i) );
  625.     }
  626.     edtCW11TXDBUF->Text = IntToStr( m_sMT6139CW11.uc_txdbuf );
  627.     edtCW11TXGBUF->Text = IntToStr( m_sMT6139CW11.uc_txgbuf );
  628.     edtCW11TXDIV4->Text = IntToStr( m_sMT6139CW11.uc_txdiv4 );
  629.     edtCW11TXDIV2->Text = IntToStr( m_sMT6139CW11.uc_txdiv2 );
  630.     edtCW11TXDIQM->Text = IntToStr( m_sMT6139CW11.uc_txdiqm );
  631.     edtCW11TXGIQM->Text = IntToStr( m_sMT6139CW11.uc_txgiqm );
  632.     edtCW11TXCTL->Text = IntToStr( m_sMT6139CW11.uc_txctl );
  633. }
  634. //---------------------------------------------------------------------------
  635. void TfrmMT6139Reg::ReDrawCW15Fields( void )
  636. {
  637.     for( int i=0; i<MT6139_CW15_AUXOUT_SELECTION_LEN; i++ )
  638.     {
  639.         m_edtCW15AUXOUT_SELETCION[i]->Text = IntToStr( ((m_sMT6139CW15.uc_auxout_selection & (0x01<<i)) >> i) );
  640.     }
  641.     for( int i=0; i<MT6139_CW15_ADDRESS_DATA_OUT_LEN; i++ )
  642.     {
  643.         m_edtCW15ADDRESS_DATA_OUT[i]->Text = IntToStr( ((m_sMT6139CW15.uc_address_data_out & (0x01<<i)) >> i) );
  644.     }
  645. }
  646. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  647. void  TfrmMT6139Reg::CurrentPageReset( void )
  648. {
  649.     btnReadCW0FromReg->Enabled = true;
  650.     btnWriteCW0ToReg->Enabled = true;
  651.     btnReadCW1FromReg->Enabled = true;
  652.     btnWriteCW1ToReg->Enabled = true;
  653.     btnReadCW2FromReg->Enabled = true;
  654.     btnWriteCW2ToReg->Enabled = true;
  655.     btnReadCW3FromReg->Enabled = true;
  656.     btnWriteCW3ToReg->Enabled = true;
  657.     btnReadCW4FromReg->Enabled = true;
  658.     btnWriteCW4ToReg->Enabled = true;
  659.     btnReadCW5FromReg->Enabled = true;
  660.     btnWriteCW5ToReg->Enabled = true;
  661.     btnReadCW6FromReg->Enabled = true;
  662.     btnWriteCW6ToReg->Enabled = true;
  663.     btnReadCW7FromReg->Enabled = true;
  664.     btnWriteCW7ToReg->Enabled = true;
  665.     btnReadCW8FromReg->Enabled = true;
  666.     btnWriteCW8ToReg->Enabled = true;
  667.     btnReadCW9FromReg->Enabled = true;
  668.     btnWriteCW9ToReg->Enabled = true;
  669.     btnReadCW10FromReg->Enabled = true;
  670.     btnWriteCW10ToReg->Enabled = true;
  671.     btnReadCW11FromReg->Enabled = true;
  672.     btnWriteCW11ToReg->Enabled = true;
  673.     btnReadCW15FromReg->Enabled = true;
  674.     btnWriteCW15ToReg->Enabled = true;
  675. }
  676. //---------------------------------------------------------------------------
  677. void  TfrmMT6139Reg::CurrentPageLock( void )
  678. {
  679.     btnReadCW0FromReg->Enabled = false;
  680.     btnWriteCW0ToReg->Enabled = false;
  681.     btnReadCW1FromReg->Enabled = false;
  682.     btnWriteCW1ToReg->Enabled = false;
  683.     btnReadCW2FromReg->Enabled = false;
  684.     btnWriteCW2ToReg->Enabled = false;
  685.     btnReadCW3FromReg->Enabled = false;
  686.     btnWriteCW3ToReg->Enabled = false;
  687.     btnReadCW4FromReg->Enabled = false;
  688.     btnWriteCW4ToReg->Enabled = false;
  689.     btnReadCW5FromReg->Enabled = false;
  690.     btnWriteCW5ToReg->Enabled = false;
  691.     btnReadCW6FromReg->Enabled = false;
  692.     btnWriteCW6ToReg->Enabled = false;
  693.     btnReadCW7FromReg->Enabled = false;
  694.     btnWriteCW7ToReg->Enabled = false;
  695.     btnReadCW8FromReg->Enabled = false;
  696.     btnWriteCW8ToReg->Enabled = false;
  697.     btnReadCW9FromReg->Enabled = false;
  698.     btnWriteCW9ToReg->Enabled = false;
  699.     btnReadCW10FromReg->Enabled = false;
  700.     btnWriteCW10ToReg->Enabled = false;
  701.     btnReadCW11FromReg->Enabled = false;
  702.     btnWriteCW11ToReg->Enabled = false;
  703.     btnReadCW15FromReg->Enabled = false;
  704.     btnWriteCW15ToReg->Enabled = false;
  705. }
  706. //---------------------------------------------------------------------------
  707. void __fastcall TfrmMT6139Reg::edtPORCheck(TObject *Sender)
  708. {
  709.     unsigned char  uc_data;
  710.     AnsiString  text;
  711.     TEdit *edit = (TEdit*)Sender;
  712.     char  hint[] = " value shall be 0 or 1 ";
  713.     text = edit->Text;
  714.     if( !IsValidRegBit( text, uc_data ) )
  715.     {
  716.         ShowHintLabel( edit, hint );
  717.         edit->Text = IntToStr( 0 );
  718.         edit->SetFocus();
  719.         return;
  720.     }
  721.     m_sMT6139CW0.uc_por = uc_data;
  722. }
  723. //---------------------------------------------------------------------------
  724. void __fastcall TfrmMT6139Reg::edtCW0GPOCheck(TObject *Sender)
  725. {
  726.     unsigned char  uc_data;
  727.     AnsiString  text;
  728.     TEdit *edit = (TEdit*)Sender;
  729.     char  hint[] = " value shall be 0 or 1 ";
  730.     text = edit->Text;
  731.     if( !IsValidRegBit( text, uc_data ) )
  732.     {
  733.         ShowHintLabel( edit, hint );
  734.         edit->Text = IntToStr( 0 );
  735.         edit->SetFocus();
  736.         return;
  737.     }
  738.     m_sMT6139CW0.uc_gpo = uc_data;
  739. }
  740. //---------------------------------------------------------------------------
  741. void __fastcall TfrmMT6139Reg::edtCW0VCOSELCheck(TObject *Sender)
  742. {
  743.     unsigned char  uc_data;
  744.     AnsiString  text;
  745.     TEdit *edit = (TEdit*)Sender;
  746.     char  hint[] = " value shall be 0 or 1 ";
  747.     text = edit->Text;
  748.     if( !IsValidRegBit( text, uc_data ) )
  749.     {
  750.         ShowHintLabel( edit, hint );
  751.         edit->Text = IntToStr( 0 );
  752.         edit->SetFocus();
  753.         return;
  754.     }
  755.     m_sMT6139CW0.uc_vcosel = uc_data;
  756. }
  757. //---------------------------------------------------------------------------
  758. void __fastcall TfrmMT6139Reg::edtCW0AFCCheck(TObject *Sender)
  759. {
  760.     unsigned char  uc_data;
  761.     AnsiString  text;
  762.     TEdit *edit = (TEdit*)Sender;
  763.     char  hint[] = " value shall be 0 or 1 ";
  764.     text = edit->Text;
  765.     if( !IsValidRegBit( text, uc_data ) )
  766.     {
  767.         ShowHintLabel( edit, hint );
  768.         edit->Text = IntToStr( 0 );
  769.         edit->SetFocus();
  770.         return;
  771.     }
  772.     m_sMT6139CW0.uc_afc = (m_sMT6139CW0.uc_afc & (0x3F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  773. }
  774. //---------------------------------------------------------------------------
  775. void __fastcall TfrmMT6139Reg::edtCW0FLTCheck(TObject *Sender)
  776. {
  777.     unsigned char  uc_data;
  778.     AnsiString  text;
  779.     TEdit *edit = (TEdit*)Sender;
  780.     char  hint[] = " value shall be 0 or 1 ";
  781.     text = edit->Text;
  782.     if( !IsValidRegBit( text, uc_data ) )
  783.     {
  784.         ShowHintLabel( edit, hint );
  785.         edit->Text = IntToStr( 0 );
  786.         edit->SetFocus();
  787.         return;
  788.     }
  789.     m_sMT6139CW0.uc_flt = uc_data;
  790. }
  791. //---------------------------------------------------------------------------
  792. void __fastcall TfrmMT6139Reg::edtCW0DIENCheck(TObject *Sender)
  793. {
  794.     unsigned char  uc_data;
  795.     AnsiString  text;
  796.     TEdit *edit = (TEdit*)Sender;
  797.     char  hint[] = " value shall be 0 or 1 ";
  798.     text = edit->Text;
  799.     if( !IsValidRegBit( text, uc_data ) )
  800.     {
  801.         ShowHintLabel( edit, hint );
  802.         edit->Text = IntToStr( 0 );
  803.         edit->SetFocus();
  804.         return;
  805.     }
  806.     m_sMT6139CW0.uc_dien = uc_data;
  807. }
  808. //---------------------------------------------------------------------------
  809. void __fastcall TfrmMT6139Reg::edtCW0SYNPWCheck(TObject *Sender)
  810. {
  811.     unsigned char  uc_data;
  812.     AnsiString  text;
  813.     TEdit *edit = (TEdit*)Sender;
  814.     char  hint[] = " value shall be 0 or 1 ";
  815.     text = edit->Text;
  816.     if( !IsValidRegBit( text, uc_data ) )
  817.     {
  818.         ShowHintLabel( edit, hint );
  819.         edit->Text = IntToStr( 0 );
  820.         edit->SetFocus();
  821.         return;
  822.     }
  823.     m_sMT6139CW0.uc_synpw = uc_data;
  824. }
  825. //---------------------------------------------------------------------------
  826. void __fastcall TfrmMT6139Reg::edtCW0SYNCPCheck(TObject *Sender)
  827. {
  828.     unsigned char  uc_data;
  829.     AnsiString  text;
  830.     TEdit *edit = (TEdit*)Sender;
  831.     char  hint[] = " value shall be 0 or 1 ";
  832.     text = edit->Text;
  833.     if( !IsValidRegBit( text, uc_data ) )
  834.     {
  835.         ShowHintLabel( edit, hint );
  836.         edit->Text = IntToStr( 0 );
  837.         edit->SetFocus();
  838.         return;
  839.     }
  840.     m_sMT6139CW0.uc_syncp = (m_sMT6139CW0.uc_syncp & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  841. }
  842. //---------------------------------------------------------------------------
  843. void __fastcall TfrmMT6139Reg::edtCW1TRXCheck(TObject *Sender)
  844. {
  845.     unsigned char  uc_data;
  846.     AnsiString  text;
  847.     TEdit *edit = (TEdit*)Sender;
  848.     char  hint[] = " value shall be 0 or 1 ";
  849.     text = edit->Text;
  850.     if( !IsValidRegBit( text, uc_data ) )
  851.     {
  852.         ShowHintLabel( edit, hint );
  853.         edit->Text = IntToStr( 0 );
  854.         edit->SetFocus();
  855.         return;
  856.     }
  857.     m_sMT6139CW1.uc_trx = uc_data;    
  858. }
  859. //---------------------------------------------------------------------------
  860. void __fastcall TfrmMT6139Reg::edtCW1BANDCheck(TObject *Sender)
  861. {
  862.     unsigned char  uc_data;
  863.     AnsiString  text;
  864.     TEdit *edit = (TEdit*)Sender;
  865.     char  hint[] = " value shall be 0 or 1 ";
  866.     text = edit->Text;
  867.     if( !IsValidRegBit( text, uc_data ) )
  868.     {
  869.         ShowHintLabel( edit, hint );
  870.         edit->Text = IntToStr( 0 );
  871.         edit->SetFocus();
  872.         return;
  873.     }
  874.     m_sMT6139CW1.uc_band = (m_sMT6139CW1.uc_band & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  875. }
  876. //---------------------------------------------------------------------------
  877. void __fastcall TfrmMT6139Reg::edtCW1BUF_MODECheck(TObject *Sender)
  878. {
  879.     unsigned char  uc_data;
  880.     AnsiString  text;
  881.     TEdit *edit = (TEdit*)Sender;
  882.     char  hint[] = " value shall be 0 or 1 ";
  883.     text = edit->Text;
  884.     if( !IsValidRegBit( text, uc_data ) )
  885.     {
  886.         ShowHintLabel( edit, hint );
  887.         edit->Text = IntToStr( 0 );
  888.         edit->SetFocus();
  889.         return;
  890.     }
  891.     m_sMT6139CW1.uc_bufmode = uc_data;
  892. }
  893. //---------------------------------------------------------------------------
  894. void __fastcall TfrmMT6139Reg::edtCW1N_INTEGERCheck(TObject *Sender)
  895. {
  896.     unsigned char  uc_data;
  897.     AnsiString  text;
  898.     TEdit *edit = (TEdit*)Sender;
  899.     char  hint[] = " value shall be 0 or 1 ";
  900.     text = edit->Text;
  901.     if( !IsValidRegBit( text, uc_data ) )
  902.     {
  903.         ShowHintLabel( edit, hint );
  904.         edit->Text = IntToStr( 0 );
  905.         edit->SetFocus();
  906.         return;
  907.     }
  908.     m_sMT6139CW1.uc_n_integer = (m_sMT6139CW1.uc_n_integer & (0x7F ^ 0x01<<edit->Tag) ) | uc_data<<edit->Tag;
  909. }
  910. //---------------------------------------------------------------------------
  911. void __fastcall TfrmMT6139Reg::edtCW1N_FRACTIONCheck(TObject *Sender)
  912. {
  913.     unsigned char  uc_data;
  914.     AnsiString  text;
  915.     TEdit *edit = (TEdit*)Sender;
  916.     char  hint[] = " value shall be 0 or 1 ";
  917.     text = edit->Text;
  918.     if( !IsValidRegBit( text, uc_data ) )
  919.     {
  920.         ShowHintLabel( edit, hint );
  921.         edit->Text = IntToStr( 0 );
  922.         edit->SetFocus();
  923.         return;
  924.     }
  925.     m_sMT6139CW1.uc_n_fraction = (m_sMT6139CW1.uc_n_fraction & (0xFF ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  926. }
  927. //---------------------------------------------------------------------------
  928. void __fastcall TfrmMT6139Reg::edtCW2DC_DAC_AICheck(TObject *Sender)
  929. {
  930.     unsigned char  uc_data;
  931.     AnsiString  text;
  932.     TEdit *edit = (TEdit*)Sender;
  933.     char  hint[] = " value shall be 0 or 1 ";
  934.     text = edit->Text;
  935.     if( !IsValidRegBit( text, uc_data ) )
  936.     {
  937.         ShowHintLabel( edit, hint );
  938.         edit->Text = IntToStr( 0 );
  939.         edit->SetFocus();
  940.         return;
  941.     }
  942.     m_sMT6139CW2.uc_dc_dac_ai = (m_sMT6139CW2.uc_dc_dac_ai & (0x3F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  943. }
  944. //---------------------------------------------------------------------------
  945. void __fastcall TfrmMT6139Reg::edtCW2DC_DAC_AQCheck(TObject *Sender)
  946. {
  947.     unsigned char  uc_data;
  948.     AnsiString  text;
  949.     TEdit *edit = (TEdit*)Sender;
  950.     char  hint[] = " value shall be 0 or 1 ";
  951.     text = edit->Text;
  952.     if( !IsValidRegBit( text, uc_data ) )
  953.     {
  954.         ShowHintLabel( edit, hint );
  955.         edit->Text = IntToStr( 0 );
  956.         edit->SetFocus();
  957.         return;
  958.     }
  959.     m_sMT6139CW2.uc_dc_dac_aq = (m_sMT6139CW2.uc_dc_dac_aq & (0x3F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  960. }
  961. //---------------------------------------------------------------------------
  962. void __fastcall TfrmMT6139Reg::edtCW2AUTO_CALCheck(TObject *Sender)
  963. {
  964.     unsigned char  uc_data;
  965.     AnsiString  text;
  966.     TEdit *edit = (TEdit*)Sender;
  967.     char  hint[] = " value shall be 0 or 1 ";
  968.     text = edit->Text;
  969.     if( !IsValidRegBit( text, uc_data ) )
  970.     {
  971.         ShowHintLabel( edit, hint );
  972.         edit->Text = IntToStr( 0 );
  973.         edit->SetFocus();
  974.         return;
  975.     }
  976.     m_sMT6139CW2.uc_auto_cal = uc_data;
  977. }
  978. //---------------------------------------------------------------------------
  979. void __fastcall TfrmMT6139Reg::edtCW2MODECheck(TObject *Sender)
  980. {
  981.     unsigned char  uc_data;
  982.     AnsiString  text;
  983.     TEdit *edit = (TEdit*)Sender;
  984.     char  hint[] = " value shall be 0 or 1 ";
  985.     text = edit->Text;
  986.     if( !IsValidRegBit( text, uc_data ) )
  987.     {
  988.         ShowHintLabel( edit, hint );
  989.         edit->Text = IntToStr( 0 );
  990.         edit->SetFocus();
  991.         return;
  992.     }
  993.     m_sMT6139CW2.uc_mode = (m_sMT6139CW2.uc_mode & (0x07 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  994. }
  995. //---------------------------------------------------------------------------
  996. void __fastcall TfrmMT6139Reg::edtCW2GAIN_TABLECheck(TObject *Sender)
  997. {
  998.     unsigned char  uc_data;
  999.     AnsiString  text;
  1000.     TEdit *edit = (TEdit*)Sender;
  1001.     char  hint[] = " value shall be 0 or 1 ";
  1002.     text = edit->Text;
  1003.     if( !IsValidRegBit( text, uc_data ) )
  1004.     {
  1005.         ShowHintLabel( edit, hint );
  1006.         edit->Text = IntToStr( 0 );
  1007.         edit->SetFocus();
  1008.         return;
  1009.     }
  1010.     m_sMT6139CW2.uc_gain_table = (m_sMT6139CW2.uc_gain_table & (0x3F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1011. }
  1012. //---------------------------------------------------------------------------
  1013. void __fastcall TfrmMT6139Reg::edtCW3TXDIVILCheck(TObject *Sender)
  1014. {
  1015.     unsigned char  uc_data;
  1016.     AnsiString  text;
  1017.     TEdit *edit = (TEdit*)Sender;
  1018.     char  hint[] = " value shall be 0 or 1 ";
  1019.     text = edit->Text;
  1020.     if( !IsValidRegBit( text, uc_data ) )
  1021.     {
  1022.         ShowHintLabel( edit, hint );
  1023.         edit->Text = IntToStr( 0 );
  1024.         edit->SetFocus();
  1025.         return;
  1026.     }
  1027.     m_sMT6139CW3.uc_txdivil = uc_data;
  1028. }
  1029. //---------------------------------------------------------------------------
  1030. void __fastcall TfrmMT6139Reg::edtCW3RFMIXPICheck(TObject *Sender)
  1031. {
  1032.     unsigned char  uc_data;
  1033.     AnsiString  text;
  1034.     TEdit *edit = (TEdit*)Sender;
  1035.     char  hint[] = " value shall be 0 or 1 ";
  1036.     text = edit->Text;
  1037.     if( !IsValidRegBit( text, uc_data ) )
  1038.     {
  1039.         ShowHintLabel( edit, hint );
  1040.         edit->Text = IntToStr( 0 );
  1041.         edit->SetFocus();
  1042.         return;
  1043.     }
  1044.     m_sMT6139CW3.uc_rfmixpi = uc_data;
  1045. }
  1046. //---------------------------------------------------------------------------
  1047. void __fastcall TfrmMT6139Reg::edtCW3RFMIXPQCheck(TObject *Sender)
  1048. {
  1049.     unsigned char  uc_data;
  1050.     AnsiString  text;
  1051.     TEdit *edit = (TEdit*)Sender;
  1052.     char  hint[] = " value shall be 0 or 1 ";
  1053.     text = edit->Text;
  1054.     if( !IsValidRegBit( text, uc_data ) )
  1055.     {
  1056.         ShowHintLabel( edit, hint );
  1057.         edit->Text = IntToStr( 0 );
  1058.         edit->SetFocus();
  1059.         return;
  1060.     }
  1061.     m_sMT6139CW3.uc_rfmixpq = uc_data;
  1062. }
  1063. //---------------------------------------------------------------------------
  1064. void __fastcall TfrmMT6139Reg::edtCW3RFLNAPCheck(TObject *Sender)
  1065. {
  1066.     unsigned char  uc_data;
  1067.     AnsiString  text;
  1068.     TEdit *edit = (TEdit*)Sender;
  1069.     char  hint[] = " value shall be 0 or 1 ";
  1070.     text = edit->Text;
  1071.     if( !IsValidRegBit( text, uc_data ) )
  1072.     {
  1073.         ShowHintLabel( edit, hint );
  1074.         edit->Text = IntToStr( 0 );
  1075.         edit->SetFocus();
  1076.         return;
  1077.     }
  1078.     m_sMT6139CW3.uc_rflnap = uc_data;
  1079. }
  1080. //---------------------------------------------------------------------------
  1081. void __fastcall TfrmMT6139Reg::edtCW3SYNDIVPCheck(TObject *Sender)
  1082. {
  1083.     unsigned char  uc_data;
  1084.     AnsiString  text;
  1085.     TEdit *edit = (TEdit*)Sender;
  1086.     char  hint[] = " value shall be 0 or 1 ";
  1087.     text = edit->Text;
  1088.     if( !IsValidRegBit( text, uc_data ) )
  1089.     {
  1090.         ShowHintLabel( edit, hint );
  1091.         edit->Text = IntToStr( 0 );
  1092.         edit->SetFocus();
  1093.         return;
  1094.     }
  1095.     m_sMT6139CW3.uc_syndivp = uc_data;
  1096. }
  1097. //---------------------------------------------------------------------------
  1098. void __fastcall TfrmMT6139Reg::edtCW3SYNPFDPCheck(TObject *Sender)
  1099. {
  1100.     unsigned char  uc_data;
  1101.     AnsiString  text;
  1102.     TEdit *edit = (TEdit*)Sender;
  1103.     char  hint[] = " value shall be 0 or 1 ";
  1104.     text = edit->Text;
  1105.     if( !IsValidRegBit( text, uc_data ) )
  1106.     {
  1107.         ShowHintLabel( edit, hint );
  1108.         edit->Text = IntToStr( 0 );
  1109.         edit->SetFocus();
  1110.         return;
  1111.     }
  1112.     m_sMT6139CW3.uc_synpfdp = uc_data;
  1113. }
  1114. //---------------------------------------------------------------------------
  1115. void __fastcall TfrmMT6139Reg::edtCW3RXDIVPCheck(TObject *Sender)
  1116. {
  1117.     unsigned char  uc_data;
  1118.     AnsiString  text;
  1119.     TEdit *edit = (TEdit*)Sender;
  1120.     char  hint[] = " value shall be 0 or 1 ";
  1121.     text = edit->Text;
  1122.     if( !IsValidRegBit( text, uc_data ) )
  1123.     {
  1124.         ShowHintLabel( edit, hint );
  1125.         edit->Text = IntToStr( 0 );
  1126.         edit->SetFocus();
  1127.         return;
  1128.     }
  1129.     m_sMT6139CW3.uc_rxdivp = uc_data;
  1130. }
  1131. //---------------------------------------------------------------------------
  1132. void __fastcall TfrmMT6139Reg::edtCW3IFPGAP2Check(TObject *Sender)
  1133. {
  1134.     unsigned char  uc_data;
  1135.     AnsiString  text;
  1136.     TEdit *edit = (TEdit*)Sender;
  1137.     char  hint[] = " value shall be 0 or 1 ";
  1138.     text = edit->Text;
  1139.     if( !IsValidRegBit( text, uc_data ) )
  1140.     {
  1141.         ShowHintLabel( edit, hint );
  1142.         edit->Text = IntToStr( 0 );
  1143.         edit->SetFocus();
  1144.         return;
  1145.     }
  1146.     m_sMT6139CW3.uc_ifpgap2 = uc_data;
  1147. }
  1148. //---------------------------------------------------------------------------
  1149. void __fastcall TfrmMT6139Reg::edtCW3IFPGAP1Check(TObject *Sender)
  1150. {
  1151.     unsigned char  uc_data;
  1152.     AnsiString  text;
  1153.     TEdit *edit = (TEdit*)Sender;
  1154.     char  hint[] = " value shall be 0 or 1 ";
  1155.     text = edit->Text;
  1156.     if( !IsValidRegBit( text, uc_data ) )
  1157.     {
  1158.         ShowHintLabel( edit, hint );
  1159.         edit->Text = IntToStr( 0 );
  1160.         edit->SetFocus();
  1161.         return;
  1162.     }
  1163.     m_sMT6139CW3.uc_ifpgap1 = uc_data;
  1164. }
  1165. //---------------------------------------------------------------------------
  1166. void __fastcall TfrmMT6139Reg::edtCW3IFPOLPCheck(TObject *Sender)
  1167. {
  1168.     unsigned char  uc_data;
  1169.     AnsiString  text;
  1170.     TEdit *edit = (TEdit*)Sender;
  1171.     char  hint[] = " value shall be 0 or 1 ";
  1172.     text = edit->Text;
  1173.     if( !IsValidRegBit( text, uc_data ) )
  1174.     {
  1175.         ShowHintLabel( edit, hint );
  1176.         edit->Text = IntToStr( 0 );
  1177.         edit->SetFocus();
  1178.         return;
  1179.     }
  1180.     m_sMT6139CW3.uc_ifpolp = uc_data;
  1181. }
  1182. //---------------------------------------------------------------------------
  1183. void __fastcall TfrmMT6139Reg::edtCW4OTAENCheck(TObject *Sender)
  1184. {
  1185.     unsigned char  uc_data;
  1186.     AnsiString  text;
  1187.     TEdit *edit = (TEdit*)Sender;
  1188.     char  hint[] = " value shall be 0 or 1 ";
  1189.     text = edit->Text;
  1190.     if( !IsValidRegBit( text, uc_data ) )
  1191.     {
  1192.         ShowHintLabel( edit, hint );
  1193.         edit->Text = IntToStr( 0 );
  1194.         edit->SetFocus();
  1195.         return;
  1196.     }
  1197.     m_sMT6139CW4.uc_otaen = uc_data;
  1198. }
  1199. //---------------------------------------------------------------------------
  1200. void __fastcall TfrmMT6139Reg::edtCW4FLDISCheck(TObject *Sender)
  1201. {
  1202.     unsigned char  uc_data;
  1203.     AnsiString  text;
  1204.     TEdit *edit = (TEdit*)Sender;
  1205.     char  hint[] = " value shall be 0 or 1 ";
  1206.     text = edit->Text;
  1207.     if( !IsValidRegBit( text, uc_data ) )
  1208.     {
  1209.         ShowHintLabel( edit, hint );
  1210.         edit->Text = IntToStr( 0 );
  1211.         edit->SetFocus();
  1212.         return;
  1213.     }
  1214.     m_sMT6139CW4.uc_fldis = uc_data;
  1215. }
  1216. //---------------------------------------------------------------------------
  1217. void __fastcall TfrmMT6139Reg::edtCW4CAL_DELAYCheck(TObject *Sender)
  1218. {
  1219.     unsigned char  uc_data;
  1220.     AnsiString  text;
  1221.     TEdit *edit = (TEdit*)Sender;
  1222.     char  hint[] = " value shall be 0 or 1 ";
  1223.     text = edit->Text;
  1224.     if( !IsValidRegBit( text, uc_data ) )
  1225.     {
  1226.         ShowHintLabel( edit, hint );
  1227.         edit->Text = IntToStr( 0 );
  1228.         edit->SetFocus();
  1229.         return;
  1230.     }
  1231.     m_sMT6139CW4.uc_cal_delay = (m_sMT6139CW4.uc_cal_delay & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1232. }
  1233. //---------------------------------------------------------------------------
  1234. void __fastcall TfrmMT6139Reg::edtCW4VCO_VSETCheck(TObject *Sender)
  1235. {
  1236.     unsigned char  uc_data;
  1237.     AnsiString  text;
  1238.     TEdit *edit = (TEdit*)Sender;
  1239.     char  hint[] = " value shall be 0 or 1 ";
  1240.     text = edit->Text;
  1241.     if( !IsValidRegBit( text, uc_data ) )
  1242.     {
  1243.         ShowHintLabel( edit, hint );
  1244.         edit->Text = IntToStr( 0 );
  1245.         edit->SetFocus();
  1246.         return;
  1247.     }
  1248.     m_sMT6139CW4.uc_vco_vset = (m_sMT6139CW4.uc_vco_vset & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1249. }
  1250. //---------------------------------------------------------------------------
  1251. void __fastcall TfrmMT6139Reg::edtCW4DREADCheck(TObject *Sender)
  1252. {
  1253.     unsigned char  uc_data;
  1254.     AnsiString  text;
  1255.     TEdit *edit = (TEdit*)Sender;
  1256.     char  hint[] = " value shall be 0 or 1 ";
  1257.     text = edit->Text;
  1258.     if( !IsValidRegBit( text, uc_data ) )
  1259.     {
  1260.         ShowHintLabel( edit, hint );
  1261.         edit->Text = IntToStr( 0 );
  1262.         edit->SetFocus();
  1263.         return;
  1264.     }
  1265.     m_sMT6139CW4.uc_dread = uc_data;
  1266. }
  1267. //---------------------------------------------------------------------------
  1268. void __fastcall TfrmMT6139Reg::edtCW4CALMODECheck(TObject *Sender)
  1269. {
  1270.     unsigned char  uc_data;
  1271.     AnsiString  text;
  1272.     TEdit *edit = (TEdit*)Sender;
  1273.     char  hint[] = " value shall be 0 or 1 ";
  1274.     text = edit->Text;
  1275.     if( !IsValidRegBit( text, uc_data ) )
  1276.     {
  1277.         ShowHintLabel( edit, hint );
  1278.         edit->Text = IntToStr( 0 );
  1279.         edit->SetFocus();
  1280.         return;
  1281.     }
  1282.     m_sMT6139CW4.uc_calmode = (m_sMT6139CW4.uc_calmode & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1283. }
  1284. //---------------------------------------------------------------------------
  1285. void __fastcall TfrmMT6139Reg::edtCW4LGACCheck(TObject *Sender)
  1286. {
  1287.     unsigned char  uc_data;
  1288.     AnsiString  text;
  1289.     TEdit *edit = (TEdit*)Sender;
  1290.     char  hint[] = " value shall be 0 or 1 ";
  1291.     text = edit->Text;
  1292.     if( !IsValidRegBit( text, uc_data ) )
  1293.     {
  1294.         ShowHintLabel( edit, hint );
  1295.         edit->Text = IntToStr( 0 );
  1296.         edit->SetFocus();
  1297.         return;
  1298.     }
  1299.     m_sMT6139CW4.uc_lgac = uc_data;
  1300. }
  1301. //---------------------------------------------------------------------------
  1302. void __fastcall TfrmMT6139Reg::edtCW4MODREGCheck(TObject *Sender)
  1303. {
  1304.     unsigned char  uc_data;
  1305.     AnsiString  text;
  1306.     TEdit *edit = (TEdit*)Sender;
  1307.     char  hint[] = " value shall be 0 or 1 ";
  1308.     text = edit->Text;
  1309.     if( !IsValidRegBit( text, uc_data ) )
  1310.     {
  1311.         ShowHintLabel( edit, hint );
  1312.         edit->Text = IntToStr( 0 );
  1313.         edit->SetFocus();
  1314.         return;
  1315.     }
  1316.     m_sMT6139CW4.uc_modreg = uc_data;
  1317. }
  1318. //---------------------------------------------------------------------------
  1319. void __fastcall TfrmMT6139Reg::edtCW4C_FRA_INCheck(TObject *Sender)
  1320. {
  1321.     unsigned char  uc_data;
  1322.     AnsiString  text;
  1323.     TEdit *edit = (TEdit*)Sender;
  1324.     char  hint[] = " value shall be 0 or 1 ";
  1325.     text = edit->Text;
  1326.     if( !IsValidRegBit( text, uc_data ) )
  1327.     {
  1328.         ShowHintLabel( edit, hint );
  1329.         edit->Text = IntToStr( 0 );
  1330.         edit->SetFocus();
  1331.         return;
  1332.     }
  1333.     m_sMT6139CW4.uc_c_fra_in = uc_data;
  1334. }
  1335. //---------------------------------------------------------------------------
  1336. void __fastcall TfrmMT6139Reg::edtCW4SXRSTDIVCheck(TObject *Sender)
  1337. {
  1338.     unsigned char  uc_data;
  1339.     AnsiString  text;
  1340.     TEdit *edit = (TEdit*)Sender;
  1341.     char  hint[] = " value shall be 0 or 1 ";
  1342.     text = edit->Text;
  1343.     if( !IsValidRegBit( text, uc_data ) )
  1344.     {
  1345.         ShowHintLabel( edit, hint );
  1346.         edit->Text = IntToStr( 0 );
  1347.         edit->SetFocus();
  1348.         return;
  1349.     }
  1350.     m_sMT6139CW4.uc_sxrstdiv = uc_data;
  1351. }
  1352. //---------------------------------------------------------------------------
  1353. void __fastcall TfrmMT6139Reg::edtCW4SYNTYPCheck(TObject *Sender)
  1354. {
  1355.     unsigned char  uc_data;
  1356.     AnsiString  text;
  1357.     TEdit *edit = (TEdit*)Sender;
  1358.     char  hint[] = " value shall be 0 or 1 ";
  1359.     text = edit->Text;
  1360.     if( !IsValidRegBit( text, uc_data ) )
  1361.     {
  1362.         ShowHintLabel( edit, hint );
  1363.         edit->Text = IntToStr( 0 );
  1364.         edit->SetFocus();
  1365.         return;
  1366.     }
  1367.     m_sMT6139CW4.uc_syntyp = uc_data;
  1368. }
  1369. //---------------------------------------------------------------------------
  1370. void __fastcall TfrmMT6139Reg::edtCW4SYNPFDCheck(TObject *Sender)
  1371. {
  1372.     unsigned char  uc_data;
  1373.     AnsiString  text;
  1374.     TEdit *edit = (TEdit*)Sender;
  1375.     char  hint[] = " value shall be 0 or 1 ";
  1376.     text = edit->Text;
  1377.     if( !IsValidRegBit( text, uc_data ) )
  1378.     {
  1379.         ShowHintLabel( edit, hint );
  1380.         edit->Text = IntToStr( 0 );
  1381.         edit->SetFocus();
  1382.         return;
  1383.     }
  1384.     m_sMT6139CW4.uc_synpfd = (m_sMT6139CW4.uc_synpfd & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1385. }
  1386. //---------------------------------------------------------------------------
  1387. void __fastcall TfrmMT6139Reg::edtCW4SCA_CR_FICheck(TObject *Sender)
  1388. {
  1389.     unsigned char  uc_data;
  1390.     AnsiString  text;
  1391.     TEdit *edit = (TEdit*)Sender;
  1392.     char  hint[] = " value shall be 0 or 1 ";
  1393.     text = edit->Text;
  1394.     if( !IsValidRegBit( text, uc_data ) )
  1395.     {
  1396.         ShowHintLabel( edit, hint );
  1397.         edit->Text = IntToStr( 0 );
  1398.         edit->SetFocus();
  1399.         return;
  1400.     }
  1401.     m_sMT6139CW4.uc_sca_cr_fi = uc_data;    
  1402. }
  1403. //---------------------------------------------------------------------------
  1404. void __fastcall TfrmMT6139Reg::edtCW5RESBCheck(TObject *Sender)
  1405. {
  1406.     unsigned char  uc_data;
  1407.     AnsiString  text;
  1408.     TEdit *edit = (TEdit*)Sender;
  1409.     char  hint[] = " value shall be 0 or 1 ";
  1410.     text = edit->Text;
  1411.     if( !IsValidRegBit( text, uc_data ) )
  1412.     {
  1413.         ShowHintLabel( edit, hint );
  1414.         edit->Text = IntToStr( 0 );
  1415.         edit->SetFocus();
  1416.         return;
  1417.     }
  1418.     m_sMT6139CW5.uc_resb = (m_sMT6139CW5.uc_resb & (0x1F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;    
  1419. }
  1420. //---------------------------------------------------------------------------
  1421. void __fastcall TfrmMT6139Reg::edtCW5RESCheck(TObject *Sender)
  1422. {
  1423.     unsigned char  uc_data;
  1424.     AnsiString  text;
  1425.     TEdit *edit = (TEdit*)Sender;
  1426.     char  hint[] = " value shall be 0 or 1 ";
  1427.     text = edit->Text;
  1428.     if( !IsValidRegBit( text, uc_data ) )
  1429.     {
  1430.         ShowHintLabel( edit, hint );
  1431.         edit->Text = IntToStr( 0 );
  1432.         edit->SetFocus();
  1433.         return;
  1434.     }
  1435.     m_sMT6139CW5.uc_res = (m_sMT6139CW5.uc_res & (0x1F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1436. }
  1437. //---------------------------------------------------------------------------
  1438. void __fastcall TfrmMT6139Reg::edtCW6T_CLKCheck(TObject *Sender)
  1439. {
  1440.     unsigned char  uc_data;
  1441.     AnsiString  text;
  1442.     TEdit *edit = (TEdit*)Sender;
  1443.     char  hint[] = " value shall be 0 or 1 ";
  1444.     text = edit->Text;
  1445.     if( !IsValidRegBit( text, uc_data ) )
  1446.     {
  1447.         ShowHintLabel( edit, hint );
  1448.         edit->Text = IntToStr( 0 );
  1449.         edit->SetFocus();
  1450.         return;
  1451.     }
  1452.     m_sMT6139CW6.uc_t_clk = uc_data;    
  1453. }
  1454. //---------------------------------------------------------------------------
  1455. void __fastcall TfrmMT6139Reg::edtCW6T_LATCHCheck(TObject *Sender)
  1456. {
  1457.     unsigned char  uc_data;
  1458.     AnsiString  text;
  1459.     TEdit *edit = (TEdit*)Sender;
  1460.     char  hint[] = " value shall be 0 or 1 ";
  1461.     text = edit->Text;
  1462.     if( !IsValidRegBit( text, uc_data ) )
  1463.     {
  1464.         ShowHintLabel( edit, hint );
  1465.         edit->Text = IntToStr( 0 );
  1466.         edit->SetFocus();
  1467.         return;
  1468.     }
  1469.     m_sMT6139CW6.uc_t_latch = uc_data;    
  1470. }
  1471. //---------------------------------------------------------------------------
  1472. void __fastcall TfrmMT6139Reg::edtCW6VCOBUFPCheck(TObject *Sender)
  1473. {
  1474.     unsigned char  uc_data;
  1475.     AnsiString  text;
  1476.     TEdit *edit = (TEdit*)Sender;
  1477.     char  hint[] = " value shall be 0 or 1 ";
  1478.     text = edit->Text;
  1479.     if( !IsValidRegBit( text, uc_data ) )
  1480.     {
  1481.         ShowHintLabel( edit, hint );
  1482.         edit->Text = IntToStr( 0 );
  1483.         edit->SetFocus();
  1484.         return;
  1485.     }
  1486.     m_sMT6139CW6.uc_vco_bufp = uc_data;    
  1487. }
  1488. //---------------------------------------------------------------------------
  1489. void __fastcall TfrmMT6139Reg::edtCW6MONITORCheck(TObject *Sender)
  1490. {
  1491.     unsigned char  uc_data;
  1492.     AnsiString  text;
  1493.     TEdit *edit = (TEdit*)Sender;
  1494.     char  hint[] = " value shall be 0 or 1 ";
  1495.     text = edit->Text;
  1496.     if( !IsValidRegBit( text, uc_data ) )
  1497.     {
  1498.         ShowHintLabel( edit, hint );
  1499.         edit->Text = IntToStr( 0 );
  1500.         edit->SetFocus();
  1501.         return;
  1502.     }
  1503.     m_sMT6139CW6.uc_monitor = uc_data;    
  1504. }
  1505. //---------------------------------------------------------------------------
  1506. void __fastcall TfrmMT6139Reg::edtCW6SIO5Check(TObject *Sender)
  1507. {
  1508.     unsigned char  uc_data;
  1509.     AnsiString  text;
  1510.     TEdit *edit = (TEdit*)Sender;
  1511.     char  hint[] = " value shall be 0 or 1 ";
  1512.     text = edit->Text;
  1513.     if( !IsValidRegBit( text, uc_data ) )
  1514.     {
  1515.         ShowHintLabel( edit, hint );
  1516.         edit->Text = IntToStr( 0 );
  1517.         edit->SetFocus();
  1518.         return;
  1519.     }
  1520.     m_sMT6139CW6.uc_sio5 = uc_data;
  1521. }
  1522. //---------------------------------------------------------------------------
  1523. void __fastcall TfrmMT6139Reg::edtCW6VCO_SCACheck(TObject *Sender)
  1524. {
  1525.     unsigned char  uc_data;
  1526.     AnsiString  text;
  1527.     TEdit *edit = (TEdit*)Sender;
  1528.     char  hint[] = " value shall be 0 or 1 ";
  1529.     text = edit->Text;
  1530.     if( !IsValidRegBit( text, uc_data ) )
  1531.     {
  1532.         ShowHintLabel( edit, hint );
  1533.         edit->Text = IntToStr( 0 );
  1534.         edit->SetFocus();
  1535.         return;
  1536.     }
  1537.     m_sMT6139CW6.uc_vco_sca = (m_sMT6139CW6.uc_vco_sca & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1538. }
  1539. //---------------------------------------------------------------------------
  1540. void __fastcall TfrmMT6139Reg::edtCW6VCOSETCheck(TObject *Sender)
  1541. {
  1542.     unsigned char  uc_data;
  1543.     AnsiString  text;
  1544.     TEdit *edit = (TEdit*)Sender;
  1545.     char  hint[] = " value shall be 0 or 1 ";
  1546.     text = edit->Text;
  1547.     if( !IsValidRegBit( text, uc_data ) )
  1548.     {
  1549.         ShowHintLabel( edit, hint );
  1550.         edit->Text = IntToStr( 0 );
  1551.         edit->SetFocus();
  1552.         return;
  1553.     }
  1554.     m_sMT6139CW6.uc_vcoset = uc_data;
  1555. }
  1556. //---------------------------------------------------------------------------
  1557. void __fastcall TfrmMT6139Reg::edtCW7LPF_CORNERCheck(TObject *Sender)
  1558. {
  1559.     unsigned char  uc_data;
  1560.     AnsiString  text;
  1561.     TEdit *edit = (TEdit*)Sender;
  1562.     char  hint[] = " value shall be 0 or 1 ";
  1563.     text = edit->Text;
  1564.     if( !IsValidRegBit( text, uc_data ) )
  1565.     {
  1566.         ShowHintLabel( edit, hint );
  1567.         edit->Text = IntToStr( 0 );
  1568.         edit->SetFocus();
  1569.         return;
  1570.     }
  1571.     m_sMT6139CW7.uc_lpf_corner = uc_data;    
  1572. }
  1573. //---------------------------------------------------------------------------
  1574. void __fastcall TfrmMT6139Reg::edtCW7MAN_CALCheck(TObject *Sender)
  1575. {
  1576.     unsigned char  uc_data;
  1577.     AnsiString  text;
  1578.     TEdit *edit = (TEdit*)Sender;
  1579.     char  hint[] = " value shall be 0 or 1 ";
  1580.     text = edit->Text;
  1581.     if( !IsValidRegBit( text, uc_data ) )
  1582.     {
  1583.         ShowHintLabel( edit, hint );
  1584.         edit->Text = IntToStr( 0 );
  1585.         edit->SetFocus();
  1586.         return;
  1587.     }
  1588.     m_sMT6139CW7.uc_man_cal = uc_data;
  1589. }
  1590. //---------------------------------------------------------------------------
  1591. void __fastcall TfrmMT6139Reg::edtCW7AUTO_GAIN_SELCheck(TObject *Sender)
  1592. {
  1593.     unsigned char  uc_data;
  1594.     AnsiString  text;
  1595.     TEdit *edit = (TEdit*)Sender;
  1596.     char  hint[] = " value shall be 0 or 1 ";
  1597.     text = edit->Text;
  1598.     if( !IsValidRegBit( text, uc_data ) )
  1599.     {
  1600.         ShowHintLabel( edit, hint );
  1601.         edit->Text = IntToStr( 0 );
  1602.         edit->SetFocus();
  1603.         return;
  1604.     }
  1605.     m_sMT6139CW7.uc_auto_gain_select = uc_data;
  1606. }
  1607. //---------------------------------------------------------------------------
  1608. void __fastcall TfrmMT6139Reg::edtCW7RX_GAINCheck(TObject *Sender)
  1609. {
  1610.     unsigned char  uc_data;
  1611.     AnsiString  text;
  1612.     TEdit *edit = (TEdit*)Sender;
  1613.     char  hint[] = " value shall be 0 or 1 ";
  1614.     text = edit->Text;
  1615.     if( !IsValidRegBit( text, uc_data ) )
  1616.     {
  1617.         ShowHintLabel( edit, hint );
  1618.         edit->Text = IntToStr( 0 );
  1619.         edit->SetFocus();
  1620.         return;
  1621.     }
  1622.     m_sMT6139CW7.uc_rx_gain = (m_sMT6139CW7.uc_rx_gain & (0xFF ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1623. }
  1624. //---------------------------------------------------------------------------
  1625. void __fastcall TfrmMT6139Reg::edtCW8RX_CTRL_SWCheck(TObject *Sender)
  1626. {
  1627.     unsigned char  uc_data;
  1628.     AnsiString  text;
  1629.     TEdit *edit = (TEdit*)Sender;
  1630.     char  hint[] = " value shall be 0 or 1 ";
  1631.     text = edit->Text;
  1632.     if( !IsValidRegBit( text, uc_data ) )
  1633.     {
  1634.         ShowHintLabel( edit, hint );
  1635.         edit->Text = IntToStr( 0 );
  1636.         edit->SetFocus();
  1637.         return;
  1638.     }
  1639.     m_sMT6139CW8.uc_rx_ctrl_sw = (m_sMT6139CW8.uc_rx_ctrl_sw & (0x1F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1640. }
  1641. //---------------------------------------------------------------------------
  1642. void __fastcall TfrmMT6139Reg::edtCW8RX_CTRL_SWENCheck(TObject *Sender)
  1643. {
  1644.     unsigned char  uc_data;
  1645.     AnsiString  text;
  1646.     TEdit *edit = (TEdit*)Sender;
  1647.     char  hint[] = " value shall be 0 or 1 ";
  1648.     text = edit->Text;
  1649.     if( !IsValidRegBit( text, uc_data ) )
  1650.     {
  1651.         ShowHintLabel( edit, hint );
  1652.         edit->Text = IntToStr( 0 );
  1653.         edit->SetFocus();
  1654.         return;
  1655.     }
  1656.     m_sMT6139CW8.uc_rx_ctrl_swen = uc_data;
  1657. }
  1658. //---------------------------------------------------------------------------
  1659. void __fastcall TfrmMT6139Reg::edtCW8DC_DAC_BICheck(TObject *Sender)
  1660. {
  1661.     unsigned char  uc_data;
  1662.     AnsiString  text;
  1663.     TEdit *edit = (TEdit*)Sender;
  1664.     char  hint[] = " value shall be 0 or 1 ";
  1665.     text = edit->Text;
  1666.     if( !IsValidRegBit( text, uc_data ) )
  1667.     {
  1668.         ShowHintLabel( edit, hint );
  1669.         edit->Text = IntToStr( 0 );
  1670.         edit->SetFocus();
  1671.         return;
  1672.     }
  1673.     m_sMT6139CW8.uc_dc_dac_bi = (m_sMT6139CW8.uc_dc_dac_bi & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1674. }
  1675. //---------------------------------------------------------------------------
  1676. void __fastcall TfrmMT6139Reg::edtCW8DC_DAC_CICheck(TObject *Sender)
  1677. {
  1678.     unsigned char  uc_data;
  1679.     AnsiString  text;
  1680.     TEdit *edit = (TEdit*)Sender;
  1681.     char  hint[] = " value shall be 0 or 1 ";
  1682.     text = edit->Text;
  1683.     if( !IsValidRegBit( text, uc_data ) )
  1684.     {
  1685.         ShowHintLabel( edit, hint );
  1686.         edit->Text = IntToStr( 0 );
  1687.         edit->SetFocus();
  1688.         return;
  1689.     }
  1690.     m_sMT6139CW8.uc_dc_dac_ci = (m_sMT6139CW8.uc_dc_dac_ci & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1691. }
  1692. //---------------------------------------------------------------------------
  1693. void __fastcall TfrmMT6139Reg::edtCW9PWR_DAC_AMCheck(TObject *Sender)
  1694. {
  1695.     unsigned char  uc_data;
  1696.     AnsiString  text;
  1697.     TEdit *edit = (TEdit*)Sender;
  1698.     char  hint[] = " value shall be 0 or 1 ";
  1699.     text = edit->Text;
  1700.     if( !IsValidRegBit( text, uc_data ) )
  1701.     {
  1702.         ShowHintLabel( edit, hint );
  1703.         edit->Text = IntToStr( 0 );
  1704.         edit->SetFocus();
  1705.         return;
  1706.     }
  1707.     m_sMT6139CW9.uc_pwr_dac_am = uc_data;
  1708. }
  1709. //---------------------------------------------------------------------------
  1710. void __fastcall TfrmMT6139Reg::edtCW9PWR_DAC_ACheck(TObject *Sender)
  1711. {
  1712.     unsigned char  uc_data;
  1713.     AnsiString  text;
  1714.     TEdit *edit = (TEdit*)Sender;
  1715.     char  hint[] = " value shall be 0 or 1 ";
  1716.     text = edit->Text;
  1717.     if( !IsValidRegBit( text, uc_data ) )
  1718.     {
  1719.         ShowHintLabel( edit, hint );
  1720.         edit->Text = IntToStr( 0 );
  1721.         edit->SetFocus();
  1722.         return;
  1723.     }
  1724.     m_sMT6139CW9.uc_pwr_dac_a = uc_data;
  1725. }
  1726. //---------------------------------------------------------------------------
  1727. void __fastcall TfrmMT6139Reg::edtCW9PWR_DAC_BCheck(TObject *Sender)
  1728. {
  1729.     unsigned char  uc_data;
  1730.     AnsiString  text;
  1731.     TEdit *edit = (TEdit*)Sender;
  1732.     char  hint[] = " value shall be 0 or 1 ";
  1733.     text = edit->Text;
  1734.     if( !IsValidRegBit( text, uc_data ) )
  1735.     {
  1736.         ShowHintLabel( edit, hint );
  1737.         edit->Text = IntToStr( 0 );
  1738.         edit->SetFocus();
  1739.         return;
  1740.     }
  1741.     m_sMT6139CW9.uc_pwr_dac_b = uc_data;    
  1742. }
  1743. //---------------------------------------------------------------------------
  1744. void __fastcall TfrmMT6139Reg::edtCW9PWR_DAC_CCheck(TObject *Sender)
  1745. {
  1746.     unsigned char  uc_data;
  1747.     AnsiString  text;
  1748.     TEdit *edit = (TEdit*)Sender;
  1749.     char  hint[] = " value shall be 0 or 1 ";
  1750.     text = edit->Text;
  1751.     if( !IsValidRegBit( text, uc_data ) )
  1752.     {
  1753.         ShowHintLabel( edit, hint );
  1754.         edit->Text = IntToStr( 0 );
  1755.         edit->SetFocus();
  1756.         return;
  1757.     }
  1758.     m_sMT6139CW9.uc_pwr_dac_c = uc_data;    
  1759. }
  1760. //---------------------------------------------------------------------------
  1761. void __fastcall TfrmMT6139Reg::edtCW9DC_DAC_BQCheck(TObject *Sender)
  1762. {
  1763.     unsigned char  uc_data;
  1764.     AnsiString  text;
  1765.     TEdit *edit = (TEdit*)Sender;
  1766.     char  hint[] = " value shall be 0 or 1 ";
  1767.     text = edit->Text;
  1768.     if( !IsValidRegBit( text, uc_data ) )
  1769.     {
  1770.         ShowHintLabel( edit, hint );
  1771.         edit->Text = IntToStr( 0 );
  1772.         edit->SetFocus();
  1773.         return;
  1774.     }
  1775.     m_sMT6139CW9.uc_dc_dac_bq = (m_sMT6139CW9.uc_dc_dac_bq & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1776. }
  1777. //---------------------------------------------------------------------------
  1778. void __fastcall TfrmMT6139Reg::edtCW9DC_DAC_CQCheck(TObject *Sender)
  1779. {
  1780.     unsigned char  uc_data;
  1781.     AnsiString  text;
  1782.     TEdit *edit = (TEdit*)Sender;
  1783.     char  hint[] = " value shall be 0 or 1 ";
  1784.     text = edit->Text;
  1785.     if( !IsValidRegBit( text, uc_data ) )
  1786.     {
  1787.         ShowHintLabel( edit, hint );
  1788.         edit->Text = IntToStr( 0 );
  1789.         edit->SetFocus();
  1790.         return;
  1791.     }
  1792.     m_sMT6139CW9.uc_dc_dac_cq = (m_sMT6139CW9.uc_dc_dac_cq & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1793. }
  1794. //---------------------------------------------------------------------------
  1795. void __fastcall TfrmMT6139Reg::edtCW10AM_DACICheck(TObject *Sender)
  1796. {
  1797.     unsigned char  uc_data;
  1798.     AnsiString  text;
  1799.     TEdit *edit = (TEdit*)Sender;
  1800.     char  hint[] = " value shall be 0 or 1 ";
  1801.     text = edit->Text;
  1802.     if( !IsValidRegBit( text, uc_data ) )
  1803.     {
  1804.         ShowHintLabel( edit, hint );
  1805.         edit->Text = IntToStr( 0 );
  1806.         edit->SetFocus();
  1807.         return;
  1808.     }
  1809.     m_sMT6139CW10.uc_am_daci = (m_sMT6139CW10.uc_am_daci & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1810. }
  1811. //---------------------------------------------------------------------------
  1812. void __fastcall TfrmMT6139Reg::edtCW10AM_DACQCheck(TObject *Sender)
  1813. {
  1814.     unsigned char  uc_data;
  1815.     AnsiString  text;
  1816.     TEdit *edit = (TEdit*)Sender;
  1817.     char  hint[] = " value shall be 0 or 1 ";
  1818.     text = edit->Text;
  1819.     if( !IsValidRegBit( text, uc_data ) )
  1820.     {
  1821.         ShowHintLabel( edit, hint );
  1822.         edit->Text = IntToStr( 0 );
  1823.         edit->SetFocus();
  1824.         return;
  1825.     }
  1826.     m_sMT6139CW10.uc_am_dacq = (m_sMT6139CW10.uc_am_dacq & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;    
  1827. }
  1828. //---------------------------------------------------------------------------
  1829. void __fastcall TfrmMT6139Reg::edtCW11TXVAPCCheck(TObject *Sender)
  1830. {
  1831.     unsigned char  uc_data;
  1832.     AnsiString  text;
  1833.     TEdit *edit = (TEdit*)Sender;
  1834.     char  hint[] = " value shall be 0 or 1 ";
  1835.     text = edit->Text;
  1836.     if( !IsValidRegBit( text, uc_data ) )
  1837.     {
  1838.         ShowHintLabel( edit, hint );
  1839.         edit->Text = IntToStr( 0 );
  1840.         edit->SetFocus();
  1841.         return;
  1842.     }
  1843.     m_sMT6139CW11.uc_txvapc = (m_sMT6139CW11.uc_txvapc & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1844. }
  1845. //---------------------------------------------------------------------------
  1846. void __fastcall TfrmMT6139Reg::edtCW11TX_PWCheck(TObject *Sender)
  1847. {
  1848.     unsigned char  uc_data;
  1849.     AnsiString  text;
  1850.     TEdit *edit = (TEdit*)Sender;
  1851.     char  hint[] = " value shall be 0 or 1 ";
  1852.     text = edit->Text;
  1853.     if( !IsValidRegBit( text, uc_data ) )
  1854.     {
  1855.         ShowHintLabel( edit, hint );
  1856.         edit->Text = IntToStr( 0 );
  1857.         edit->SetFocus();
  1858.         return;
  1859.     }
  1860.     m_sMT6139CW11.uc_tx_pw = (m_sMT6139CW11.uc_tx_pw & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1861. }
  1862. //---------------------------------------------------------------------------
  1863. void __fastcall TfrmMT6139Reg::edtCW11TXFLTCheck(TObject *Sender)
  1864. {
  1865.     unsigned char  uc_data;
  1866.     AnsiString  text;
  1867.     TEdit *edit = (TEdit*)Sender;
  1868.     char  hint[] = " value shall be 0 or 1 ";
  1869.     text = edit->Text;
  1870.     if( !IsValidRegBit( text, uc_data ) )
  1871.     {
  1872.         ShowHintLabel( edit, hint );
  1873.         edit->Text = IntToStr( 0 );
  1874.         edit->SetFocus();
  1875.         return;
  1876.     }
  1877.     m_sMT6139CW11.uc_txflt = (m_sMT6139CW11.uc_txflt & (0x0F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1878. }
  1879. //---------------------------------------------------------------------------
  1880. void __fastcall TfrmMT6139Reg::edtCW11TXMODGAINCheck(TObject *Sender)
  1881. {
  1882.     unsigned char  uc_data;
  1883.     AnsiString  text;
  1884.     TEdit *edit = (TEdit*)Sender;
  1885.     char  hint[] = " value shall be 0 or 1 ";
  1886.     text = edit->Text;
  1887.     if( !IsValidRegBit( text, uc_data ) )
  1888.     {
  1889.         ShowHintLabel( edit, hint );
  1890.         edit->Text = IntToStr( 0 );
  1891.         edit->SetFocus();
  1892.         return;
  1893.     }
  1894.     m_sMT6139CW11.uc_txmodgain = (m_sMT6139CW11.uc_txmodgain & (0x07 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  1895. }
  1896. //---------------------------------------------------------------------------
  1897. void __fastcall TfrmMT6139Reg::edtCW11TXGBUFCheck(TObject *Sender)
  1898. {
  1899.     unsigned char  uc_data;
  1900.     AnsiString  text;
  1901.     TEdit *edit = (TEdit*)Sender;
  1902.     char  hint[] = " value shall be 0 or 1 ";
  1903.     text = edit->Text;
  1904.     if( !IsValidRegBit( text, uc_data ) )
  1905.     {
  1906.         ShowHintLabel( edit, hint );
  1907.         edit->Text = IntToStr( 0 );
  1908.         edit->SetFocus();
  1909.         return;
  1910.     }
  1911.     m_sMT6139CW11.uc_txgbuf = uc_data;
  1912. }
  1913. //---------------------------------------------------------------------------
  1914. void __fastcall TfrmMT6139Reg::edtCW11TXDBUFCheck(TObject *Sender)
  1915. {
  1916.     unsigned char  uc_data;
  1917.     AnsiString  text;
  1918.     TEdit *edit = (TEdit*)Sender;
  1919.     char  hint[] = " value shall be 0 or 1 ";
  1920.     text = edit->Text;
  1921.     if( !IsValidRegBit( text, uc_data ) )
  1922.     {
  1923.         ShowHintLabel( edit, hint );
  1924.         edit->Text = IntToStr( 0 );
  1925.         edit->SetFocus();
  1926.         return;
  1927.     }
  1928.     m_sMT6139CW11.uc_txdbuf = uc_data;    
  1929. }
  1930. //---------------------------------------------------------------------------
  1931. void __fastcall TfrmMT6139Reg::edtCW11TXDIV4Check(TObject *Sender)
  1932. {
  1933.     unsigned char  uc_data;
  1934.     AnsiString  text;
  1935.     TEdit *edit = (TEdit*)Sender;
  1936.     char  hint[] = " value shall be 0 or 1 ";
  1937.     text = edit->Text;
  1938.     if( !IsValidRegBit( text, uc_data ) )
  1939.     {
  1940.         ShowHintLabel( edit, hint );
  1941.         edit->Text = IntToStr( 0 );
  1942.         edit->SetFocus();
  1943.         return;
  1944.     }
  1945.     m_sMT6139CW11.uc_txdiv4 = uc_data;    
  1946. }
  1947. //---------------------------------------------------------------------------
  1948. void __fastcall TfrmMT6139Reg::edtCW11TXDIV2Check(TObject *Sender)
  1949. {
  1950.     unsigned char  uc_data;
  1951.     AnsiString  text;
  1952.     TEdit *edit = (TEdit*)Sender;
  1953.     char  hint[] = " value shall be 0 or 1 ";
  1954.     text = edit->Text;
  1955.     if( !IsValidRegBit( text, uc_data ) )
  1956.     {
  1957.         ShowHintLabel( edit, hint );
  1958.         edit->Text = IntToStr( 0 );
  1959.         edit->SetFocus();
  1960.         return;
  1961.     }
  1962.     m_sMT6139CW11.uc_txdiv2 = uc_data;    
  1963. }
  1964. //---------------------------------------------------------------------------
  1965. void __fastcall TfrmMT6139Reg::edtCW11TXDIQMCheck(TObject *Sender)
  1966. {
  1967.     unsigned char  uc_data;
  1968.     AnsiString  text;
  1969.     TEdit *edit = (TEdit*)Sender;
  1970.     char  hint[] = " value shall be 0 or 1 ";
  1971.     text = edit->Text;
  1972.     if( !IsValidRegBit( text, uc_data ) )
  1973.     {
  1974.         ShowHintLabel( edit, hint );
  1975.         edit->Text = IntToStr( 0 );
  1976.         edit->SetFocus();
  1977.         return;
  1978.     }
  1979.     m_sMT6139CW11.uc_txdiqm = uc_data;    
  1980. }
  1981. //---------------------------------------------------------------------------
  1982. void __fastcall TfrmMT6139Reg::edtCW11TXGIQMCheck(TObject *Sender)
  1983. {
  1984.     unsigned char  uc_data;
  1985.     AnsiString  text;
  1986.     TEdit *edit = (TEdit*)Sender;
  1987.     char  hint[] = " value shall be 0 or 1 ";
  1988.     text = edit->Text;
  1989.     if( !IsValidRegBit( text, uc_data ) )
  1990.     {
  1991.         ShowHintLabel( edit, hint );
  1992.         edit->Text = IntToStr( 0 );
  1993.         edit->SetFocus();
  1994.         return;
  1995.     }
  1996.     m_sMT6139CW11.uc_txgiqm = uc_data;    
  1997. }
  1998. //---------------------------------------------------------------------------
  1999. void __fastcall TfrmMT6139Reg::edtCW11TXCTLCheck(TObject *Sender)
  2000. {
  2001.     unsigned char  uc_data;
  2002.     AnsiString  text;
  2003.     TEdit *edit = (TEdit*)Sender;
  2004.     char  hint[] = " value shall be 0 or 1 ";
  2005.     text = edit->Text;
  2006.     if( !IsValidRegBit( text, uc_data ) )
  2007.     {
  2008.         ShowHintLabel( edit, hint );
  2009.         edit->Text = IntToStr( 0 );
  2010.         edit->SetFocus();
  2011.         return;
  2012.     }
  2013.     m_sMT6139CW11.uc_txctl = uc_data;
  2014. }
  2015. //---------------------------------------------------------------------------
  2016. void __fastcall TfrmMT6139Reg::edtCW11TXDIV_GC1Check(TObject *Sender)
  2017. {
  2018.     unsigned char  uc_data;
  2019.     AnsiString  text;
  2020.     TEdit *edit = (TEdit*)Sender;
  2021.     char  hint[] = " value shall be 0 or 1 ";
  2022.     text = edit->Text;
  2023.     if( !IsValidRegBit( text, uc_data ) )
  2024.     {
  2025.         ShowHintLabel( edit, hint );
  2026.         edit->Text = IntToStr( 0 );
  2027.         edit->SetFocus();
  2028.         return;
  2029.     }
  2030.     m_sMT6139CW11.uc_txdiv_gc1 = uc_data;
  2031. }
  2032. //---------------------------------------------------------------------------
  2033. void __fastcall TfrmMT6139Reg::edtCW11TXDIV_GC0Check(TObject *Sender)
  2034. {
  2035.     unsigned char  uc_data;
  2036.     AnsiString  text;
  2037.     TEdit *edit = (TEdit*)Sender;
  2038.     char  hint[] = " value shall be 0 or 1 ";
  2039.     text = edit->Text;
  2040.     if( !IsValidRegBit( text, uc_data ) )
  2041.     {
  2042.         ShowHintLabel( edit, hint );
  2043.         edit->Text = IntToStr( 0 );
  2044.         edit->SetFocus();
  2045.         return;
  2046.     }
  2047.     m_sMT6139CW11.uc_txdiv_gc0 = uc_data;
  2048. }
  2049. //---------------------------------------------------------------------------
  2050. void __fastcall TfrmMT6139Reg::edtCW11TXBIASTCheck(TObject *Sender)
  2051. {
  2052.     unsigned char  uc_data;
  2053.     AnsiString  text;
  2054.     TEdit *edit = (TEdit*)Sender;
  2055.     char  hint[] = " value shall be 0 or 1 ";
  2056.     text = edit->Text;
  2057.     if( !IsValidRegBit( text, uc_data ) )
  2058.     {
  2059.         ShowHintLabel( edit, hint );
  2060.         edit->Text = IntToStr( 0 );
  2061.         edit->SetFocus();
  2062.         return;
  2063.     }
  2064.     m_sMT6139CW11.uc_txbiast = (m_sMT6139CW11.uc_txbiast & (0x03 ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  2065. }
  2066. //---------------------------------------------------------------------------
  2067. void __fastcall TfrmMT6139Reg::edtCW15AUXOUT_SELETCIONCheck(
  2068.       TObject *Sender)
  2069. {
  2070.     unsigned char  uc_data;
  2071.     AnsiString  text;
  2072.     TEdit *edit = (TEdit*)Sender;
  2073.     char  hint[] = " value shall be 0 or 1 ";
  2074.     text = edit->Text;
  2075.     if( !IsValidRegBit( text, uc_data ) )
  2076.     {
  2077.         ShowHintLabel( edit, hint );
  2078.         edit->Text = IntToStr( 0 );
  2079.         edit->SetFocus();
  2080.         return;
  2081.     }
  2082.     m_sMT6139CW15.uc_auxout_selection = (m_sMT6139CW15.uc_auxout_selection & (0x7F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  2083. }
  2084. //---------------------------------------------------------------------------
  2085. void __fastcall TfrmMT6139Reg::edtCW15ADDRESS_DATA_OUTCheck(
  2086.       TObject *Sender)
  2087. {
  2088.     unsigned char  uc_data;
  2089.     AnsiString  text;
  2090.     TEdit *edit = (TEdit*)Sender;
  2091.     char  hint[] = " value shall be 0 or 1 ";
  2092.     text = edit->Text;
  2093.     if( !IsValidRegBit( text, uc_data ) )
  2094.     {
  2095.         ShowHintLabel( edit, hint );
  2096.         edit->Text = IntToStr( 0 );
  2097.         edit->SetFocus();
  2098.         return;
  2099.     }
  2100.     m_sMT6139CW15.uc_address_data_out = (m_sMT6139CW15.uc_address_data_out & (0x0F ^ (0x01<<edit->Tag)) ) | uc_data<<edit->Tag;
  2101. }
  2102. //---------------------------------------------------------------------------
  2103. void __fastcall TfrmMT6139Reg::btnReadCW0FromRegClick(TObject *Sender)
  2104. {
  2105.     CurrentPageLock();
  2106.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW0FromReg;
  2107.     m_cRF_MT6139Reg_Obj.Get_MT6139CW0FromReg_Start(m_uiFinalRfid);
  2108.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW0 from register progressing";
  2109. }
  2110. //---------------------------------------------------------------------------
  2111. void TfrmMT6139Reg::CNF_GetMT6139CW0FromReg( void )
  2112. {
  2113.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2114.     switch( state )
  2115.     {
  2116.         case METAAPP_SUCCESS:
  2117.         {
  2118.             m_sMT6139CW0 = m_cRF_MT6139Reg_Obj.Get_MT6139CW0();
  2119.             ReDrawCW0Fields();
  2120.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW0 from register successfully";
  2121.         }
  2122.         break;
  2123.         case METAAPP_FAIL:
  2124.         {
  2125.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW0 from register fail";
  2126.             Application->MessageBox( "Execution Failure : Get MT6139 CW0 from register", "FAILURE", MB_OK );
  2127.         }
  2128.         break;
  2129.         case METAAPP_TIMEOUT:
  2130.         {
  2131.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW0 from register timeout";
  2132.             Application->MessageBox( "Execution Timeout : Get MT6139 CW0 from register", "TIMEOUT", MB_OK );
  2133.         }
  2134.         break;
  2135.         case METAAPP_STOP:
  2136.         {
  2137.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW0 from register stop";
  2138.         }
  2139.         break;
  2140.     }
  2141.     CurrentPageReset();
  2142. }
  2143. //---------------------------------------------------------------------------
  2144. void __fastcall TfrmMT6139Reg::btnWriteCW0ToRegClick(TObject *Sender)
  2145. {
  2146.     CurrentPageLock();
  2147.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW0ToReg;
  2148.     m_cRF_MT6139Reg_Obj.Set_MT6139CW0ToReg_Start( m_sMT6139CW0, m_uiFinalRfid );
  2149.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW0 to register progressing";
  2150. }
  2151. //---------------------------------------------------------------------------
  2152. void TfrmMT6139Reg::CNF_SetMT6139CW0ToReg( void )
  2153. {
  2154.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2155.     switch( state )
  2156.     {
  2157.         case METAAPP_SUCCESS:
  2158.         {
  2159.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW0 to register successfully";
  2160.         }
  2161.         break;
  2162.         case METAAPP_FAIL:
  2163.         {
  2164.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW0 to register fail";
  2165.             Application->MessageBox( "Execution Failure : Set MT6139 CW0 to register", "FAILURE", MB_OK );
  2166.         }
  2167.         break;
  2168.         case METAAPP_TIMEOUT:
  2169.         {
  2170.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW0 to register timeout";
  2171.             Application->MessageBox( "Execution Timeout : Set MT6139 CW0 to register", "TIMEOUT", MB_OK );
  2172.         }
  2173.         break;
  2174.         case METAAPP_STOP:
  2175.         {
  2176.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW0 to register stop";
  2177.         }
  2178.         break;
  2179.     }
  2180.     CurrentPageReset();
  2181. }
  2182. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2183. void __fastcall TfrmMT6139Reg::btnReadCW1FromRegClick(TObject *Sender)
  2184. {
  2185.     CurrentPageLock();
  2186.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW1FromReg;
  2187.     m_cRF_MT6139Reg_Obj.Get_MT6139CW1FromReg_Start( m_uiFinalRfid );
  2188.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW1 from register progressing";
  2189. }
  2190. //---------------------------------------------------------------------------
  2191. void TfrmMT6139Reg::CNF_GetMT6139CW1FromReg( void )
  2192. {
  2193.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2194.     switch( state )
  2195.     {
  2196.         case METAAPP_SUCCESS:
  2197.         {
  2198.             m_sMT6139CW1 = m_cRF_MT6139Reg_Obj.Get_MT6139CW1();
  2199.             ReDrawCW1Fields();
  2200.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW1 from register successfully";
  2201.         }
  2202.         break;
  2203.         case METAAPP_FAIL:
  2204.         {
  2205.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW1 from register fail";
  2206.             Application->MessageBox( "Execution Failure : Get MT6139 CW1 from register", "FAILURE", MB_OK );
  2207.         }
  2208.         break;
  2209.         case METAAPP_TIMEOUT:
  2210.         {
  2211.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW1 from register timeout";
  2212.             Application->MessageBox( "Execution Timeout : Get MT6139 CW1 from register", "TIMEOUT", MB_OK );
  2213.         }
  2214.         break;
  2215.         case METAAPP_STOP:
  2216.         {
  2217.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW1 from register stop";
  2218.         }
  2219.         break;
  2220.     }
  2221.     CurrentPageReset();
  2222. }
  2223. //---------------------------------------------------------------------------
  2224. void __fastcall TfrmMT6139Reg::btnWriteCW1ToRegClick(TObject *Sender)
  2225. {
  2226.     CurrentPageLock();
  2227.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW1ToReg;
  2228.     m_cRF_MT6139Reg_Obj.Set_MT6139CW1ToReg_Start(m_sMT6139CW1, m_uiFinalRfid);
  2229.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW1 to register progressing";
  2230. }
  2231. //---------------------------------------------------------------------------
  2232. void TfrmMT6139Reg::CNF_SetMT6139CW1ToReg( void )
  2233. {
  2234.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2235.     switch( state )
  2236.     {
  2237.         case METAAPP_SUCCESS:
  2238.         {
  2239.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW1 to register successfully";
  2240.         }
  2241.         break;
  2242.         case METAAPP_FAIL:
  2243.         {
  2244.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW1 to register fail";
  2245.             Application->MessageBox( "Execution Failure : Set MT6139 CW1 to register", "FAILURE", MB_OK );
  2246.         }
  2247.         break;
  2248.         case METAAPP_TIMEOUT:
  2249.         {
  2250.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW1 to register timeout";
  2251.             Application->MessageBox( "Execution Timeout : Set MT6139 CW1 to register", "TIMEOUT", MB_OK );
  2252.         }
  2253.         break;
  2254.         case METAAPP_STOP:
  2255.         {
  2256.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW1 to register stop";
  2257.         }
  2258.         break;
  2259.     }
  2260.     CurrentPageReset();
  2261. }
  2262. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2263. void __fastcall TfrmMT6139Reg::btnReadCW2FromRegClick(TObject *Sender)
  2264. {
  2265.     CurrentPageLock();
  2266.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW2FromReg;
  2267.     m_cRF_MT6139Reg_Obj.Get_MT6139CW2FromReg_Start(m_uiFinalRfid);
  2268.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW2 from register progressing";
  2269. }
  2270. //---------------------------------------------------------------------------
  2271. void TfrmMT6139Reg::CNF_GetMT6139CW2FromReg( void )
  2272. {
  2273.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2274.     switch( state )
  2275.     {
  2276.         case METAAPP_SUCCESS:
  2277.         {
  2278.             m_sMT6139CW2 = m_cRF_MT6139Reg_Obj.Get_MT6139CW2();
  2279.             ReDrawCW2Fields();
  2280.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW2 from register successfully";
  2281.         }
  2282.         break;
  2283.         case METAAPP_FAIL:
  2284.         {
  2285.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW2 from register fail";
  2286.             Application->MessageBox( "Execution Failure : Get MT6139 CW2 from register", "FAILURE", MB_OK );
  2287.         }
  2288.         break;
  2289.         case METAAPP_TIMEOUT:
  2290.         {
  2291.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW2 from register timeout";
  2292.             Application->MessageBox( "Execution Timeout : Get MT6139 CW2 from register", "TIMEOUT", MB_OK );
  2293.         }
  2294.         break;
  2295.         case METAAPP_STOP:
  2296.         {
  2297.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW2 from register stop";
  2298.         }
  2299.         break;
  2300.     }
  2301.     CurrentPageReset();
  2302. }
  2303. //---------------------------------------------------------------------------
  2304. void __fastcall TfrmMT6139Reg::btnWriteCW2ToRegClick(TObject *Sender)
  2305. {
  2306.     CurrentPageLock();
  2307.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW2ToReg;
  2308.     m_cRF_MT6139Reg_Obj.Set_MT6139CW2ToReg_Start(m_sMT6139CW2, m_uiFinalRfid);
  2309.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW2 to register progressing";
  2310. }
  2311. //---------------------------------------------------------------------------
  2312. void TfrmMT6139Reg::CNF_SetMT6139CW2ToReg( void )
  2313. {
  2314.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2315.     switch( state )
  2316.     {
  2317.         case METAAPP_SUCCESS:
  2318.         {
  2319.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW2 to register successfully";
  2320.         }
  2321.         break;
  2322.         case METAAPP_FAIL:
  2323.         {
  2324.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW2 to register fail";
  2325.             Application->MessageBox( "Execution Failure : Set MT6139 CW2 to register", "FAILURE", MB_OK );
  2326.         }
  2327.         break;
  2328.         case METAAPP_TIMEOUT:
  2329.         {
  2330.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW2 to register timeout";
  2331.             Application->MessageBox( "Execution Timeout : Set MT6139 CW2 to register", "TIMEOUT", MB_OK );
  2332.         }
  2333.         break;
  2334.         case METAAPP_STOP:
  2335.         {
  2336.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW2 to register stop";
  2337.         }
  2338.         break;
  2339.     }
  2340.     CurrentPageReset();
  2341. }
  2342. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2343. void __fastcall TfrmMT6139Reg::btnReadCW3FromRegClick(TObject *Sender)
  2344. {
  2345.     CurrentPageLock();
  2346.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW3FromReg;
  2347.     m_cRF_MT6139Reg_Obj.Get_MT6139CW3FromReg_Start(m_uiFinalRfid);
  2348.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW3 from register progressing";
  2349. }
  2350. //---------------------------------------------------------------------------
  2351. void TfrmMT6139Reg::CNF_GetMT6139CW3FromReg( void )
  2352. {
  2353.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2354.     switch( state )
  2355.     {
  2356.         case METAAPP_SUCCESS:
  2357.         {
  2358.             m_sMT6139CW3 = m_cRF_MT6139Reg_Obj.Get_MT6139CW3();
  2359.             ReDrawCW3Fields();
  2360.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW3 from register successfully";
  2361.         }
  2362.         break;
  2363.         case METAAPP_FAIL:
  2364.         {
  2365.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW3 from register fail";
  2366.             Application->MessageBox( "Execution Failure : Get MT6139 CW3 from register", "FAILURE", MB_OK );
  2367.         }
  2368.         break;
  2369.         case METAAPP_TIMEOUT:
  2370.         {
  2371.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW3 from register timeout";
  2372.             Application->MessageBox( "Execution Timeout : Get MT6139 CW3 from register", "TIMEOUT", MB_OK );
  2373.         }
  2374.         break;
  2375.         case METAAPP_STOP:
  2376.         {
  2377.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW3 from register stop";
  2378.         }
  2379.         break;
  2380.     }
  2381.     CurrentPageReset();
  2382. }
  2383. //---------------------------------------------------------------------------
  2384. void __fastcall TfrmMT6139Reg::btnWriteCW3ToRegClick(TObject *Sender)
  2385. {
  2386.     CurrentPageLock();
  2387.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW3ToReg;
  2388.     m_cRF_MT6139Reg_Obj.Set_MT6139CW3ToReg_Start(m_sMT6139CW3, m_uiFinalRfid);
  2389.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW3 to register progressing";
  2390. }
  2391. //---------------------------------------------------------------------------
  2392. void TfrmMT6139Reg::CNF_SetMT6139CW3ToReg( void )
  2393. {
  2394.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2395.     switch( state )
  2396.     {
  2397.         case METAAPP_SUCCESS:
  2398.         {
  2399.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW3 to register successfully";
  2400.         }
  2401.         break;
  2402.         case METAAPP_FAIL:
  2403.         {
  2404.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW3 to register fail";
  2405.             Application->MessageBox( "Execution Failure : Set MT6139 CW3 to register", "FAILURE", MB_OK );
  2406.         }
  2407.         break;
  2408.         case METAAPP_TIMEOUT:
  2409.         {
  2410.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW3 to register timeout";
  2411.             Application->MessageBox( "Execution Timeout : Set MT6139 CW3 to register", "TIMEOUT", MB_OK );
  2412.         }
  2413.         break;
  2414.         case METAAPP_STOP:
  2415.         {
  2416.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW3 to register stop";
  2417.         }
  2418.         break;
  2419.     }
  2420.     CurrentPageReset();
  2421. }
  2422. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2423. void __fastcall TfrmMT6139Reg::btnReadCW4FromRegClick(TObject *Sender)
  2424. {
  2425.     CurrentPageLock();
  2426.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW4FromReg;
  2427.     m_cRF_MT6139Reg_Obj.Get_MT6139CW4FromReg_Start(m_uiFinalRfid);
  2428.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW4 from register progressing";
  2429. }
  2430. //---------------------------------------------------------------------------
  2431. void TfrmMT6139Reg::CNF_GetMT6139CW4FromReg( void )
  2432. {
  2433.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2434.     switch( state )
  2435.     {
  2436.         case METAAPP_SUCCESS:
  2437.         {
  2438.             m_sMT6139CW4 = m_cRF_MT6139Reg_Obj.Get_MT6139CW4();
  2439.             ReDrawCW4Fields();
  2440.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW4 from register successfully";
  2441.         }
  2442.         break;
  2443.         case METAAPP_FAIL:
  2444.         {
  2445.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW4 from register fail";
  2446.             Application->MessageBox( "Execution Failure : Get MT6139 CW4 from register", "FAILURE", MB_OK );
  2447.         }
  2448.         break;
  2449.         case METAAPP_TIMEOUT:
  2450.         {
  2451.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW4 from register timeout";
  2452.             Application->MessageBox( "Execution Timeout : Get MT6139 CW4 from register", "TIMEOUT", MB_OK );
  2453.         }
  2454.         break;
  2455.         case METAAPP_STOP:
  2456.         {
  2457.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW4 from register stop";
  2458.         }
  2459.         break;
  2460.     }
  2461.     CurrentPageReset();
  2462. }
  2463. //---------------------------------------------------------------------------
  2464. void __fastcall TfrmMT6139Reg::btnWriteCW4ToRegClick(TObject *Sender)
  2465. {
  2466.     CurrentPageLock();
  2467.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW4ToReg;
  2468.     m_cRF_MT6139Reg_Obj.Set_MT6139CW4ToReg_Start(m_sMT6139CW4, m_uiFinalRfid);
  2469.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW4 to register progressing";
  2470. }
  2471. //---------------------------------------------------------------------------
  2472. void TfrmMT6139Reg::CNF_SetMT6139CW4ToReg( void )
  2473. {
  2474.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2475.     switch( state )
  2476.     {
  2477.         case METAAPP_SUCCESS:
  2478.         {
  2479.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW4 to register successfully";
  2480.         }
  2481.         break;
  2482.         case METAAPP_FAIL:
  2483.         {
  2484.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW4 to register fail";
  2485.             Application->MessageBox( "Execution Failure : Set MT6139 CW0 to register", "FAILURE", MB_OK );
  2486.         }
  2487.         break;
  2488.         case METAAPP_TIMEOUT:
  2489.         {
  2490.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW4 to register timeout";
  2491.             Application->MessageBox( "Execution Timeout : Set MT6139 CW0 to register", "TIMEOUT", MB_OK );
  2492.         }
  2493.         break;
  2494.         case METAAPP_STOP:
  2495.         {
  2496.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW4 to register stop";
  2497.         }
  2498.         break;
  2499.     }
  2500.     CurrentPageReset();
  2501. }
  2502. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2503. void __fastcall TfrmMT6139Reg::btnReadCW5FromRegClick(TObject *Sender)
  2504. {
  2505.     CurrentPageLock();
  2506.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW5FromReg;
  2507.     m_cRF_MT6139Reg_Obj.Get_MT6139CW5FromReg_Start(m_uiFinalRfid);
  2508.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW5 from register progressing";
  2509. }
  2510. //---------------------------------------------------------------------------
  2511. void TfrmMT6139Reg::CNF_GetMT6139CW5FromReg( void )
  2512. {
  2513.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2514.     switch( state )
  2515.     {
  2516.         case METAAPP_SUCCESS:
  2517.         {
  2518.             m_sMT6139CW5 = m_cRF_MT6139Reg_Obj.Get_MT6139CW5();
  2519.             ReDrawCW5Fields();
  2520.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW5 from register successfully";
  2521.         }
  2522.         break;
  2523.         case METAAPP_FAIL:
  2524.         {
  2525.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW5 from register fail";
  2526.             Application->MessageBox( "Execution Failure : Get MT6139 CW5 from register", "FAILURE", MB_OK );
  2527.         }
  2528.         break;
  2529.         case METAAPP_TIMEOUT:
  2530.         {
  2531.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW5 from register timeout";
  2532.             Application->MessageBox( "Execution Timeout : Get MT6139 CW5 from register", "TIMEOUT", MB_OK );
  2533.         }
  2534.         break;
  2535.         case METAAPP_STOP:
  2536.         {
  2537.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW5 from register stop";
  2538.         }
  2539.         break;
  2540.     }
  2541.     CurrentPageReset();
  2542. }
  2543. //---------------------------------------------------------------------------
  2544. void __fastcall TfrmMT6139Reg::btnWriteCW5ToRegClick(TObject *Sender)
  2545. {
  2546.     CurrentPageLock();
  2547.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW5ToReg;
  2548.     m_cRF_MT6139Reg_Obj.Set_MT6139CW5ToReg_Start(m_sMT6139CW5, m_uiFinalRfid);
  2549.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW5 to register progressing";
  2550. }
  2551. //---------------------------------------------------------------------------
  2552. void TfrmMT6139Reg::CNF_SetMT6139CW5ToReg( void )
  2553. {
  2554.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2555.     switch( state )
  2556.     {
  2557.         case METAAPP_SUCCESS:
  2558.         {
  2559.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW5 to register successfully";
  2560.         }
  2561.         break;
  2562.         case METAAPP_FAIL:
  2563.         {
  2564.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW5 to register fail";
  2565.             Application->MessageBox( "Execution Failure : Set MT6139 CW5 to register", "FAILURE", MB_OK );
  2566.         }
  2567.         break;
  2568.         case METAAPP_TIMEOUT:
  2569.         {
  2570.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW5 to register timeout";
  2571.             Application->MessageBox( "Execution Timeout : Set MT6139 CW5 to register", "TIMEOUT", MB_OK );
  2572.         }
  2573.         break;
  2574.         case METAAPP_STOP:
  2575.         {
  2576.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW5 to register stop";
  2577.         }
  2578.         break;
  2579.     }
  2580.     CurrentPageReset();
  2581. }
  2582. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2583. void __fastcall TfrmMT6139Reg::btnReadCW6FromRegClick(TObject *Sender)
  2584. {
  2585.     CurrentPageLock();
  2586.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW6FromReg;
  2587.     m_cRF_MT6139Reg_Obj.Get_MT6139CW6FromReg_Start(m_uiFinalRfid);
  2588.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW6 from register progressing";
  2589. }
  2590. //---------------------------------------------------------------------------
  2591. void TfrmMT6139Reg::CNF_GetMT6139CW6FromReg( void )
  2592. {
  2593.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2594.     switch( state )
  2595.     {
  2596.         case METAAPP_SUCCESS:
  2597.         {
  2598.             m_sMT6139CW6 = m_cRF_MT6139Reg_Obj.Get_MT6139CW6();
  2599.             ReDrawCW6Fields();
  2600.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW6 from register successfully";
  2601.         }
  2602.         break;
  2603.         case METAAPP_FAIL:
  2604.         {
  2605.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW6 from register fail";
  2606.             Application->MessageBox( "Execution Failure : Get MT6139 CW6 from register", "FAILURE", MB_OK );
  2607.         }
  2608.         break;
  2609.         case METAAPP_TIMEOUT:
  2610.         {
  2611.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW6 from register timeout";
  2612.             Application->MessageBox( "Execution Timeout : Get MT6139 CW6 from register", "TIMEOUT", MB_OK );
  2613.         }
  2614.         break;
  2615.         case METAAPP_STOP:
  2616.         {
  2617.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW6 from register stop";
  2618.         }
  2619.         break;
  2620.     }
  2621.     CurrentPageReset();
  2622. }
  2623. //---------------------------------------------------------------------------
  2624. void __fastcall TfrmMT6139Reg::btnWriteCW6ToRegClick(TObject *Sender)
  2625. {
  2626.     CurrentPageLock();
  2627.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW6ToReg;
  2628.     m_cRF_MT6139Reg_Obj.Set_MT6139CW6ToReg_Start(m_sMT6139CW6, m_uiFinalRfid);
  2629.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW6 to register progressing";
  2630. }
  2631. //---------------------------------------------------------------------------
  2632. void TfrmMT6139Reg::CNF_SetMT6139CW6ToReg( void )
  2633. {
  2634.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2635.     switch( state )
  2636.     {
  2637.         case METAAPP_SUCCESS:
  2638.         {
  2639.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW6 to register successfully";
  2640.         }
  2641.         break;
  2642.         case METAAPP_FAIL:
  2643.         {
  2644.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW6 to register fail";
  2645.             Application->MessageBox( "Execution Failure : Set MT6139 CW6 to register", "FAILURE", MB_OK );
  2646.         }
  2647.         break;
  2648.         case METAAPP_TIMEOUT:
  2649.         {
  2650.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW6 to register timeout";
  2651.             Application->MessageBox( "Execution Timeout : Set MT6139 CW6 to register", "TIMEOUT", MB_OK );
  2652.         }
  2653.         break;
  2654.         case METAAPP_STOP:
  2655.         {
  2656.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW6 to register stop";
  2657.         }
  2658.         break;
  2659.     }
  2660.     CurrentPageReset();
  2661. }
  2662. void __fastcall TfrmMT6139Reg::btnReadCW7FromRegClick(TObject *Sender)
  2663. {
  2664.     CurrentPageLock();
  2665.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW7FromReg;
  2666.     m_cRF_MT6139Reg_Obj.Get_MT6139CW7FromReg_Start(m_uiFinalRfid);
  2667.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW7 from register progressing";
  2668. }
  2669. //---------------------------------------------------------------------------
  2670. void TfrmMT6139Reg::CNF_GetMT6139CW7FromReg( void )
  2671. {
  2672.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2673.     switch( state )
  2674.     {
  2675.         case METAAPP_SUCCESS:
  2676.         {
  2677.             m_sMT6139CW7 = m_cRF_MT6139Reg_Obj.Get_MT6139CW7();
  2678.             ReDrawCW7Fields();
  2679.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW7 from register successfully";
  2680.         }
  2681.         break;
  2682.         case METAAPP_FAIL:
  2683.         {
  2684.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW7 from register fail";
  2685.             Application->MessageBox( "Execution Failure : Get MT6139 CW7 from register", "FAILURE", MB_OK );
  2686.         }
  2687.         break;
  2688.         case METAAPP_TIMEOUT:
  2689.         {
  2690.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW7 from register timeout";
  2691.             Application->MessageBox( "Execution Timeout : Get MT6139 CW7 from register", "TIMEOUT", MB_OK );
  2692.         }
  2693.         break;
  2694.         case METAAPP_STOP:
  2695.         {
  2696.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW7 from register stop";
  2697.         }
  2698.         break;
  2699.     }
  2700.     CurrentPageReset();
  2701. }
  2702. //---------------------------------------------------------------------------
  2703. void __fastcall TfrmMT6139Reg::btnWriteCW7ToRegClick(TObject *Sender)
  2704. {
  2705.     CurrentPageLock();
  2706.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW7ToReg;
  2707.     m_cRF_MT6139Reg_Obj.Set_MT6139CW7ToReg_Start(m_sMT6139CW7, m_uiFinalRfid);
  2708.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW7 to register progressing";
  2709. }
  2710. //---------------------------------------------------------------------------
  2711. void TfrmMT6139Reg::CNF_SetMT6139CW7ToReg( void )
  2712. {
  2713.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2714.     switch( state )
  2715.     {
  2716.         case METAAPP_SUCCESS:
  2717.         {
  2718.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW7 to register successfully";
  2719.         }
  2720.         break;
  2721.         case METAAPP_FAIL:
  2722.         {
  2723.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW7 to register fail";
  2724.             Application->MessageBox( "Execution Failure : Set MT6139 CW7 to register", "FAILURE", MB_OK );
  2725.         }
  2726.         break;
  2727.         case METAAPP_TIMEOUT:
  2728.         {
  2729.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW7 to register timeout";
  2730.             Application->MessageBox( "Execution Timeout : Set MT6139 CW7 to register", "TIMEOUT", MB_OK );
  2731.         }
  2732.         break;
  2733.         case METAAPP_STOP:
  2734.         {
  2735.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW7 to register stop";
  2736.         }
  2737.         break;
  2738.     }
  2739.     CurrentPageReset();
  2740. }
  2741. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2742. void __fastcall TfrmMT6139Reg::btnReadCW8FromRegClick(TObject *Sender)
  2743. {
  2744.     CurrentPageLock();
  2745.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW8FromReg;
  2746.     m_cRF_MT6139Reg_Obj.Get_MT6139CW8FromReg_Start(m_uiFinalRfid);
  2747.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW8 from register progressing";
  2748. }
  2749. //---------------------------------------------------------------------------
  2750. void TfrmMT6139Reg::CNF_GetMT6139CW8FromReg( void )
  2751. {
  2752.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2753.     switch( state )
  2754.     {
  2755.         case METAAPP_SUCCESS:
  2756.         {
  2757.             m_sMT6139CW8 = m_cRF_MT6139Reg_Obj.Get_MT6139CW8();
  2758.             ReDrawCW8Fields();
  2759.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW8 from register successfully";
  2760.         }
  2761.         break;
  2762.         case METAAPP_FAIL:
  2763.         {
  2764.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW8 from register fail";
  2765.             Application->MessageBox( "Execution Failure : Get MT6139 CW8 from register", "FAILURE", MB_OK );
  2766.         }
  2767.         break;
  2768.         case METAAPP_TIMEOUT:
  2769.         {
  2770.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW8 from register timeout";
  2771.             Application->MessageBox( "Execution Timeout : Get MT6139 CW8 from register", "TIMEOUT", MB_OK );
  2772.         }
  2773.         break;
  2774.         case METAAPP_STOP:
  2775.         {
  2776.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW8 from register stop";
  2777.         }
  2778.         break;
  2779.     }
  2780.     CurrentPageReset();
  2781. }
  2782. //---------------------------------------------------------------------------
  2783. void __fastcall TfrmMT6139Reg::btnWriteCW8ToRegClick(TObject *Sender)
  2784. {
  2785.     CurrentPageLock();
  2786.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW8ToReg;
  2787.     m_cRF_MT6139Reg_Obj.Set_MT6139CW8ToReg_Start(m_sMT6139CW8, m_uiFinalRfid);
  2788.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW8 to register progressing";
  2789. }
  2790. //---------------------------------------------------------------------------
  2791. void TfrmMT6139Reg::CNF_SetMT6139CW8ToReg( void )
  2792. {
  2793.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2794.     switch( state )
  2795.     {
  2796.         case METAAPP_SUCCESS:
  2797.         {
  2798.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW8 to register successfully";
  2799.         }
  2800.         break;
  2801.         case METAAPP_FAIL:
  2802.         {
  2803.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW8 to register fail";
  2804.             Application->MessageBox( "Execution Failure : Set MT6139 CW8 to register", "FAILURE", MB_OK );
  2805.         }
  2806.         break;
  2807.         case METAAPP_TIMEOUT:
  2808.         {
  2809.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW8 to register timeout";
  2810.             Application->MessageBox( "Execution Timeout : Set MT6139 CW8 to register", "TIMEOUT", MB_OK );
  2811.         }
  2812.         break;
  2813.         case METAAPP_STOP:
  2814.         {
  2815.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW8 to register stop";
  2816.         }
  2817.         break;
  2818.     }
  2819.     CurrentPageReset();
  2820. }
  2821. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2822. void __fastcall TfrmMT6139Reg::btnReadCW9FromRegClick(TObject *Sender)
  2823. {
  2824.     CurrentPageLock();
  2825.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW9FromReg;
  2826.     m_cRF_MT6139Reg_Obj.Get_MT6139CW9FromReg_Start(m_uiFinalRfid);
  2827.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW9 from register progressing";
  2828. }
  2829. //---------------------------------------------------------------------------
  2830. void TfrmMT6139Reg::CNF_GetMT6139CW9FromReg( void )
  2831. {
  2832.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2833.     switch( state )
  2834.     {
  2835.         case METAAPP_SUCCESS:
  2836.         {
  2837.             m_sMT6139CW9 = m_cRF_MT6139Reg_Obj.Get_MT6139CW9();
  2838.             ReDrawCW9Fields();
  2839.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW9 from register successfully";
  2840.         }
  2841.         break;
  2842.         case METAAPP_FAIL:
  2843.         {
  2844.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW9 from register fail";
  2845.             Application->MessageBox( "Execution Failure : Get MT6139 CW9 from register", "FAILURE", MB_OK );
  2846.         }
  2847.         break;
  2848.         case METAAPP_TIMEOUT:
  2849.         {
  2850.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW9 from register timeout";
  2851.             Application->MessageBox( "Execution Timeout : Get MT6139 CW9 from register", "TIMEOUT", MB_OK );
  2852.         }
  2853.         break;
  2854.         case METAAPP_STOP:
  2855.         {
  2856.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW9 from register stop";
  2857.         }
  2858.         break;
  2859.     }
  2860.     CurrentPageReset();
  2861. }
  2862. //---------------------------------------------------------------------------
  2863. void __fastcall TfrmMT6139Reg::btnWriteCW9ToRegClick(TObject *Sender)
  2864. {
  2865.     CurrentPageLock();
  2866.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW9ToReg;
  2867.     m_cRF_MT6139Reg_Obj.Set_MT6139CW9ToReg_Start(m_sMT6139CW9, m_uiFinalRfid);
  2868.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW9 to register progressing";
  2869. }
  2870. //---------------------------------------------------------------------------
  2871. void TfrmMT6139Reg::CNF_SetMT6139CW9ToReg( void )
  2872. {
  2873.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2874.     switch( state )
  2875.     {
  2876.         case METAAPP_SUCCESS:
  2877.         {
  2878.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW9 to register successfully";
  2879.         }
  2880.         break;
  2881.         case METAAPP_FAIL:
  2882.         {
  2883.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW9 to register fail";
  2884.             Application->MessageBox( "Execution Failure : Set MT6139 CW9 to register", "FAILURE", MB_OK );
  2885.         }
  2886.         break;
  2887.         case METAAPP_TIMEOUT:
  2888.         {
  2889.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW9 to register timeout";
  2890.             Application->MessageBox( "Execution Timeout : Set MT6139 CW9 to register", "TIMEOUT", MB_OK );
  2891.         }
  2892.         break;
  2893.         case METAAPP_STOP:
  2894.         {
  2895.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW9 to register stop";
  2896.         }
  2897.         break;
  2898.     }
  2899.     CurrentPageReset();
  2900. }
  2901. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2902. void __fastcall TfrmMT6139Reg::btnReadCW10FromRegClick(TObject *Sender)
  2903. {
  2904.     CurrentPageLock();
  2905.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW10FromReg;
  2906.     m_cRF_MT6139Reg_Obj.Get_MT6139CW10FromReg_Start(m_uiFinalRfid);
  2907.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW10 from register progressing";
  2908. }
  2909. //---------------------------------------------------------------------------
  2910. void TfrmMT6139Reg::CNF_GetMT6139CW10FromReg( void )
  2911. {
  2912.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2913.     switch( state )
  2914.     {
  2915.         case METAAPP_SUCCESS:
  2916.         {
  2917.             m_sMT6139CW10 = m_cRF_MT6139Reg_Obj.Get_MT6139CW10();
  2918.             ReDrawCW10Fields();
  2919.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW10 from register successfully";
  2920.         }
  2921.         break;
  2922.         case METAAPP_FAIL:
  2923.         {
  2924.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW10 from register fail";
  2925.             Application->MessageBox( "Execution Failure : Get MT6139 CW10 from register", "FAILURE", MB_OK );
  2926.         }
  2927.         break;
  2928.         case METAAPP_TIMEOUT:
  2929.         {
  2930.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW10 from register timeout";
  2931.             Application->MessageBox( "Execution Timeout : Get MT6139 CW10 from register", "TIMEOUT", MB_OK );
  2932.         }
  2933.         break;
  2934.         case METAAPP_STOP:
  2935.         {
  2936.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW10 from register stop";
  2937.         }
  2938.         break;
  2939.     }
  2940.     CurrentPageReset();
  2941. }
  2942. //----------------------------------------------------------------------------
  2943. void __fastcall TfrmMT6139Reg::btnWriteCW10ToRegClick(TObject *Sender)
  2944. {
  2945.     CurrentPageLock();
  2946.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW10ToReg;
  2947.     m_cRF_MT6139Reg_Obj.Set_MT6139CW10ToReg_Start(m_sMT6139CW10, m_uiFinalRfid);
  2948.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW10 to register progressing";
  2949. }
  2950. //---------------------------------------------------------------------------
  2951. void TfrmMT6139Reg::CNF_SetMT6139CW10ToReg( void )
  2952. {
  2953.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2954.     switch( state )
  2955.     {
  2956.         case METAAPP_SUCCESS:
  2957.         {
  2958.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW10 to register successfully";
  2959.         }
  2960.         break;
  2961.         case METAAPP_FAIL:
  2962.         {
  2963.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW10 to register fail";
  2964.             Application->MessageBox( "Execution Failure : Set MT6139 CW10 to register", "FAILURE", MB_OK );
  2965.         }
  2966.         break;
  2967.         case METAAPP_TIMEOUT:
  2968.         {
  2969.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW10 to register timeout";
  2970.             Application->MessageBox( "Execution Timeout : Set MT6139 CW10 to register", "TIMEOUT", MB_OK );
  2971.         }
  2972.         break;
  2973.         case METAAPP_STOP:
  2974.         {
  2975.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW10 to register stop";
  2976.         }
  2977.         break;
  2978.     }
  2979.     CurrentPageReset();
  2980. }
  2981. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2982. void __fastcall TfrmMT6139Reg::btnReadCW11FromRegClick(TObject *Sender)
  2983. {
  2984.     CurrentPageLock();
  2985.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW11FromReg;
  2986.     m_cRF_MT6139Reg_Obj.Get_MT6139CW11FromReg_Start(m_uiFinalRfid);
  2987.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW11 from register progressing";
  2988. }
  2989. //---------------------------------------------------------------------------
  2990. void TfrmMT6139Reg::CNF_GetMT6139CW11FromReg( void )
  2991. {
  2992.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  2993.     switch( state )
  2994.     {
  2995.         case METAAPP_SUCCESS:
  2996.         {
  2997.             m_sMT6139CW11 = m_cRF_MT6139Reg_Obj.Get_MT6139CW11();
  2998.             ReDrawCW11Fields();
  2999.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW11 from register successfully";
  3000.         }
  3001.         break;
  3002.         case METAAPP_FAIL:
  3003.         {
  3004.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW11 from register fail";
  3005.             Application->MessageBox( "Execution Failure : Get MT6139 CW11 from register", "FAILURE", MB_OK );
  3006.         }
  3007.         break;
  3008.         case METAAPP_TIMEOUT:
  3009.         {
  3010.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW11 from register timeout";
  3011.             Application->MessageBox( "Execution Timeout : Get MT6139 CW11 from register", "TIMEOUT", MB_OK );
  3012.         }
  3013.         break;
  3014.         case METAAPP_STOP:
  3015.         {
  3016.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW11 from register stop";
  3017.         }
  3018.         break;
  3019.     }
  3020.     CurrentPageReset();
  3021. }
  3022. //---------------------------------------------------------------------------
  3023. void __fastcall TfrmMT6139Reg::btnWriteCW11ToRegClick(TObject *Sender)
  3024. {
  3025.     CurrentPageLock();
  3026.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW11ToReg;
  3027.     m_cRF_MT6139Reg_Obj.Set_MT6139CW11ToReg_Start(m_sMT6139CW11, m_uiFinalRfid);
  3028.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW11 to register progressing";
  3029. }
  3030. //---------------------------------------------------------------------------
  3031. void TfrmMT6139Reg::CNF_SetMT6139CW11ToReg( void )
  3032. {
  3033.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  3034.     switch( state )
  3035.     {
  3036.         case METAAPP_SUCCESS:
  3037.         {
  3038.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW11 to register successfully";
  3039.         }
  3040.         break;
  3041.         case METAAPP_FAIL:
  3042.         {
  3043.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW11 to register fail";
  3044.             Application->MessageBox( "Execution Failure : Set MT6139 CW11 to register", "FAILURE", MB_OK );
  3045.         }
  3046.         break;
  3047.         case METAAPP_TIMEOUT:
  3048.         {
  3049.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW11 to register timeout";
  3050.             Application->MessageBox( "Execution Timeout : Set MT6139 CW11 to register", "TIMEOUT", MB_OK );
  3051.         }
  3052.         break;
  3053.         case METAAPP_STOP:
  3054.         {
  3055.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW11 to register stop";
  3056.         }
  3057.         break;
  3058.     }
  3059.     CurrentPageReset();
  3060. }
  3061. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  3062. void __fastcall TfrmMT6139Reg::btnReadCW15FromRegClick(TObject *Sender)
  3063. {
  3064.     CurrentPageLock();
  3065.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139CW15FromReg;
  3066.     m_cRF_MT6139Reg_Obj.Get_MT6139CW15FromReg_Start(m_uiFinalRfid);
  3067.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW12 from register progressing";
  3068. }
  3069. //---------------------------------------------------------------------------
  3070. void TfrmMT6139Reg::CNF_GetMT6139CW15FromReg( void )
  3071. {
  3072.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  3073.     switch( state )
  3074.     {
  3075.         case METAAPP_SUCCESS:
  3076.         {
  3077.             m_sMT6139CW15 = m_cRF_MT6139Reg_Obj.Get_MT6139CW15();
  3078.             ReDrawCW15Fields();
  3079.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW15 from register successfully";
  3080.         }
  3081.         break;
  3082.         case METAAPP_FAIL:
  3083.         {
  3084.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW15 from register fail";
  3085.             Application->MessageBox( "Execution Failure : Get MT6139 CW15 from register", "FAILURE", MB_OK );
  3086.         }
  3087.         break;
  3088.         case METAAPP_TIMEOUT:
  3089.         {
  3090.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW15 from register timeout";
  3091.             Application->MessageBox( "Execution Timeout : Get MT6139 CW15 from register", "TIMEOUT", MB_OK );
  3092.         }
  3093.         break;
  3094.         case METAAPP_STOP:
  3095.         {
  3096.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get MT6139 CW15 from register stop";
  3097.         }
  3098.         break;
  3099.     }
  3100.     CurrentPageReset();
  3101. }
  3102. //---------------------------------------------------------------------------
  3103. void __fastcall TfrmMT6139Reg::btnWriteCW15ToRegClick(TObject *Sender)
  3104. {
  3105.     CurrentPageLock();
  3106.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139CW15ToReg;
  3107.     m_cRF_MT6139Reg_Obj.Set_MT6139CW15ToReg_Start(m_sMT6139CW15, m_uiFinalRfid);
  3108.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW12 to register progressing";
  3109. }
  3110. //---------------------------------------------------------------------------
  3111. void TfrmMT6139Reg::CNF_SetMT6139CW15ToReg( void )
  3112. {
  3113.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  3114.     switch( state )
  3115.     {
  3116.         case METAAPP_SUCCESS:
  3117.         {
  3118.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW15 to register successfully";
  3119.         }
  3120.         break;
  3121.         case METAAPP_FAIL:
  3122.         {
  3123.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW15 to register fail";
  3124.             Application->MessageBox( "Execution Failure : Set MT6139 CW15 to register", "FAILURE", MB_OK );
  3125.         }
  3126.         break;
  3127.         case METAAPP_TIMEOUT:
  3128.         {
  3129.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW15 to register timeout";
  3130.             Application->MessageBox( "Execution Timeout : Set MT6139 CW15 to register", "TIMEOUT", MB_OK );
  3131.         }
  3132.         break;
  3133.         case METAAPP_STOP:
  3134.         {
  3135.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set MT6139 CW15 to register stop";
  3136.         }
  3137.         break;
  3138.     }
  3139.     CurrentPageReset();
  3140. }
  3141. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  3142. void __fastcall TfrmMT6139Reg::btnReadAllRegClick(TObject *Sender)
  3143. {
  3144.     CurrentPageLock();
  3145.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_GetMT6139AllFromReg;
  3146.     m_cRF_MT6139Reg_Obj.Get_MT6139AllFromReg_Start(m_uiFinalRfid);
  3147.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get All MT6139 control words from register progressing";
  3148. }
  3149. //---------------------------------------------------------------------------
  3150. void TfrmMT6139Reg::CNF_GetMT6139AllFromReg( void )
  3151. {
  3152.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  3153.     switch( state )
  3154.     {
  3155.         case METAAPP_SUCCESS:
  3156.         {
  3157.             m_sMT6139CW0 = m_cRF_MT6139Reg_Obj.Get_MT6139CW0();
  3158.             m_sMT6139CW1 = m_cRF_MT6139Reg_Obj.Get_MT6139CW1();
  3159.             m_sMT6139CW2 = m_cRF_MT6139Reg_Obj.Get_MT6139CW2();
  3160.             m_sMT6139CW3 = m_cRF_MT6139Reg_Obj.Get_MT6139CW3();
  3161.             m_sMT6139CW4 = m_cRF_MT6139Reg_Obj.Get_MT6139CW4();
  3162.             m_sMT6139CW5 = m_cRF_MT6139Reg_Obj.Get_MT6139CW5();
  3163.             m_sMT6139CW6 = m_cRF_MT6139Reg_Obj.Get_MT6139CW6();
  3164.             m_sMT6139CW7 = m_cRF_MT6139Reg_Obj.Get_MT6139CW7();
  3165.             m_sMT6139CW8 = m_cRF_MT6139Reg_Obj.Get_MT6139CW8();
  3166.             m_sMT6139CW9 = m_cRF_MT6139Reg_Obj.Get_MT6139CW9();
  3167.             m_sMT6139CW10 = m_cRF_MT6139Reg_Obj.Get_MT6139CW10();
  3168.             m_sMT6139CW11 = m_cRF_MT6139Reg_Obj.Get_MT6139CW11();
  3169.             m_sMT6139CW15 = m_cRF_MT6139Reg_Obj.Get_MT6139CW15();
  3170.             ReDrawCW0Fields();
  3171.             ReDrawCW1Fields();
  3172.             ReDrawCW2Fields();
  3173.             ReDrawCW3Fields();
  3174.             ReDrawCW4Fields();
  3175.             ReDrawCW5Fields();
  3176.             ReDrawCW6Fields();
  3177.             ReDrawCW7Fields();
  3178.             ReDrawCW8Fields();
  3179.             ReDrawCW9Fields();
  3180.             ReDrawCW10Fields();
  3181.             ReDrawCW11Fields();
  3182.             ReDrawCW15Fields();
  3183.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get All MT6139 control words from register successfully";
  3184.         }
  3185.         break;
  3186.         case METAAPP_FAIL:
  3187.         {
  3188.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get All MT6139 control words from register fail";
  3189.             Application->MessageBox( "Execution Failure : Get All MT6139 control words from register", "FAILURE", MB_OK );
  3190.         }
  3191.         break;
  3192.         case METAAPP_TIMEOUT:
  3193.         {
  3194.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get All MT6139 control words from register timeout";
  3195.             Application->MessageBox( "Execution Timeout : Get All MT6139 control words from register", "TIMEOUT", MB_OK );
  3196.         }
  3197.         break;
  3198.         case METAAPP_STOP:
  3199.         {
  3200.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Get All MT6139 control words from register stop";
  3201.         }
  3202.         break;
  3203.     }
  3204.     CurrentPageReset();
  3205. }
  3206. //----------------------------------------------------------------------------
  3207. void __fastcall TfrmMT6139Reg::btnWriteAllRegClick(TObject *Sender)
  3208. {
  3209.     CurrentPageLock();
  3210.     m_cRF_MT6139Reg_Obj.Set_MT6139CW0( m_sMT6139CW0 );
  3211.     m_cRF_MT6139Reg_Obj.Set_MT6139CW1( m_sMT6139CW1 );
  3212.     m_cRF_MT6139Reg_Obj.Set_MT6139CW2( m_sMT6139CW2 );
  3213.     m_cRF_MT6139Reg_Obj.Set_MT6139CW3( m_sMT6139CW3 );
  3214.     m_cRF_MT6139Reg_Obj.Set_MT6139CW4( m_sMT6139CW4 );
  3215.     m_cRF_MT6139Reg_Obj.Set_MT6139CW5( m_sMT6139CW5 );
  3216.     m_cRF_MT6139Reg_Obj.Set_MT6139CW6( m_sMT6139CW6 );
  3217.     m_cRF_MT6139Reg_Obj.Set_MT6139CW7( m_sMT6139CW7 );
  3218.     m_cRF_MT6139Reg_Obj.Set_MT6139CW8( m_sMT6139CW8 );
  3219.     m_cRF_MT6139Reg_Obj.Set_MT6139CW9( m_sMT6139CW9 );
  3220.     m_cRF_MT6139Reg_Obj.Set_MT6139CW10( m_sMT6139CW10 );
  3221.     m_cRF_MT6139Reg_Obj.Set_MT6139CW11( m_sMT6139CW11 );
  3222.     m_cRF_MT6139Reg_Obj.Set_MT6139CW15( m_sMT6139CW15 );
  3223.     m_cRF_MT6139Reg_Obj.ConfirmCallback = ::CNF_SetMT6139AllToReg;
  3224.     m_cRF_MT6139Reg_Obj.Set_MT6139AllToReg_Start( m_uiFinalRfid );
  3225.     sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set All MT6139 control words to register progressing";
  3226. }
  3227. //---------------------------------------------------------------------------
  3228. void TfrmMT6139Reg::CNF_SetMT6139AllToReg( void )
  3229. {
  3230.     E_METAAPP_RESULT_T state = m_cRF_MT6139Reg_Obj.Get_ConfirmState();
  3231.     switch( state )
  3232.     {
  3233.         case METAAPP_SUCCESS:
  3234.         {
  3235.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set All MT6139 control words to register successfully";
  3236.         }
  3237.         break;
  3238.         case METAAPP_FAIL:
  3239.         {
  3240.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set All MT6139 control words to register fail";
  3241.             Application->MessageBox( "Execution Failure : Set All MT6139 control words to register", "FAILURE", MB_OK );
  3242.         }
  3243.         break;
  3244.         case METAAPP_TIMEOUT:
  3245.         {
  3246.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set All MT6139 control words to register timeout";
  3247.             Application->MessageBox( "Execution Timeout : Set All MT6139 control words to register", "TIMEOUT", MB_OK );
  3248.         }
  3249.         break;
  3250.         case METAAPP_STOP:
  3251.         {
  3252.             sbMT6139Reg->Panels->Items[0]->Text = (AnsiString) "  Set All MT6139 control words to register stop";
  3253.         }
  3254.         break;
  3255.     }
  3256.     CurrentPageReset();
  3257. }
  3258. void __fastcall TfrmMT6139Reg::HintTimerTimer(TObject *Sender)
  3259. {
  3260.     HintTimer->Enabled = false;
  3261.     lblHint->Visible = false;    
  3262. }
  3263. //---------------------------------------------------------------------------