대문자

    [Delphi] SelStart, SelText 사용법

    SelStart 사용하기 Edit의 Text에 문자를 작성하고자 할 때 밑의 코드대로 작성한 경우 항상 포커스가 맨 앞으로 가게되어 원하는 글자를 쓸 수 가 없었습니다. (목표 글자 : ABCDEFG) procedure TForm1.EditChange(Sender: TObject); var i: Integer; begin (Sender as TEdit).Text := UpperCase((Sender as TEdit).Text); end; 해당 버그를 수정하기 위해 다음과 같이 코드를 수정하였고 버그를 해결할 수 있었습니다. procedure TForm1.EditChange(Sender: TObject); var i: Integer; begin i := (Sender as TEdit).SelStart; (..