TSingleLineTextControl.SelectCurrentWord

Source

UserInterface.Control.Text.SingleLine.pas (157)