请大家帮忙 我想实现label从左到右的循环移动如何编写代码? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 改变label 的left,当到达容器的边界时(left相等,right=容器宽度-label宽度)改变运算(+或者-) 用一个timer,控制移动速度,ontimer中写if (label1.left<(form1.left-label1.width)) label1.left=label1.left+5 else label1.left=form1.left;试试看 用VideoCap1控件拍照图压缩问题! 什么是MDI窗体? 如何等待另一个事件 StringGrid中可以把特定的单元格合并吗? 请问有谁用Delphi写过磁条卡写卡程序没有?如有请给一段代码。 求助:怎样把一个好的光电鼠标打造成“broken”鼠标 几个问题?? 如何产生不重复的随机数 Delphi中怎么样象在C++中那样使用传地址的方式进行参数传递? 关于重复记录控制问题 简单问题-在一个事件中调用其它事件? 如何在自己的程序中控制FastReport报表中的对象?
if (label1.left<(form1.left-label1.width))
label1.left=label1.left+5
else label1.left=form1.left;
试试看