Create, edit and convert animated cursor files (.ani) for Windows or animations with AniTuner.Animated cursor files contain an animated mouse pointer and are recognized natively by Windows.
I am developing an application that connect to database on the other side of the net. And each time i want to connect to database and run some sql command, i want my user to know that there is some process is runing. My idea is to show animated gif until the process is done.
My question is how i could achieved that? Any one could give me a clue or hint or even sample code? This is my snippet code: Private Sub cmdSaveClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSave.Click Dim strQuery As String Dim Connection As New clsConnection 'I am using my class Dim Settings As New clsSettings 'I am using my class Dim blnConnect As Boolean = False Private Const strAppName As String If NotNull(txtName) Or NotNull(txtUnit) Or NotNull(txtPacking) Or NotNull(txtPoint) Or NotNull(txtPricePoint) Or NotNull(txtPrice) Then MsgBox('Data with.
mark must not empty.' , MsgBoxStyle.Information, 'Information') Exit Sub End If 'Here i want o star play animated gif If Connection.OpenConnection(Settings.getStrConnectio n(strAppName)) = True Then Clear blnConnect = True Else 'stop animated gif MsgBox('Could not connect to database.'
, MsgBoxStyle.Critical, 'Warning.' ) blnConnect = False Exit Sub End If strQuery = 'Insert Into products (name,unit,packaging,point,pricepoint,price) VALUES (' & txtName.Text & ',' & txtUnit.Text & ',' & txtPacking.Text & ',' & txtPoint.Text & ',' & txtPricePoint.Text & ',' & txtPrice.Text & ')' Select Case conProduct.Transaction(strQuery) Case Is. Alfred Drag a picturebox on your form Set it to dock fill Set Sizemode to StretchImaga Choose in your property box your gif annimation That is all Cor 'Lemune'. Lemune, At least you have to put it on a seperate form.
I thougth that was working because the gif has its own annimation however I am not sure of that. Cor 'Lemune' I have tried your suggestion Cor. And I'm using Property Visible But for my application it doesn't work. So i tried make a simple one that use command button and it's work well. This is my simple application: Private Sub OKClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click if pbAnimation.Visible=True Then pbAnimation.Visible=False else pbAnimation.Visible=True end if End Sub But for real application (my question), it not work, it didn't showing the animation.
![Cursor Cursor](/uploads/1/2/4/1/124125630/194044484.jpg)
![Animated cursor gif Animated cursor gif](http://www.rw-designer.com/cursor-teaser-big/rainbow-by-piggeh.png)
Thanks Cor, for your answer. But it still not working. I create a simple form that only had pbAnimation. Then in my application(the question), first i create the instance of the form, then show it. Private Sub cmdSaveClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSave.Click Dim frmPending As New Pending frmPending.Show ' ' ' On each time i want to stop the animation, I hide the form.
But It's doesn't work like i wanted. It still didn't show the animated gif, the time to load is about 3 s.
So you came looking for cursors and graphics eh? Cursors-4u.com gots plenty of for your mouse pointer. We got, cute, animated, cool, sexy, and so much more cursors. You can directly download the cursors for your mouse or web site to your hard drive for free and use them on your desktop computer for Windows XP or Windows Vista or Windows 7 or Windows 8 or you can place them on your web site or blog. You can even get, Xanga, Bebo, Orkut, Wordpress, Myspace and any other social networking profile site that allows CSS coding, here. Also our cursors work on Internet Explorer, Mozilla Firefox, Safari, and Google Chrome. We were the first cursor site to allow cursor hot linking and cursor download.
There have been many imitators since but you will not see the quality and quantity like here at Cursors-4U.com. © 2005-2018 Cursors-4U.com. All Rights Reserved.
All Trademarks And Copyrights Held By Their Respective Owners.