|
-
Apr 27th, 2000, 02:37 PM
#1
Thread Starter
Conquistador
if it was kedaman, i hope this works for you too.
Code:
Dim Scr As Scrolling
Private Type Scrolling
FirstTry As Boolean
ScrollInx As Integer
ScrollStr As String
ScrollLen As Integer
StrtString As String
ScrollInt As Integer
End Type
Private Sub cmdStaop_Click()
If tmrScroll = True Then
tmrScroll = False
Exit Sub
End If
If tmrScroll = False Then
Scr.StrtString = txtScroll.Text 'This is the scrolling text
tmrScroll.Interval = Scr.ScrollInt
tmrScroll = True
End If
Scr.FirstTry = True
End Sub
Private Sub Form_Load()
Scr.ScrollInx = 1
tmrScroll = False
Scr.FirstTry = True
lblScroll.Width = 2895
Scr.ScrollInt = 50
End Sub
Private Sub tmrScroll_Timer()
If Scr.FirstTry = True Then
For i = 0 To 41
Scr.StrtString = Scr.StrtString & " "
Next i
Scr.FirstTry = False
End If
Scr.ScrollStr = Right(Left(Scr.StrtString, Scr.ScrollInx), 40)
lblScroll.Caption = Scr.ScrollStr
Scr.ScrollInx = Scr.ScrollInx + 1
Scr.ScrollLen = Len(Scr.StrtString)
If Scr.ScrollLen = Scr.ScrollInx Then 'if it's finished (all off the screen)
', start again
Scr.ScrollInx = 1
End If
End Sub
the code is pretty self explanatory
-
Apr 30th, 2000, 06:25 PM
#2
Thread Starter
Conquistador
i just got email notification for a reply to this thread, from fox, but it is not here (weird???)
did n e 1 reply?
-
Apr 30th, 2000, 07:07 PM
#3
transcendental analytic
David, i appreciate that u have done that work for me but, sorry that's not what i wanted. Maybe you misunderstood me last time. I gave u my UDT that tells exactly how it should scrolls, the speed should be set to match the words timestamp. However I had made this scrolling go exactly passing every timestamp at the right time which causes the scrolling go whery jumpy and jerky. So while trying to put in some " " to make it go the right speed or give the speed some more flexibility i loosed the codes functionality. Well if you have time, and youre still willing to help, please mail me [email protected] and i give u my current source and a mp3file containing some lyrics for you to work with. you can also contact me if you have icq, mine is 12113437
Fox, maybe deleted it, i'll ask him
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
Apr 30th, 2000, 07:23 PM
#4
PowerPoster
That's right, I first misunderstood the problem...
-
Apr 30th, 2000, 08:12 PM
#5
Frenzied Member
-
Apr 30th, 2000, 08:35 PM
#6
transcendental analytic
Sam, didn't i make myself clear? I'm going to explain once more if so, try read what i have explained, even though i'm not good at it
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
Apr 30th, 2000, 09:04 PM
#7
Frenzied Member
I havn't seen your origonal post. Where's that
-
Apr 30th, 2000, 09:11 PM
#8
PowerPoster
(That was the problem, where's you original post?)
-
Apr 30th, 2000, 10:38 PM
#9
transcendental analytic
I think the search engine is really good on this site. I searched for lyrics and found this thread and the original:
http://forums.vb-world.net/showthrea...threadid=14520
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 1st, 2000, 05:52 PM
#10
Thread Starter
Conquistador
it was also mentioned inside my post about needing a project
possibly titled I need a Project
-
May 1st, 2000, 09:22 PM
#11
transcendental analytic
Right, are u an artist david? I need artist, also i need some1 to solve my scrolling dilemma. I will give some chocolate bars to any1 that helps me.
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 1st, 2000, 09:41 PM
#12
Fanatic Member
I am a bit bored at the minute so i would like to have a go at your scrolling problem Kedeman. So if you want to send me the code i'll give it a whirl. No promises though
Iain, thats with an i by the way!
-
May 2nd, 2000, 09:14 PM
#13
transcendental analytic
Are you accustomed with arringed subproperties or have you done any physical apps like gravity or things, I think this can be solved indirectly manipulating the speed of the text, and sorry, I didn't tell what you need to know to help me but that is not for newbies. The speed has to be relatively manipulated by the current position, and if a sudden jump is noted, ignore relative manipulation. Are you sure you can handle this?
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 2nd, 2000, 09:23 PM
#14
Fanatic Member
Who knows
Who knows if i can handle this. I will give it good go, and you have nothing to lose by another person trying. As i said i have nothing much to do at the minute on my project, so i am a bit bored.
Iain, thats with an i by the way!
-
May 3rd, 2000, 04:42 AM
#15
transcendental analytic
Will you have time to wait one or two days? I'm damn busy at the moment with all kinds of stuff. Nice of you to be interested in this.
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 3rd, 2000, 03:41 PM
#16
Thread Starter
Conquistador
-
May 3rd, 2000, 04:14 PM
#17
transcendental analytic
An artist with good talent of couse! I need some graphical design to an RPG-game im working on.
I'm working on putting a sample on my website so that
everyone can have a try on my problem.
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 3rd, 2000, 11:34 PM
#18
transcendental analytic
Everyone that want to help, heres the file:
http://www.geocities.com/kedasu/kedaman.zip
Now this contains a sample mp3file with all the words and timestamp you need to work with.
An ocx to handle some winamp stuff, i made just for this purpose.
An txt file, you dont need to read if you alread have read these posts
A sample project that shows how to use this ocx.
You need winamp to play the sample mp3file. Don't use any other mp3player because this app is for winamp.
Good luck!
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
May 4th, 2000, 07:16 PM
#19
Thread Starter
Conquistador
nope, i'm pretty bad at art 
sorry
-
May 4th, 2000, 07:20 PM
#20
transcendental analytic
np, but if there are other artists out there then contact me
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
Jun 18th, 2000, 01:07 AM
#21
Good Ol' Platypus
Actually.. uhh... Kedaman, I was hoping you could work on my game! The thread's right here if you want to sign up:
http://forums.vb-world.net/showthrea...threadid=19736
All contents of the above post that aren't somebody elses are mine, not the property of some media corporation. 
(Just a heads-up)
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|