有三个datetimepicker放在groupbox中要求datetimepicker  onchang事件中,把值给对应的edit问题:三个datetimepicker中能使用一个onchang
 不可以单独用,
这是什么原因!要怎么写啊!

解决方案 »

  1.   

    procedure TForm1.DateTimePicker1Change(Sender: TObject);
    begin
      if (Sender as TDateTimePicker).Name = 'Date1' then  // 第一个
       
    end;
      

  2.   

    if sender = datetimepicker1 then
     edit1.Text :=datetostr(datetimepicker1.date);  if sender =datetimepicker2 then
     edit12.Text :=datetostr(datetimepicker2.date); if sender =DateTimePicker3 then
     Edit13.Text :=datetostr(DateTimePicker3.date);
      

  3.   

    如果你是copy , past就会有这样问题。
    重复的地方在Object Inspector/Events 中删除,重新建立就好了。
      

  4.   

    把他们的onchange响应设置为同一个,然后在响应中写上二楼的代码
      

  5.   

    如果你是copy , past就会有这样问题。 
    重复的地方在Object Inspector/Events 中删除,重新建立就好了。