关于time转换成string的问题，求助！！！

Question

我想把某个edit中的内容读出来，转换成time类型后赋值给datetimepicker.time，
edit中的内容的格式是hh:mm（string类型），datetimepicker的格式也是hh:mm，可是转换后的时间的只有小时数是对的，而分钟数总是不正确，
shorttimeformat我也设成了hh:mm，求大虾相助

Answer 1

strtodate把Edit中的string转为date在富给datetimepicker

Answer 2

procedure TForm1.FormCreate(Sender: TObject);
begin
 DateTimePicker1.Kind:=dtkTime;
 DateTimePicker1.Format:='HH:mm:ss';//注意大小写!
 DateTimePicker1.Time:=Time;
end;

Answer 3

datetimepicker.time:=FormatDateTime('hh:mm',Edit1.Text);

Answer 4

datetimepicker1.Time:=strtotime(edit1.Text);

Answer 5

procedure TForm1.Button2Click(Sender: TObject);
begin
     form1.DateTimePicker1.Format:='HH:mm';
     form1.DateTimePicker1.Time:=frac(strtotime(edit3.Text));
end;

Answer 6

只要edit的时间格式为hh:mm:ss就可以用datetimepicker.time:=strtotime(edit.text)了