底层为图片,图片上方为滚动字幕!帮忙想想怎么设计!(100)

  • 主题发起人 主题发起人 Cooco1981
  • 开始时间 开始时间
C

Cooco1981

Unregistered / Unconfirmed
GUEST, unregistred user!
想在一张图片上,滚动显示一些信息字,如何写好。是不是要用到DrawText,我试过几份,但不行。请高手们指教!
 
最好找现成的控件国内的控件可以试试CnPack(国人自己的开放源码第三方组件包)里的字体平滑移动和变形控件,里面有样例,在目录CnAAFontDemo里
 
放image到panel上,放label到panel上,用timerprocedure TForm1.Timer1Timer(Sender: TObject);begin if label1.Left> -label1.Width then label1.Left := label1.Left - 10 else label1.Left := Image1.Width;end;label里面的文字左移。
 
label1设置成透明的
 
看我的程序,也许有启发。QQ:31869179
 
同意上面说的,我也这样弄过,只是屏幕有点闪。
 
DrawText不行,用canvas.textout吧
 
后退
顶部