SynEdit에서 캐럿 위치에 텍스트를 삽입하는 방법

Question

SynEdit의 Lazarus 버전을위한 SynEdit.InsertTextAtCaret ('Text') 프로 시저가 있습니다. 실행 취소 지원 기능을 갖춘 SynEdit 델파이 버전의 캐럿에 텍스트를 삽입하는 방법은 무엇입니까?

Answer 1

는 절차

TCustomSynEdit.procedure InsertBlock(const BB, BE: TBufferCoord; ChangeStr: PWideChar; AddToUndoList: Boolean); 

그것은 ChangeStr 위치를이어야합니다 BB에서 텍스트를 변경 삽입있다. 당신은 BB를 설정하고 현재의 caret 좌표하는 당신은 당신이

는 예를 들어,`SelText` 속성에 값을 할당

SynEdit1.InsertBlock(SynEdit1.CaretXY, SynEdit1.CaretXY, 'test', true);