delphi中有办法可以进行值自动更新吗?

绍兴老鼠 2017-10-19 04:16:12
窗体上有个标签label,用来显示一个全局变量整数i。在程序执行过程中,i会不断进行加减变化,如果不用label.caption:=inttostr(i)这样进行指定,能有什么办法会进行自动的值传递,让label会自动进行更新??有什么办法可以实现吗?类似值绑定的说法。
...全文
912 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
秋天之落叶 2017-10-20
  • 打赏
  • 举报
回复
用windows的api传递结果,但我不会用
lyhoo163 2017-10-20
  • 打赏
  • 举报
回复
不通过赋值,没有什么好办法更新。
yayongm 2017-10-20
  • 打赏
  • 举报
回复
1.Windows Api也是设置Caption的值. 2.充分使用property的Set和Get方法来处理. 3.如果需要在多线程中使用,这个就要稍微麻烦一些.
日月路明 2017-10-19
  • 打赏
  • 举报
回复
引用 1 楼 lyhoo163 的回复:
设置一全局变量ii,保存赋值缎带Label的值。 使用TTimer,3秒钟执行一次。
var ii:integer;  // 保存临时值

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if i<>ii then
  begin
    Label1.Caption:=Inttostr(i);
    ii:=i;
  end;
end;
楼主已经说了,不用label.caption:=inttostr(i)!!!!!!
lyhoo163 2017-10-19
  • 打赏
  • 举报
回复
设置一全局变量ii,保存赋值缎带Label的值。 使用TTimer,3秒钟执行一次。
var ii:integer;  // 保存临时值

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if i<>ii then
  begin
    Label1.Caption:=Inttostr(i);
    ii:=i;
  end;
end;

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧