delphi中使文本框获得焦点

procedure TF1Card1.FormShow(Sender: TObject);
begin
//文本框获得焦点
RzEditSn.setfocus;
end;

RzEditSn:文本框的名称


联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678