Сообщество Чайников

Вопрос

На пустую форму ставим объект «Edit» и запускаем. Получилось, что в окошке Edit'а написано и выделено «Edit1», а если сразу начать набирать что-либо с клавиатуры надпись «Edit1» затрется новыми символами. Вопрос: как поставить выделение надписи в зависимости от введенного текста. Например, если ввести в окно Edit'а текст «проба», то его выделить, а если любой другой текст, то не выделять.

Ответ

Смотри пример:

procedure TForm1.Edit1Change(Sender: TObject);
begin
If edit1.Text='проба' then
Begin edit1.SelStart:=0; edit1.SelLength:=length(edit1.text); end;
end;

Если ты хочешь, чтобы твое слово выделялось даже когда оно часть строки используй Pos.