在类似于 Delphi 代码编辑器的装订线中单击左侧时,我想选择一行(单击行号,安装了 CNPack)。我想答案在于 selStart、selEnd、smLine 选择模式,但无法提出任何可行的解决方案。
procedure TForm1.SynEdit1GutterClick(Sender: TObject; Button: TMouseButton; X,
Y, Line: Integer; Mark: TSynEditMark);
begin
SynEdit1.SelectionMode := smLine;
SynEdit1.SelStart := 0;
SynEdit1.SelEnd := SynEdit1.Lines[Line].Length;
SynEdit1.SelectionMode := smNormal; //restore
//Code not working
//I don't remember the code which made it select a line with smLine
end;
您可以使用ecSelLineEnd
命令:
SynEdit1.ExecuteCommand(ecSelLineEnd, #0, nil)
在装订线点击事件中。
你需要包括单位 SynEditKeyCmds
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句