yes.. thanks... now i must do the same on my Sprite control.
let me ask 1 thing... when you need change a control, normaly, you use the screen properties?
Not sure I Understand your question.
Also, when trying to open the zip for your Sprite not all files could be extracted.
Please rename all the .bas files and all the .ocx files to .txt like this"
AnimatedGif.ocx.txt
mdlAnimatedCursors.bas.txt
and I'll see if they work after I extract them and rename them back to their real name.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
yes.. thanks... now i must do the same on my Sprite control.
let me ask 1 thing... when you need change a control, normaly, you use the screen properties?
Not sure I Understand your question.
Also, when trying to open the zip for your Sprite not all files could be extracted.
Please rename all the .bas files and all the .ocx files to .txt like this:
AnimatedGif.ocx.txt
mdlAnimatedCursors.bas.txt
and I'll see if they work after I extract them and rename them back to their real name.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
why you create these files:
p1B94.GIF
p5D90.GIF
and more, but without delete them?
I didn't know I was creating them. What are they?
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Well I really don't know what you mean as no such problem occurs on my computer. Can you give me more detail? Are they files or folders and where do they occur and when do they occur. What do you do that makes them occur?
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Well I really don't know what you mean as no such problem occurs on my computer. Can you give me more detail? Are they files or folders and where do they occur and when do they occur. What do you do that makes them occur?
i belive that i resolve it
i have 1 question: on that mail that i give you, theres that files?
p1B94.GIF
p5D90.GIF
if so and you can't delete them, then enter on safe mode(speaking on windows) and delete the files. then reboot the pc and it's ok.
sorry about that. i didn't knew. sorry
No, they were not on that mail, I have no such names on my computer. Have no idea how you got them.
Did you see my post #243
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
You didn't understand my post. I need all of the .BAS and all of the .OCX files. I can't extract any of them and I have no idea why but my windows says they may be considered unsafe and won't allow me to extract them - dumb, isn't it.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
You didn't understand my post. I need all of the .BAS and all of the .OCX files. I can't extract any of them and I have no idea why but my windows says they may be considered unsafe and won't allow me to extract them - dumb, isn't it.
sorry... i didn't see it. but now i send it. thanks
Well, I'm having some problems with your Sprite project. I'm not sure what is going on but when I load it up it actually loads into VB5 (did you make it in VB5?) and there are some minor functions that are not valid in VB5 like Split, for example. So, I had to comment out all occurances of using the Split function. Did you notice that the meter.gif is not correct? It's missing the box and the meter scale is solid and should be little pieces going up/down the meter face. Also, I loaded some of my gif images into your project and the timing is way off. I have this one gif in particular that animates hand-writing at the normal speed of someone writing a letter but your project animates it like extremely slow - so slow it took a minute just to animate the first letter. Another gif file I have you make it transparent but it is not meant to be transparent and it doesn't come out right.
Also, this is incorrect:
UserControl.Appearance() = New_Appearance
but when I try this:
UserControl.Appearance = New_Appearance
it says it is a read only property
Also, this is incorrect:
HasDC = UserControl.HasDC
There is no .HasDC property for the UserControl. Did you mean to use this:
HasDC = UserControl.hDC instead?
Not sure why you are doing this:
Code:
If aimg(i).AutoSize = True Then
aimg(i).AutoSize = False
aimg(i).Width = LSD.GifWidth + 4
aimg(i).Height = LSD.GifHeight + 4
aimg(i).AutoSize = True
End If
That would make all frames the same size, wouldn't it? Is that what you want? I tried doing something like that when I was testing the code I gave you over that meter.gif problem and it worked for some gif files but not for all so I decided not to put my code in that did the same thing that your code does.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Well, I'm having some problems with your Sprite project. I'm not sure what is going on but when I load it up it actually loads into VB5 (did you make it in VB5?) and there are some minor functions that are not valid in VB5 like Split, for example. So, I had to comment out all occurances of using the Split function. Did you notice that the meter.gif is not correct? It's missing the box and the meter scale is solid and should be little pieces going up/down the meter face. Also, I loaded some of my gif images into your project and the timing is way off. I have this one gif in particular that animates hand-writing at the normal speed of someone writing a letter but your project animates it like extremely slow - so slow it took a minute just to animate the first letter. Another gif file I have you make it transparent but it is not meant to be transparent and it doesn't come out right.
Also, this is incorrect:
UserControl.Appearance() = New_Appearance
but when I try this:
UserControl.Appearance = New_Appearance
it says it is a read only property
Also, this is incorrect:
HasDC = UserControl.HasDC
There is no .HasDC property for the UserControl. Did you mean to use this:
HasDC = UserControl.hDC instead?
Not sure why you are doing this:
Code:
If aimg(i).AutoSize = True Then
aimg(i).AutoSize = False
aimg(i).Width = LSD.GifWidth + 4
aimg(i).Height = LSD.GifHeight + 4
aimg(i).AutoSize = True
End If
That would make all frames the same size, wouldn't it? Is that what you want? I tried doing something like that when I was testing the code I gave you over that meter.gif problem and it worked for some gif files but not for all so I decided not to put my code in that did the same thing that your code does.
sorry seems that i forget change it lol
my control was created on VB6 SP6. i never use VB5. i, always, use hdc. the meter.gif works fine to me. do me a favor, try enter again, but with VB6, maybe you can avoid that errors
I will have to convert all files to VB6 format. I know it's VB5 because I looked at the internal info for the files and it says VB5. I don't think once I change it over to VB6 it will change anythin about the meter.gif. And the other gif files don't come out correct either. I will convert to VB6, run the project again and test all gif files and get back with you.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
I will have to convert all files to VB6 format. I know it's VB5 because I looked at the internal info for the files and it says VB5. I don't think once I change it over to VB6 it will change anythin about the meter.gif. And the other gif files don't come out correct either. I will convert to VB6, run the project again and test all gif files and get back with you.
ok thanks
PS: have you seen that thread(about shadow graphic effect)?
is for i use on my sprite control, for be more faster hehehehe
Put a dotted border around your user control so users can see where it is on their Form
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Put a dotted border around your user control so users can see where it is on their Form
i have that property on properties window
i forget put it on Property Tags
but what you think about it?
(i have 1 old game with Sprite 2D older version, if you want it, just ask)
I don't understand the Automatic setting for transparency. Shouldn't automatic be the real transparent color? If I load up meter.gif and a few others they don't display correctly but if I change it to manual it displays correct. You have automatic as the default. Seems to me it should be manual as the default.
Also, there is problem with over-lapping images.
Another problem I see is that the timing seems to get off. The timing on the meter.gif is too slow and after loading several gif images the timing even gets slower and slower. I have one image that even from the start is not correct on the timing. It takes about a minute just to display the first letter but in one minuter it should have displayed all the letters and the entire image.
Rotate isn't quite right. If I rotate a image 90 part of the bottom is cut off
Last edited by jmsrickland; Sep 24th, 2012 at 04:48 PM.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
I don't understand the Automatic setting for transparency. Shouldn't automatic be the real transparent color? If I load up meter.gif and a few others they don't display correctly but if I change it to manual it displays correct. You have automatic as the default. Seems to me it should be manual as the default.
Also, there is problem with over-lapping images.
Another problem I see is that the timing seems to get off. The timing on the meter.gif is too slow and after loading several gif images the timing even gets slower and slower. I have one image that even from the start is not correct on the timing. It takes about a minute just to display the first letter but in one minuter it should have displayed all the letters and the entire image.
Rotate isn't quite right. If I rotate a image 90 part of the bottom is cut off
"Shouldn't automatic be the real transparent color?"
it's the 0,0 pixel
"Also, there is problem with over-lapping images."
what you mean?
"Another problem I see is that the timing seems to get off. The timing on the meter.gif is too slow and after loading several gif images the timing even gets slower and slower. I have one image that even from the start is not correct on the timing. It takes about a minute just to display the first letter but in one minuter it should have displayed all the letters and the entire image."
so you find that error too
hey the problem isn't on my control. but i belive that your code have 1 bug. i repair it, but isn't 100%.
"Rotate isn't quite right. If I rotate a image 90 part of the bottom is cut off"
i belive on that. that's why i'm working on another way for tha graphics hehehe
my Graphic class will be more faster and easy to use
(don't use the Opacy... isn't working 100% and it's slow... i'm working on that too)
what you think about my Select Graphic effect(i create it)?
anotherthing: do you know a faster way for capture a window\picturebox(inclued controls too)?
Try this gif images. It should be transparent white but your program does not show that and also at the end of each cycle it blacks out the image and starts over again which it is not supposed to do that either.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Try this gif images. It should be transparent white but your program does not show that and also at the end of each cycle it blacks out the image and starts over again which it is not supposed to do that either.
i tested on my control and i see what you mean, but have you tried on animatedgif code? here you see the bug too, but in diferent way
i tested on my control and i see what you mean, but have you tried on animatedgif code? here you see the bug too, but in diferent way
What do you mean by animatedgif code and where is bug and what is it?
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
When closing the test form (Form1) using the X button I get Run-time error 398 Client side not available
Code:
Private Sub tmrAnimation_Timer()
If Animation = AnimationPause Or Animation = AnimationStopped Or Ambient.UserMode = False Then
tmrAnimation.Enabled = False
Exit Sub
End If
If lngActualSubImage < PicAnimation.Count - 1 Then
lngActualSubImage = lngActualSubImage + 1
Else
If Strip.Activate = True Then
lngActualSubImage = 1
Else
lngActualSubImage = 0
End If
End If
Call ShowImage
API_DoEvents
End Sub
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
When closing the test form (Form1) using the X button I get Run-time error 398 Client side not available
Code:
Private Sub tmrAnimation_Timer()
If Animation = AnimationPause Or Animation = AnimationStopped Or Ambient.UserMode = False Then
tmrAnimation.Enabled = False
Exit Sub
End If
If lngActualSubImage < PicAnimation.Count - 1 Then
lngActualSubImage = lngActualSubImage + 1
Else
If Strip.Activate = True Then
lngActualSubImage = 1
Else
lngActualSubImage = 0
End If
End If
Call ShowImage
API_DoEvents
End Sub
belive why these error. i belive that, when control is destroyed with aplication, the timer isn't terminated. maybe it's the problem.
that's why i change it:
Code:
Private Sub tmrAnimation_Timer()
On Error GoTo err
If Animation = AnimationPause Or Animation = AnimationStopped Or Ambient.UserMode = False Then
tmrAnimation.Enabled = False
Exit Sub
End If
If lngActualSubImage < PicAnimation.Count - 1 Then
lngActualSubImage = lngActualSubImage + 1
Else
If Strip.Activate = True Then
lngActualSubImage = 1
Else
lngActualSubImage = 0
End If
End If
Call ShowImage
API_DoEvents
Exit Sub
err:
tmrAnimation.Enabled = False
End Sub
have you tested the selection and shadow graphics effects?
and the collision event?
Here's another example of not displaying correctly.
The image on top is how it is supposed to display. You do not see any white in the image.
The next one, bottom left, is from your project. On this I set the it to TransparentAutomatic. On this one it is being displayed on white which it should no and the blue ball is missing and there is also a grey ball that your program made because there is no grey ball in the gif image.
The one on the bottom right is also from your project. This one I set it to TransparentManualy. All the colored balls are being displayed but they are displayed on white which again there is no white in the gif image.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
Here's another example of not displaying correctly.
The image on top is how it is supposed to display. You do not see any white in the image.
The next one, bottom left, is from your project. On this I set the it to TransparentAutomatic. On this one it is being displayed on white which it should no and the blue ball is missing and there is also a grey ball that your program made because there is no grey ball in the gif image.
The one on the bottom right is also from your project. This one I set it to TransparentManualy. All the colored balls are being displayed but they are displayed on white which again there is no white in the gif image.
I am really impressed with your Graphics Class. Nice job, joaquim.
Still some work needs to be done on your Sprite OCX, however. but you'll get it, I'm sure of that but nice job on that also.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
"I am really impressed with your Graphics Class. Nice job, joaquim."
thanks... but need more work on Shadow and Selection Effects
these make me crazy, because the Y error(from view and not message) don't make sence to me
"Still some work needs to be done on your Sprite OCX, however. but you'll get it, I'm sure of that but nice job on that also."
yes. my next step is try read all controls with speed, but i think that isn't possible
at least we can choose the controls that we need
"I am really impressed with your Graphics Class. Nice job, joaquim."
thanks... but need more work on Shadow and Selection Effects
these make me crazy, because the Y error(from view and not message) don't make sence to me
"Still some work needs to be done on your Sprite OCX, however. but you'll get it, I'm sure of that but nice job on that also."
yes. my next step is try read all controls with speed, but i think that isn't possible
at least we can choose the controls that we need
You still have problem with transparency. I loaded some gif images and you make them transparent when they are not transparent. I still do not understand why you use aimg(i).BackColor for transparency and why you use aimg(0).BackColor = GetPixel(aimg(0).hDC, 0, 0) for the backcolor. This causes gif to have incorrect transparent color and makes gif transparent when the gif is not to have transparency.
I loaded an invalid gif and your app went into endless loop. You need to code for invalid gif because there are many gif files that are incorrect and they will cause your app to freeze up.
Anything I post is an example only and is not intended to be the only solution, the total solution nor the final solution to your request nor do I claim that it is. If you find it useful then it is entirely up to you to make whatever changes necessary you feel are adequate for your purposes.
that's why, on my control, you can change the transparency color
but now i have "big fish to fry"
my class, on shadow effect, give me a view bugs
and i belive that it's by DIB's rules
Reply With Quote
Originally Posted by joaquim
