Mover Titulo del Form

[juanjoxx]

hola a todos del foro ..... aqui les va la inmterrogante  
quisiera saber como hacer q el titulo de mi Form se mueva constantemete de derecha a izquierda o viceversa  
gracias de ante mano ...   

[Cicklow]

ok esto es mas o menos facil solo nesesitas un timer unas funciones y listo!!

comenzemos

declaramos como global (en la general)

Código [Seleccionar] Expandir


dim x as integer,z as integer
z=1
x=0


en el timer (cada 1 segundo o un cacho menos)!!

Código [Seleccionar] Expandir


espacio = " "
if x=0 then
   for i =1 to z
    comp = comp & espacio
   next
   form1.caption = comp & " Cicklow SOFT®"
   z=z+1
   if z>10 then x=0:z=0
else
   form1.caption = left("Cicklow SOFT®",len("Cicklow SOFT®")-z)
   z=z-1
   if z <=0 then z=1:x=0
endif


nidea si funciona bien.. ya que no lo puedo provar, pero esto te dara una idea de coso seria!!

[juanjoxx]

Gracias pro  y si funciona solo q las varriables lo eh puedo cuando carga el form pero si lo eh declaro de manera general