flat assembler
Message board for the users of flat assembler.

Index > Heap > Cursor ii theme

Author
Thread Post new topic Reply to topic
l4m2



Joined: 15 Jan 2015
Posts: 648
l4m2
I installed the theme of Madoka(pink) and Miku(blue), and some of the cursors in them doesn't fit me, so I chose the fit-me cursors and used them, but when a pink cursor turn blue it's usually hard to find it. What software change cursors' color?
Post 28 Jun 2016, 04:25
View user's profile Send private message Reply with quote
revolution
When all else fails, read the source


Joined: 24 Aug 2004
Posts: 17279
Location: In your JS exploiting you and your system
revolution
Which OS/App are you referring to?
Post 28 Jun 2016, 04:44
View user's profile Send private message Visit poster's website Reply with quote
l4m2



Joined: 15 Jan 2015
Posts: 648
l4m2
revolution wrote:
Which OS/App are you referring to?
windows 7 (*.cur, *.
ani)
Post 28 Jun 2016, 04:46
View user's profile Send private message Reply with quote
revolution
When all else fails, read the source


Joined: 24 Aug 2004
Posts: 17279
Location: In your JS exploiting you and your system
revolution
In Windows, when the pointer is within the window, all programs are free to make the cursor anything it desires, but most programs only use the default set. So it depends upon what you are doing.
Post 28 Jun 2016, 04:51
View user's profile Send private message Visit poster's website Reply with quote
l4m2



Joined: 15 Jan 2015
Posts: 648
l4m2
I meant an application that exchange the RED with BLUE so the color won't change a large change when the mouse move
Post 28 Jun 2016, 09:22
View user's profile Send private message Reply with quote
l4m2



Joined: 15 Jan 2015
Posts: 648
l4m2
Solved on *.cur, but not *.ani:
Assuming the size of the cursor is 32*32.
Code:
Private Sub Form_Load()
s = Dir("Cursors\*")
While Len(s)
    Dim d(3) As Byte, i&, t As Byte
    Open "Cursors\" & s For Binary As #1
    Seek #1, Seek(1) + 62
    For i = 0 To 1023
        Get #1, , d
        t = d(0): d(0) = d(2): d(2) = t
        Seek #1, Seek(1) - 4
        Put #1, , d
    Next
    Close #1
    s = Dir()
    DoEvents
Wend
End Sub
    
Post 28 Jun 2016, 09:55
View user's profile Send private message Reply with quote
Display posts from previous:
Post new topic Reply to topic

Jump to:  


< Last Thread | Next Thread >
Forum Rules:
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You can attach files in this forum
You can download files in this forum


Copyright © 1999-2020, Tomasz Grysztar.

Powered by rwasa.