Dear All,
It is obvious that we can display images in a form.
How to make the image/picture come out by way of scrolling.
( left to right, top to bottom) ?
thks n rgds
Chang
Image scrolling...
Moderator: Rathinagiri
Image scrolling...
Just Hmg It !
-
- Posts: 1275
- Joined: Tue Sep 03, 2013 4:22 am
- Location: Tecámac, México
Re: Image scrolling...
Hola hmgchang,
No he hecho un ejemplo parecido, pero por lo que indicas con un control "Timer", haces un procedimiento que cambien las coordenadas de la imagen cada intervalo de tiempo. Nada más que no se como responda el From, si parpadee o no!
Si tengo tiempo hago al rato un demo.
Saludos
No he hecho un ejemplo parecido, pero por lo que indicas con un control "Timer", haces un procedimiento que cambien las coordenadas de la imagen cada intervalo de tiempo. Nada más que no se como responda el From, si parpadee o no!
Si tengo tiempo hago al rato un demo.
Saludos
- srvet_claudio
- Posts: 2193
- Joined: Thu Feb 25, 2010 8:43 pm
- Location: Uruguay
- Contact:
Re: Image scrolling...
See:hmgchang wrote:Dear All,
It is obvious that we can display images in a form.
How to make the image/picture come out by way of scrolling.
( left to right, top to bottom) ?
thks n rgds
Chang
Code: Select all
DEFINE WINDOW Win1;
AT 0,0;
WIDTH 800;
HEIGHT 600;
VIRTUAL WIDTH 1200;
VIRTUAL HEIGHT 1200;
MAIN
@ 10,10 IMAGE Image_1 PICTURE "cPictureName"
-
- Posts: 1275
- Joined: Tue Sep 03, 2013 4:22 am
- Location: Tecámac, México
Re: Image scrolling...
Hola hmgChang,
Creo que lo que quieres hacer es como un protector de pantalla, bueno hice esta aplicación, espero que sea lo que buscas, solo falta jugar un poco (mucho) con las coordenadas, según sea Máxima Columna, Máxima Fila.
Saludos
Creo que lo que quieres hacer es como un protector de pantalla, bueno hice esta aplicación, espero que sea lo que buscas, solo falta jugar un poco (mucho) con las coordenadas, según sea Máxima Columna, Máxima Fila.
Code: Select all
#include "hmg.ch"
Function Main
PUBLIC nRow := 0
PUBLIC nCol := 0
DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 400 ;
HEIGHT 400 ;
TITLE 'Timer Test' ;
MAIN
DEFINE IMAGE Image_1
ROW 30
COL 10
HEIGHT 33
WIDTH 33
PICTURE 'Edit_Edit.bmp'
STRETCH .t.
END IMAGE
DEFINE TIMER Timer_1 ;
INTERVAL 1000 ;
ACTION (VerImagen() )
END WINDOW
Form_1.Center
Form_1.Activate
Return
PROCEDURE VerImagen()
nRow := nRow + 10
nCol := nCol + 10
Form_1.Image_1.Row := nRow
Form_1.Image_1.Col := nCol
RETURN NIL
Re: Image scrolling...
Thks dr. Claudio n mr. Tovar...
but forgive me for my poor english...
I tried mr. Tovar demo but its a moving picture.
What i meant is something like when "we pulling window curtain for left to right" and
that how i want a picture do come out / moving out. So slowly we can see the right side of
the picture growing from small to bigger ( part of picture more and more and finally whole picture)
* FYI : The more complicated one is like
in Mac when we click icon and it zoom out ( scrolling from small to big)
but forgive me for my poor english...
I tried mr. Tovar demo but its a moving picture.
What i meant is something like when "we pulling window curtain for left to right" and
that how i want a picture do come out / moving out. So slowly we can see the right side of
the picture growing from small to bigger ( part of picture more and more and finally whole picture)
* FYI : The more complicated one is like
in Mac when we click icon and it zoom out ( scrolling from small to big)
Just Hmg It !
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Image scrolling...
Hola hmgchang :
No se si le puede servir mire mi
sample:
viewtopic.php?f=8&t=1108&start=20" onclick="window.open(this.href);return false;
"Music_Tone_New.zip"
Hay unas cortinas que se abren y cierran
mi truco es con varias imagenes de distinto
tamaño y relentizado con Inkey()
dando el efecto que las cortinas se abren y cierran
un saludo
Mustafa
*---------------- google -------------------------*
Hello hmgchang :
If you can not look at my serve
sample:
viewtopic.php?f=8&t=1108&start=20" onclick="window.open(this.href);return false;
"Music_Tone_New.zip"
There are curtains that open and close
My trick is with several images of different
size and throttled back to Inkey ()
giving the effect that the curtains open and close
a greeting
Mustafa
No se si le puede servir mire mi
sample:
viewtopic.php?f=8&t=1108&start=20" onclick="window.open(this.href);return false;
"Music_Tone_New.zip"
Hay unas cortinas que se abren y cierran
mi truco es con varias imagenes de distinto
tamaño y relentizado con Inkey()
dando el efecto que las cortinas se abren y cierran
un saludo
Mustafa
*---------------- google -------------------------*
Hello hmgchang :
If you can not look at my serve
sample:
viewtopic.php?f=8&t=1108&start=20" onclick="window.open(this.href);return false;
"Music_Tone_New.zip"
There are curtains that open and close
My trick is with several images of different
size and throttled back to Inkey ()
giving the effect that the curtains open and close
a greeting
Mustafa
Re: Image scrolling...
Thanks mr. Mustafa for reminding the 80's n 90's....
rgds
chang
rgds
chang
Just Hmg It !