delphi初学者的迷惑

Question

现在自学delphi才发现好多东西看不懂，哪位好心人指点一下我，谢谢了！
edit1.selStart:=0;
edit.sellength:=length(edit1.text);
这些语句是什么意思？
procedure TForm2.editkeypress(sender:Tobject；var key:char);
这个是自己编写的，还是系统自动给出的。

Answer 1

edit1.selStart:=0; //光标放到起始位置
edit.sellength:=length(edit1.text);//设置选择的文字长度 procedure TForm2.editkeypress(sender:Tobject；var key:char); 
edit的事件中,有OnKeyPress,双击即可

Answer 2

edit1.selStart:=0; 
edit.sellength:=length(edit1.text); selStart是定位edit到第几位。
sellength是截取edit的字符个数。procedure TForm2.editkeypress(sender:Tobject；var key:char); 
是delphi自动创建的事件代码，你在其begin..end中添加自己的代码就可以了。eg：
edt1.Text := '123456';procedure TForm1.edt1KeyPress(Sender: TObject; var Key: Char);
begin
  edt1.SelStart := 3;
  edt1.SelLength := 4;
end;
执行：当你按下键盘，如‘9’时，就会从第三位开始插入‘9’，显示edt1.text ：= ’1239‘