K kunhong Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-30 #1 请问各位一个有点弱的问题,我想让form上的一个label在form打开的时候自动从form最下面升起到某一位置,请问该如何实现?是否是控制label的top值还是其他?
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-30 #2 可以这样 ,你也可以使用lmd的控件,有现成的可以使用。
暗 暗夜中独舞 Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-30 #5 定时改变label1.top和label1.left的值不就可以
Z zucc_bug Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-30 #6 用定时器控制LABEL的位置好像会闪的吧?以前看过人家这么做。
B bbscom Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-30 #7 通过time1计时,然后再设置label1的属性。如:top、left、catpion+空格
D dtboyi Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-31 #8 最简单的是timer控件,来改变lable的top,left
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2008-01-31 #9 把form的doublebuffer:=true就不闪了
G Geraldyor Unregistered / Unconfirmed GUEST, unregistred user! 2008-02-15 #11 procedure TForm1.Timer1Timer(Sender: TObject); begin if label1.Top>0 then label1.Top:=label1.Top-4 else label1.Top:=304; end;
procedure TForm1.Timer1Timer(Sender: TObject); begin if label1.Top>0 then label1.Top:=label1.Top-4 else label1.Top:=304; end;