Господа, объясните как происходит удаление выделенного блока, а, точнее, как это я должен и должен ли делать из билдера? Пример проблемы. В поле текст стоит 98000. Мышкой выделяю 3 последних нуля и набиваю 'К'. Логика построена так, что это, на самом деле, одно и то же. Но в пошаге вижу, что в тексте, по-прежнему 98000, 'K' добавляет свои законные 3 нуля и я получаю переполнение.
Что и как я должен сделать, чтобы это работало, как и должно, а именно: выделенные 3 нуля замещаются на 'К', а 'К', в свою очередь, замещается 3 нулями, что сейчас и происходит. за исключением того, что выделенные нули никуда не деваются.

Спасибо

Используй while

Очень подробный ответ! А короче можно?

Можно

Код

AnsiString text; while (text.Pos("000")0=!){ text.Delete("000",3); text.Insert("000","K"); }

По-моему, так.

А, по-моему, нет!
Речь идет об общем случае, а приведен был конкретный пример. Вопрос в том, что надо сделать, чтобы при выделенном блоке, любая нажатая клавиша сначала удаляля это блок, а потом осуществляла ввод. Я полагал, что винда или билдер это делают без моего участия, ан нет или я еще чего-то не знаю. А если вручную, то надо ставить обработчик на KeyPress(), хотя хотелось бы without using hands!

Приведи код, всё должно работать и без твоего участия, компонент Memo и Edit ничего от себя не делают - это только надстройка над виндовыми API.

void __fastcall TForm1::LaKeyPress(TObject *Sender, char &Key)
{
  if (Key >= '0' && Key <= '9'){
    if ( La->Text.Length() == 9 ){
       ShowMessage("This is over the limit");
       Key = 0;
    }
  }
  else if (Key == '.'){
     if ( strchr(La->Text.c_str(),'.') != NULL){ // decimal point already exists
        Key = '\a';
     }
  }
  else if (Key == 'k' || Key == 'K'){
     if (La->Text.IsEmpty()){
multi->ItemIndex = 0;
        Key = '\a';
     }
     else {
        multi->ItemIndex = 1;
        Key = 0;
        Pect->SetFocus();
     }
  }
  else if (Key == 'm' || Key == 'M'){
     if (La->Text.IsEmpty()){
multi->ItemIndex = 0;
        Key = '\a';
     }
     else {
        multi->ItemIndex = 2;
        Key = 0;
        Pect->SetFocus();
     }
  }
  else if (Key != '\b') Key = '\a';

}

присваивай значение SelText, а значение Key обнуляй

SelText is the selected portion of the edit control’s text.

__property System::AnsiString SelText;

Description

Read SelText to determine the value of the selected text. Set SelText to replace the selected text with a new string. If there is no selection, but the edit control has focus, set SelText to insert a new string into the text at the cursor.

Таким образом, я должен ВСЕ KeyPress() модифицировать на SelText = Key
Если я принимаю ввод и  = 0 если нет

Сейчас еще глянул: если выделено все целиком 98000 и я ввожу 98к, то все как и должно быть, а если выделены ТОЛЬКО нули - дудки - дописываем еще три! Странно это.