财务软件版1楼: 我想做一个控件，是一个Panel，里面有一个ComBoBox,两个DateTimePicker，其中先让ComBoBox.Items.Add(＇＇between＇＇);
ComBoBox.Items.Add(＇＇<=＇＇);
也就是当ComBoBox选择＇＇between＇＇时，显示两个DateTimePicker，当选择＇＇<=＇＇时显示一个DateTimePicker，现在就是怎么获取ComboBoxChange事件，来确定DateTimePicker的显示个数。
我才刚开始学做控件，这方面还没摸着头脑，请高手指点的详细一点，如能给一个相近的源程序更好。

2楼: procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items.Add(＇＇between＇＇);
ComboBox1.Items.Add(＇＇<=＇＇);

DateTimePicker1.Visible := False;
DateTimePicker2.Visible := False;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if ComboBox1.Text = ＇＇between＇＇ then
begin
DateTimePicker1.Visible := True;
DateTimePicker2.Visible := True;
end
else
begin
DateTimePicker1.Visible := True;
DateTimePicker2.Visible := False;
end;
end;


帅哥，给分把。 如进销存表格

3楼: to:沧海
人家是在写控件,不是说放一个form 放几个控件来显示.

在你的控件中自己写一个 ComboBoxChange 的事件,然后让你的控件中的 ComboBox.ComboBoxChange 等于这个事件就可以了

4楼: 加事件的我知道了，但是现在我加了两个属性，也就是beginDate,EndDate,分别对应两个DateTimePicker的日期，我怎么在运行时设置两个属性，同时改变DateTimePicker的日期呢？？这个代码怎么写？

5楼: 问题我已经解决了，谢谢!

6楼: 多人接受答案了。