procedure TForm1.Button1Click(Sender: TObject);
begin
    Edit1.SetFocus;
    Edit1.SelStart  :=  2;
end;

0 is the first character.