Saludos amigos..
El dia de hoy me dio por hacer una simulacion del movimiento de imagenes como se hace ahora con los telefonos, donde se desliza en los equipos touch el dedo y se muestran en forma animada las imagenes y/o iconos de los programas..
Este es el avance que tengo.. ademas que ya siendo que me va a ser muy util..
Si alguien conoce un metodo MEJOR... adelante con la colaboracion..
http://pcicom.net/da...SMOTHSCROOL.rar
Simulando un SMOTH SCROOLL
Started by
pcicom
, May 13 2010 10:06 PM
4 replies to this topic
#1
Posted 13 May 2010 - 10:06 PM
#2
Posted 13 May 2010 - 10:47 PM
Interesante amigo, solo que hay un detalle, no contiene la unit2.pas y la está pidiendo
Salud OS
Salud OS
#3
Posted 13 May 2010 - 10:51 PM
Bueno, eliminé la Unit2 del proyecto y funcionó, ahora me dió un error que dice
---------------------------
Project1
---------------------------
List index out of bounds (13)
---------------------------
OK
---------------------------
Salud OS
---------------------------
Project1
---------------------------
List index out of bounds (13)
---------------------------
OK
---------------------------
Salud OS
#4
Posted 13 May 2010 - 11:35 PM
Sorry,, intentanto evitar un archivo mas grande erre con ese detalle del form2... de hecho no lo utilizo..
hay que corregir la parte del sig. CODIGO que VALIDA que no se SOBREPASE el limite de imagenes a mostrar.
El form2 lo estaba UTILIZANDO porque pretendia abrir la IMAGEN en mayor tamaño tipo POLAROID...
Agregando el codigo para las imagenes
Estuve buscando algun CONTROL que exista y que realice esto y creo que los unicos son los TMS.. de DELPHI2010..11,
La idea es no sobrecargar controles y/o componentes con el contenido de las imagenes, por eso uso solo x TIMAGE que unicamente carga las imagenes indicadas.
FALTA hacer el efecto de movimiento y deslizamiento ya que en esta primer pruebita si te fijas unicamente se cambian las imagenes encima de las otras..
En el efecto ORIGINAL se mueve como MARQUEE.. entran y salen del area de imagenes..
YA LUEGO le SIGO...
hay que corregir la parte del sig. CODIGO que VALIDA que no se SOBREPASE el limite de imagenes a mostrar.
delphi
procedure TForm1.sb1Change(Sender: TObject); vAR I,J:integer; begin j:= sb1.Position; if j>=(sb1.Max-nMax) then exit; For i:= 1 to nMax do begin // aFotos[i].picture:= nil; aFotos[i].picture.loadfromfile(ListaFotos.Strings[j+1]); inc(j); end; end;
El form2 lo estaba UTILIZANDO porque pretendia abrir la IMAGEN en mayor tamaño tipo POLAROID...
Agregando el codigo para las imagenes
delphi
Procedure TFORM1.Mostrar(Sender:Tobject); begin showmessage('Abro FORM2 y Muestro IMAGEN en tipo POLAROID'); { form2 := TForm2.Create(Self); form2.ShowModal; form2.Free; } end; aFotos[?].onDbClick := Mostrar;
Estuve buscando algun CONTROL que exista y que realice esto y creo que los unicos son los TMS.. de DELPHI2010..11,
La idea es no sobrecargar controles y/o componentes con el contenido de las imagenes, por eso uso solo x TIMAGE que unicamente carga las imagenes indicadas.
FALTA hacer el efecto de movimiento y deslizamiento ya que en esta primer pruebita si te fijas unicamente se cambian las imagenes encima de las otras..
En el efecto ORIGINAL se mueve como MARQUEE.. entran y salen del area de imagenes..
YA LUEGO le SIGO...
#5
Posted 14 May 2010 - 07:19 AM
Muy bueno amigo, este proyecto tiene mucha tela de donde cortar
Salud OS
Salud OS