Существуют свойства SelStart - символ с которого начинается выделение и SelLength - длинна выделения (кол-во символов).
Выложите на форму TEdit, поставьте у него свойство AutoSelect=False. Выложите TButton. Создайте событие onClick:
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.SelStart:=1;
Edit1.SelLength:=4;
Edit1.SetFocus;
end;
Просмотров: 12053
Если ВЕСЬ текст - то всё ещё проще
Edit1.SelectAll; А предложенные selstart и sellength пригодятся, когда нужно выделить sellength символов, начиная с selstart. |
Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.
Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.
Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.