Создание пользовательского элемента управления на базе edit

//----------------------------------------------------------------------------------------------------------------------
//           Преобразование строки в строку-число
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
int Filter_Pole(char *str, int *arr)
{   
 int          i, 
   negative = 1, // множитель положительного числа
          cnt=0,
         zpt=-1;
 
     arr[0] = 0; // количество цифр в строке
     arr[14]= 0; // очищаем кол-во ошибок
     
 // if(arr[11] == 7) goto La_6;  
     
  for(i=0; i<12; i++)
  {
    //--------------------------------------------------------------------------------------------- 
    //    Проверка на отрицательное число ( если разрешены отрицательные значения     arr[12]==1 )    
    //---------------------------------------------------------------------------------------------     
     if(arr[12]==1 && cnt==0)
     {                              
       if(str[i]==45){                  // если число отрицательное
         cnt = 1;
         str[0] = 45;                   // Записываем"-" символ минуса (45)
         negative = -1;                 // наличие минуса - число будет отрицательное
       }
     }
     //--------------------------------------------------------------------------------------------- 
     //                                             Если этом символ число, то запишем его
     //--------------------------------------------------------------------------------------------- 
     if(str[i] > 47 && str[i] < 58)
     {
       arr[0]++;                //  Кол-во цифр в числе +1
       arr[arr[0]]= str[i]-48;
       str[cnt] = str[i];
       cnt++;
     }
     //--------------------------------------------------------------------------------------------- 
     //                                     Если разрешена запятая или точка (Дробное число)
     //---------------------------------------------------------------------------------------------      
     if(arr[15] == 1){
       if(str[i] == 44 || str[i] == 46)   //  44 - запятая (,) 46 - точка (.)
       {
         if(zpt==-1)   // i>0 &&
         {
             str[cnt] = 44; // вместо точки или запятой ставим запятую (только запятую)
             zpt = arr[0];
             cnt++;
         }
      }
     }
     //-------------------------------------------
     //  Если найдено окончание строки         ===
     //-------------------------------------------
     if(str[i] == 0)
     {
         //----------------------------------
          if(arr[15] && zpt>0)   //   1 - сли дробное ( с запятой ) проверим на превышение после запятой кол-ва чисел
          {
                int ur = arr[0] - zpt - arr[16]; 
                if(ur > 0) 
                {
                
                    //  arr[0] - ur;
                    cnt--;
                    str[cnt] = 0;
                        
                }
          }
          //----------------------------------              
      str[cnt] = 0;
      arr[14] = i - cnt; // ---  кол-во ошибок найденных при преобразовании (лишни
      if(str[cnt-1]==44) // Если последним символом является не цифра, а запятая, то дорисуем 0 после запятой
      {
         arr[0]++;
         arr[arr[0]]= 0;
      }
     break;
    }
  }
     //-------------------------------------------
     //  Если чисел нет, то запишем число "0"   ==
     //-------------------------------------------
      if(arr[0]==0)
      {
         arr[0] = 1;
         arr[1] = 0;
      }
  //=====================================
  int  Delitel = 0,
             u = 0,
             c = 1,
          FULL = 0;
 
     switch(arr[0])
     {
      case 10:// if(arr[1]>1)
              // {
              //    FULL = 1999999999;          
              // }  break;
              FULL += arr[++u]*1000000000;
      case 9: FULL += arr[++u]*100000000;
      case 8: FULL += arr[++u]*10000000;
      case 7: FULL += arr[++u]*1000000;
      case 6: FULL += arr[++u]*100000;
      case 5: FULL += arr[++u]*10000;
      case 4: FULL += arr[++u]*1000;
      case 3: FULL += arr[++u]*100;
      case 2: FULL += arr[++u]*10;
      case 1: FULL += arr[++u];
     }//-------------------------------------------------
     if(zpt>-1) Delitel = arr[0] - zpt;
     if(Delitel < arr[16])  // кол-во чисел после запятой
     {
ug1:    FULL*=10;
        Delitel++;
        if(Delitel != arr[16]) goto ug1;
     }
     for(i=0; i< Delitel;i++) c*=10;
     arr[18] = c;  //  arr[18]=Delitel;
     arr[19]=FULL+arr[13]*negative;  // целое число до деления(без запятой)
     arr[19] *= negative; // умножить на -1
  //**********************************************************
 // La_6:
  if(arr[13]) //  Bridge_itoa1(Dig_Edit.arr[19], str, arr[16], arr[18]);  
  {
//La_6:
        
     int n  = arr[19];  
     int zp = arr[16];
     int mnogitel = arr[18];    
     int r, sign;
     char s1[21];
 
     if ((sign = n) < 0)  n = -n;  ///записываем знак 
                
     i = 0;         //делаем n положительным числом 
     
     do {       //генерируем цифры в обратном порядке 
         if(zp && zp == i) s1[i++] = 44;  //  Запятая        r++;     
         s1[i++] = n % 10 + '0';   //берем следующую цифру 
 
     } while ((n /= 10) > 0);     // удаляем 
 
La_1:     
    if(zp && i < zp+1)                    //n < mnogitel) 
    {
        if(zp && zp == i) s1[i++] = 44;  //  Запятая     r++;        
        s1[i++]  = '0';
        mnogitel /= 10;
        goto La_1;
    }
     
     if (sign < 0) s1[i++] = '-';
     s1[i] = '\0';
     
     for(r=0; r < i; r++)
     {
       str[r]=s1[i-1-r]; 
     }
     str[i] = '\0';     
        
  }
  //=====================================================
  //        DeInit
  //-----------------------------------------------------
  arr[12] = 0;  // 1 - число со знаком минус (может быть)
//  arr[13] = 0;  // ++  Delta Scroll  
  arr[15] = 0;  // 1 - сли дробное ( с запятой )
  arr[16] = 0;  // 4 - кол-во чисел после запятой
  arr[17]= zpt; // после какой цифры стоит запятая
return 1111;}
 
 
//  arr[0] --- число цифр
//  arr[1] ---  |------------
//  arr[2] ---  |
//  arr[3] ---  |
//  arr[4] ---  |
//  arr[5] ---  | цифры
//  arr[6] ---  | по
//  arr[7] ---  | отдельности
//  arr[8] ---  |
//  arr[9] ---  |
//  arr[10] --- |------------
//  arr[11] ---
//  arr[12] <<<  1 - число со знаком минус (может быть)
//  arr[13] <<<  Delta Scroll
//  arr[14] ---  кол-во ошибок найденных при преобразовании
//  arr[15] <<<  1 - если дробное ( с запятой )
//  arr[16] ---  4 - кол-во чисел после запятой
//  arr[17] ---  zpt      // после какой цифры расположена запятая
//  arr[18] ---  Delitel // (1, 10, 100, 1000, 10000 etc.)
//  arr[19] ---  FULL   // целое число до деления(без запятой)
//======================================================================================================================