在德尔福语中，为什么时间控件不能刷新数据？

如果您只为 stringgrid1 的单元格赋值并且不让它更新，它如何显示您更新的数据？ 两种方法：

1：程序：tobject）;

var i,j:integer;

m:string;

beginif rxdflag then

beginj:= 0;

with stringgrid1 do

for i:=1 to 99 do

begini]:=inttostr(i);

i]:=timetostr(time);

i]:=format(strformat, [utdata]);

i]:= ;

end;;完成所有循环后，更新。

end; end;

第二种方法可能稍慢一些，如果你没有很多数据，应该没问题：

procedure : tobject);

var i,j:integer;

m:string;

beginif rxdflag then

beginj:= 0;

with stringgrid1 do

for i:=1 to 99 do

begini]:=inttostr(i);

i]:=timetostr(time);

i]:=format(strformat, [utdata]);

i]:= ;

每次骑行时，请更新它。

end; end;

end;

如何根据程序的需要进行设置，但要显示参数是更新的，至少在程序执行的时候，可以进入for循环体。

建议在 for 循环体下添加一个语句： ;

如下所示：对于 i：=1 到 99 do

begini]:=inttostr(i);

i]:=timetostr(time);

i]:=format(strformat, [utdata]);

i]:= ;

增加这个。

end;

放置一个计时片并设置刷新 dbgid 的秒数

要写 **，：='日期').asdatetime;回写，同样：

日期').asdatetime：=;如果不需要小时、分钟、秒，记得将 datetimepick 的 time 属性设置为 0 查看原帖。

A1：您可以响应其 onchange 事件以更改另一个小部件的时间。 但是，通常的做法是检查并提醒用户，当用户结束操作时，截止日期应晚于委托日期。

在 form 的 create 事件下添加此段落 **doublebuffered：=true;

例如，如果面板控件上有一个编辑控件，请将其编写如下：=true;

我的没有这个问题吗？ 您的面板上有哪些组件，计时器的间隔是多少？ 定时器控制面板的尺寸，面板是否在改变尺寸？

刷新完成后写下这句话**。

false;

就是这样。

不一样 你再看一下类型。

date 是日期部分。

时间是时间的一部分。

datetime 是完整的 date+time。

问题的原因不是 datetimepicker 的三种类型，而是您使用 datetimetostr 进行转换的事实。

以下**将获得您想要的结果。;;

DateTimePicker 小组件中的日期值不能设置为空值！ 查看原帖