Q&A

  • EditBox에서 사용자가 선택한 문자열만 지우는 함수는?
에디트 박스에서 사용자가 선택한 문자열만 지우는 함수가 있나요?

예를들면, 'abcdef'에서 사용자가 'cde'만 선택하고 버튼을 누르면 'abf'가 되죠.

Del키를 눌러도 되지만 소스로 이걸 구현해야 하거든요...

부탁합니다.

꾸뻑.

1  COMMENTS
  • Profile
    바사기몬 2000.08.22 07:00
    사공엽 wrote:

    > 에디트 박스에서 사용자가 선택한 문자열만 지우는 함수가 있나요?

    > 예를들면, 'abcdef'에서 사용자가 'cde'만 선택하고 버튼을 누르면 'abf'가 되죠.

    > Del키를 눌러도 되지만 소스로 이걸 구현해야 하거든요...

    > 부탁합니다.

    > 꾸뻑.





    procedure TForm1.Button2Click(Sender: TObject);

    var sTemp:string;

    begin

    sTemp := edit3.text;

    delete(sTemp, edit3.selstart+1, edit3.sellength);

    edit3.text := sTemp;

    end;