Fancy Windows ToolTips [Windows]

Share your advanced PureBasic knowledge/code with the community.
Post Reply
RASHAD
PureBasic Expert
PureBasic Expert
Posts: 4946
Joined: Sun Apr 12, 2009 6:27 am

Fancy Windows ToolTips [Windows]

Post by RASHAD »

The title say it all
Win 7,8
XP not all styles supported

Code: Select all


Global Dim hTip(4)
Global Dim hIcon(4)
Global Balloon.TOOLINFO

#TTS_USEVISUALSTYLE = $100
#TTF_PARSELINKS      = $1000
#TTM_SETWINDOWTHEME  = $200B


FontID1 = LoadFont(1, "Tahoma", 12,#PB_Font_HighQuality|#PB_Font_Italic)
FontID2 = LoadFont(2, "Broadway", 14,#PB_Font_HighQuality)

CatchImage(0,?ico)
hIcon(1) = CopyImage_(ImageID(0),#IMAGE_ICON,32,32,0)
hIcon(2) = hIcon(1)
hIcon(3) = hIcon(1)

Procedure WndProc(hwnd, uMsg, wParam, lParam)
  Result = #PB_ProcessPureBasicEvents
  If uMsg = #WM_MOUSEMOVE
    m.MSG
    m\hwnd = hwnd
    m\message = uMsg
    SendMessage_(hTip(0), #TTM_RELAYEVENT, 0,m)
    SendMessage_(hTip(1), #TTM_RELAYEVENT, 0,m)
    SendMessage_(hTip(2), #TTM_RELAYEVENT, 0,m)
    SendMessage_(hTip(3), #TTM_RELAYEVENT, 0,m)
  EndIf
  ProcedureReturn Result
EndProcedure


Procedure BalloonTip(tipn,GadgetID, Gadget,FontID,Title$,Text$, hIcon)
 
  hTip(tipn) = CreateWindowEx_(0,"ToolTips_Class32","",#WS_POPUP | #TTS_USEVISUALSTYLE |#TTS_NOPREFIX | #TTS_BALLOON,0,0,0,0,GadgetID,0,GetModuleHandle_(0),0)  
  SendMessage_(hTip(tipn),#WM_SETFONT,FontID,0) 
  Balloon\cbSize=SizeOf(Balloon)
  Balloon\uFlags=#TTF_IDISHWND | #TTF_SUBCLASS |#TTF_PARSELINKS
  Balloon\hWnd=GadgetID(Gadget)
  Balloon\uId=GadgetID(Gadget)
  Balloon\lpszText=@Text$  
  SendMessage_(hTip(tipn), #TTM_ADDTOOL, 0, Balloon)
  SendMessage_(hTip(tipn), #TTM_SETTITLE, hIcon, @Title$)
 
EndProcedure


OpenWindow(0, 235, 2, 400, 200, "ToolTip Test",  #PB_Window_SystemMenu | #PB_Window_TitleBar|#PB_Window_ScreenCentered )   
ButtonGadget(1, 10, 160, 80, 25, "TEST 1")
BalloonTip(1,GadgetID(1), 1,FontID1,"Hi","This is a test for"+#CRLF$+"Multiline Balloon",hIcon(1))
ButtonGadget(2, 100, 160, 80, 25, "TEST 2")
BalloonTip(2,GadgetID(2), 2,FontID2,"OK","NEXT ",hIcon(2))
ButtonGadget(3, 190, 160, 80, 25, "TEST 3")
BalloonTip(3,GadgetID(3), 3,FontID2,"OK OK","NEXT ONE",hIcon(2))
ButtonGadget(4, 280, 160, 80, 25, "TEST 4")
BalloonTip(4,GadgetID(4), 4,FontID2,"OK OK","NEXT ONE",hIcon(2))


Import "Uxtheme.lib"
    SetWindowTheme(Window.l, Body.p-unicode, Title.p-unicode)                                                  
EndImport

SetWindowTheme(hTip(1),"","TASKBAND")
SetWindowTheme(hTip(2),"","WINDOW")


SetWindowTheme_(hTip(3), @null.w, @null.w)
SendMessage_(hTip(3),#TTM_SETTIPTEXTCOLOR,$0202FD,0)
SendMessage_(hTip(3),#TTM_SETTIPBKCOLOR,$DCFFFF,0)
act = 1

SetWindowCallback(@WndProc())
Repeat
  Select WaitWindowEvent()
     
      Case #PB_Event_CloseWindow
            Quit = 1
     
      Case #PB_Event_Gadget
          Select EventGadget()
             
          EndSelect
             
  EndSelect

Until Quit = 1
End

DataSection
ico:
   Data.q $2020000400010000,$10A8002000010000,$2020000000460000,$08A8000800010000,$1010000010EE0000,$0468002000010000,$1010000019960000,$0568000800010000
   Data.q $002800001DFE0000,$0040000000200000,$0000002000010000,$0000000010800000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$3198030032980000,$2D95A70030965B00,$2A92EC002B93D600,$2992F7002992F400,$2A93F5002992F800,$2E96DC002C94EE00
   Data.q $32986E003197B200,$0000000000001200,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$2D94800031970000,$2F96FD002A92E500,$4BAAFF0B3B9FFF00,$67BDFF2E5BB5FF1B,$71C1FF466FC1FF3D,$63B7FF456DBEFF49,$41A1FF2754ACFF3A
   Data.q $2792FF003097FF13,$3097EE002993FE00,$0000090032989B00,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $2B929C0031970000,$4DAFFF013197FA00,$97E6FF4874CDFF1D,$BEFFFF8BAEF6FF6F,$CFFFFFAAC8FFFF9E,$D8FFFFBAD4FFFFB3,$DEFFFFC8DCFFFFC1,$D4F8FFCBDCFFFFCB
   Data.q $99D3FFAABFEAFFC1,$369AFF3E65B3FF7D,$2E96FD002692FF08,$000003003298BB00,$0000000000000000,$0000000000000000,$0000000000000000,$2D933C0032980000
   Data.q $5EBFFF023298F500,$AFFFFF6692EAFF2E,$BBFFFF93B9FFFF87,$BEFFFF9ABCFFFF97,$C5FFFFA4C2FFFF9E,$CFFFFFAFCBFFFFA9,$D6FFFFBCD2FFFFB6,$E1FFFFC9DBFFFFC2
   Data.q $F1FFFFDCE9FFFFD2,$D5EFFFEAF2FFFFE8,$3C9DFF708CC8FFC8,$3198FB002792FF10,$0000000000006D00,$0000000000000000,$3197000000000000,$4CB2FE002C926800
   Data.q $ABFFFF5C8CEAFF1B,$ADFFFF83ADFFFF7E,$B5FFFF8AB1FFFF84,$BDFFFF96B9FFFF91,$C5FFFFA3C1FFFF9D,$CFFFFFAFCBFFFFA9,$D6FFFFBBD2FFFFB5,$DEFFFFC8DAFFFFC1
   Data.q $E5FFFFD4E2FFFFCE,$F4FFFFE0EBFFFFD9,$E2F2FFFCFFFFFFEE,$2993FF5A79BDFFD9,$00009F002F97FF00,$0000000000000000,$2D93520032980000,$9EFEFF2C5EC4FF00
   Data.q $A3FFFF75A4FFFF6C,$ACFFFF7DA8FFFF76,$B4FFFF89B0FFFF83,$BCFFFF95B8FFFF8F,$C4FFFFA2C0FFFF9C,$CEFFFFAECAFFFFA8,$D6FFFFBBD2FFFFB4,$DEFFFFC7D9FFFFC0
   Data.q $E5FFFFD3E2FFFFCD,$EEFFFFDFEAFFFFD9,$FDFFFFECF2FFFFE6,$A7D3FFFFFFFFFFFA,$2F97FF012E96FF91,$3298000000008B00,$5AC0F8002C920300,$9DFFFF6B9EFFFF27
   Data.q $A3FFFF6F9FFFFF6C,$ABFFFF7CA7FFFF75,$B4FFFF88AFFFFF82,$BCFFFF94B8FFFF8E,$C4FFFFA1BFFFFF9B,$CDFFFFADC9FFFFA7,$D5FFFFBAD1FFFFB3,$DDFFFFC5D8FFFFBF
   Data.q $E5FFFFD2E0FFFFCC,$EDFFFFDEE9FFFFD8,$F6FFFFEBF1FFFFE5,$FFFFFFF9FBFFFFF1,$2A94FF8EA5D2FFFF,$2F952D003198FE00,$96FCFF1142A89E00,$9BFFFF679AFFFF63
   Data.q $A3FFFF6F9FFFFF6A,$ABFFFF7CA7FFFF75,$B4FFFF88AFFFFF82,$BCFFFF94B8FFFF8E,$C4FFFFA1BFFFFF9B,$CDFFFFADC9FFFFA7,$D5FFFFB9D1FFFFB3,$DDFFFFC5D8FFFFBF
   Data.q $E5FFFFD2E0FFFFCC,$EDFFFFDEE9FFFFD8,$F6FFFFEBF1FFFFE4,$FFFFFFF7FAFFFFF1,$70B7FFFFFFFFFFFE,$2C92D1002893FF4C,$9FFFFF386BD2EC00,$9AFFFF6598FFFF6C
   Data.q $A2FFFF6E9EFFFF69,$ABFFFF7BA6FFFF74,$B2FFFF87AFFFFF81,$BCFFFF93B7FFFF8D,$C5FFFFA2C0FFFF9B,$CFFFFFB1CAFFFFAA,$D6FFFFBCD3FFFFB6,$DCFFFFC5D9FFFFC0
   Data.q $E4FFFFD1E0FFFFCB,$EDFFFFDDE8FFFFD7,$F4FFFFEAF1FFFFE3,$FDFFFFF6F9FFFFF0,$C2E1FFFFFFFFFFFC,$2E94FB002A94FFB3,$9DFFFF4A7DE4FC00,$9AFFFF6598FFFF6A
   Data.q $A1FFFF6D9DFFFF68,$AAFFFF7AA6FFFF73,$B4FFFF8CB0FFFF82,$B9FFFF9AB7FFFF95,$B8E7FF99BBF7FF9A,$BDF0FF95BBE1FF94,$CFFCFFA9C3F8FF9E,$E4FFFFC7DAFFFFB8
   Data.q $EAFFFFDDEAFFFFD5,$ECFFFFDFEAFFFFDF,$F4FFFFE8F0FFFFE2,$FCFFFFF5F8FFFFEF,$ECF6FFFFFFFFFFFB,$2F95FE0E3D9EFFE7,$9DFFFF4C7FE6FD00,$9AFFFF6598FFFF6A
   Data.q $A2FFFF6D9DFFFF68,$A6F8FF80A7FFFF76,$9D9AFF69A4CEFF7E,$924DFF2B9870FF49,$9033FF079441FF13,$6A66FF02972DFF00,$3B9FFF0530A2FF08,$63B7FF1B49A8FF0A
   Data.q $B9E7FF6989CDFF3A,$F7FFFFD6E2FBFFA3,$F4FFFFF0F6FFFFEF,$FCFFFFF5F8FFFFEF,$F4FAFFFFFFFFFFFB,$2F95FE1745A1FFF1,$9DFFFF4C7FE6FD00,$9AFFFF6598FFFF6A
   Data.q $9BDFFF729DFFFF6A,$9149FF38958DFF63,$A233FF00952CFF0E,$C56CFF2DB34BFF0D,$DE9DFF74D587FF52,$A16FFF49C166FF8F,$A8D5FF9FB8DFFF36,$6CB5FF6F8EC7FF8A
   Data.q $3197FF1B49A3FF47,$7CC1FF133EA0FF01,$FEFFFFBFCFEDFF5D,$FCFFFFFBFDFFFFFA,$F3F9FFFFFFFFFFFA,$2F95FE1644A1FFF0,$9DFFFF4C7FE6FD00,$95E8FF6A98FFFF6A
   Data.q $9234FF2E9181FF5F,$BF4FFF0DA22DFF03,$ED94FF71DB75FF3C,$FFC0FFB2F7ACFF98,$FFDEFFD5FFD2FFC7,$BB7DFF6FD284FFE3,$FFFFFFFCFFFFFF54,$FFFFFFFFFFFFFFFA
   Data.q $DBEEFFF7FBFEFFFF,$50A7FF7E9DCFFFCB,$70B9FF012E96FF26,$FFFFFFD3DEF0FF51,$F3F9FFFFFFFFFFFF,$2F95FE1644A1FFF0,$9DFFFF4C7FE7FD00,$9040FF4992BEFF6F
   Data.q $C344FF09A226FF09,$E978FF6CDE63FF3D,$EE94FF90EC88FF85,$F8B4FFA7F2A3FF9A,$FFD6FFC7FDC5FFB6,$B77BFF6AD080FFD8,$FBFFFFF1FEFFFF50,$FEFFFFF5FCFFFFED
   Data.q $FFFFFFFDFFFFFFFD,$FCFFFFF9FFFFFFFA,$55AAFFA0C2E2FFE7,$ACD7FF093198FF29,$F5FAFFFFFFFFFF99,$2F95FE1644A1FFF2,$96B3FF527FF1FD00,$B42BFF00942BFF45
   Data.q $DB50FF4BD23FFF1D,$E36FFF6BDE60FF60,$ED8FFF87E881FF78,$F7B1FFA3F19FFF95,$FFD5FFC2FCC2FFB3,$B77BFF6AD080FFD8,$FBFFFFF0FEFFFF50,$FDFFFFF3FCFFFFEC
   Data.q $FCFFFFF8FDFFFFF9,$FAFFFFE9FAFFFFF1,$FCFFFFE6FFFFFFE3,$2B95FF77A3D4FFD8,$FCFEFF839ACDFF00,$2F9FFE1745A1FFFB,$9A30FF2F77A9FD01,$D231FF27BC2DFF03
   Data.q $D64AFF4AD23BFF44,$E16CFF66DC5CFF57,$EB8CFF84E67DFF75,$F5ADFFA0F09BFF92,$FFD4FFBFFBBEFFAF,$B77BFF6AD080FFD8,$FBFFFFEEFDFFFF4F,$FCFFFFF0FBFFFFEA
   Data.q $FBFFFFF3FCFFFFF4,$F9FFFFE7FAFFFFEE,$F7FFFFD9F7FFFFE0,$C8E7FFD8FFFFFFD3,$9ECFFF02359AFF95,$3594FE224EA6FF87,$BB2CFF018441FD02,$CF31FF45D331FF22
   Data.q $D547FF46D138FF40,$E068FF63DB58FF53,$EA88FF81E579FF72,$F4A8FF9CEF97FF8E,$FFD3FFBCF9BAFFAB,$B77BFF6AD081FFD6,$FAFFFFEBFDFFFF4E,$FBFFFFEBFBFFFFE6
   Data.q $FBFFFFEDFBFFFFEE,$F8FFFFE4F9FFFFEA,$F5FFFFD7F7FFFFDE,$FFFFFFC9F4FFFFD0,$3A9CFF83BAE3FFCF,$5470FE0A389BFF0A,$D131FF11AC2AFD00,$CF30FF40CF31FF43
   Data.q $D443FF43D035FF3F,$DF65FF5FDA54FF50,$E985FF7EE475FF6E,$F3A4FF99EE93FF8B,$FFD0FFB8F8B6FFA8,$B77BFF6BD081FFD4,$F9FFFFE8FCFFFF4D,$FAFFFFE6FAFFFFE2
   Data.q $F9FFFFE8FAFFFFE8,$F7FFFFE1F9FFFFE5,$F5FFFFD4F6FFFFDB,$F2FFFFC7F3FFFFCE,$7DC1FFC5FEFFFFBF,$7252FE002692FF45,$D231FF28C02CFD00,$CF31FF40CF31FF44
   Data.q $D33FFF42CF33FF40,$DE61FF5CD94FFF4D,$E882FF7AE371FF6B,$F2A0FF95ED90FF89,$FFCFFFB4F6B2FFA4,$BA80FF6FD284FFD3,$FFFFFFEAFFFFFF4E,$FCFFFFE5FFFFFFE3
   Data.q $F9FFFFE3FAFFFFE5,$F7FFFFDCF8FFFFE0,$F4FFFFD1F5FFFFD7,$F1FFFFC3F3FFFFCB,$C3E8FFBDF9FFFFBC,$893AFE012E96FF86,$D131FF30C430FF02,$CF31FF40CF31FF43
   Data.q $D23CFF40CF32FF40,$DC5DFF58D74BFF4A,$E77EFF76E16DFF67,$F09CFF92EB8CFF85,$FFC9FFB5F8B1FFA0,$813DFF4CC572FFCD,$B2AAFFA08D80FF26,$EAEDFFC4D2D0FFAF
   Data.q $FFFFFFDDF8FFFFD4,$FFFFFFDEFFFFFFE0,$F8FFFFD1FCFFFFD8,$F1FFFFC1F4FFFFCA,$E4FAFFB6F3FFFFBA,$8A3AFF0E43A1FFA2,$D131FF2FC330FE01,$CF31FF40CF31FF43
   Data.q $D139FF40CF31FF40,$DC59FF54D647FF47,$E67AFF73E069FF63,$F39EFF8FEA89FF82,$B45EFFA1EEA2FFA6,$8C17FF13A02FFF35,$3C00FF874C00FF7D,$3B12FF683500FF71
   Data.q $6851FF724D2DFF68,$AAA1FF94897AFF81,$E1E8FFB2CAC9FFA4,$F8FFFFBCF0FCFFBA,$E7FFFFB8FEFFFFBA,$8043FF0A40A2FF9D,$D331FF24BB2FF401,$CF31FF40CF31FF44
   Data.q $D035FF3FCF30FF40,$DC5BFF56D649FF43,$E77CFF74E16BFF66,$DA81FF97EF8EFF84,$A831FF10A145FF76,$EC35FFD6DC38FF3D,$D929FFFFE731FFFF,$A916FFE8C421FFF8
   Data.q $6E03FFB98C0CFFD3,$4300FF885400FFA0,$3910FF6B3800FF78,$624CFF6B4929FF67,$868DFF858776FF74,$714FFC08308CFF73,$CF31FF0CA430B402,$CF31FF41D031FF40
   Data.q $D343FF3ECE2FFF40,$E174FF72DD68FF50,$E98FFF8CE782FF7D,$AA58FF65CD7CFF96,$EF5FFF8BC95AFF2C,$EA58FFFFEF5CFFFC,$E952FFFFE955FFFF,$EB4CFFFFEA4EFFFF
   Data.q $E944FFFFEB48FFFF,$D93DFFFFE340FFFF,$A401FFEDC52EFFFB,$6D00FFBF8900FFD7,$2E00FF905600FFA6,$5573DA31314BFF6C,$B42FFC00853F1201,$D031FF45D231FF1C
   Data.q $DA5FFF3CCE2DFF41,$E88DFF8FE486FF6B,$C583FF94E393FF97,$E582FF66BF78FF63,$F380FFFFF883FFD0,$EF7AFFFFF07DFFFF,$EC74FFFFED77FFFF,$E96FFFFFEA71FFFF
   Data.q $E669FFFFE76CFFFF,$E664FFFFE666FFFF,$D913FFFFE660FFFF,$E100FFFFD500FFFF,$310BFFCD9700FFFF,$000044293157FF5D,$923477066B550000,$D231FF20B630FF00
   Data.q $DC63FF3CCF2BFF43,$E09FFFADEDA5FF6F,$D89AFF7CCC98FF99,$FAA2FFF4F5A2FFA4,$F59CFFFFF69FFFFF,$F398FFFFF49AFFFF,$F193FFFFF296FFFF,$EE8FFFFFEF91FFFF
   Data.q $EC8BFFFFED8DFFFF,$EB8AFFFFEB88FFFF,$D510FFFFE77DFFFF,$9600FFFFD801FFFF,$2F33FF653302FFCB,$000000000000AD3F,$6F52000000000000,$AD30FF0091349505
   Data.q $CE38FF38CA2FFF15,$E0C7FF91DAA4FF42,$FEC5FFD9EFC1FFB1,$FAC1FFFFFDC4FFFF,$F9BFFFFFFAC0FFFF,$F7BCFFFFF8BDFFFF,$F6B9FFFFF6BBFFFF,$F5B6FFFFF5B8FFFF
   Data.q $F3B3FFFFF4B5FFFF,$F7BDFFFFF3B7FFFF,$CA01FFFFEB56FFFF,$2E02FFAD7A00FFF6,$0000C6452F29FF60,$0000000000000000,$0000000000000000,$883974086E510000
   Data.q $9F2AFF069F30FD01,$FFC7FF4FB24DFF01,$FFEEFFFFFFF4FFFF,$FDE4FFFFFFE7FFFF,$FDE2FFFFFDE3FFFF,$FCE1FFFFFDE2FFFF,$FBE0FFFFFBE0FFFF,$FBDFFFFFFBDFFFFF
   Data.q $FFECFFFFFEE3FFFF,$DD6AFFFFFFDAFFFF,$4500FFBF9003FFF4,$312FFE54290CFF7A,$000000000000A144,$0000000000000000,$0000000000000000,$6A52000000000000
   Data.q $6728D1037C441509,$7E1FFF714504FE22,$EACCFFD0BD75FFA5,$FFFFFFFFFFF9FFF0,$FFFFFFFFFFFFFFFF,$FFFFFFFFFFFFFFFF,$FFFFFFFFFFFFFFFF,$FFFFFFFFFFFFFFFF
   Data.q $C197FFF5F0E3FFFF,$4000FFA67D2DFFD5,$2D22FF562909FF76,$0000353C323CE24A,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $404E000000000000,$271DB92F2A502027,$3D03FF582900F845,$825AFF875C25FF6E,$BAA3FFBBA184FFA4,$CAB9FFD7C7B4FFCF,$AE96FFD4C1ADFFDA,$6A3EFFAF9170FFC5
   Data.q $2B00FF744310FF92,$2E29FB4E270EFF5C,$00004239323FD145,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$2F3D4432324A0000,$2614DC402A26A238,$290CFB4B260AF545,$2B07FE542A06FE4E,$270BFE512A0BFE54,$2917F749260DFB4D
   Data.q $3144B4402E2DE346,$0000000000005936,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$80FF000000000000,$00F83F0000FEFF01,$00C0070000E00F00
   Data.q $0000010000800300,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0080000000000000,$00E0030000C00100,$00FC0F0000F00700,$FFFFFF0180FF3F00,$0028FFFFFFFFFFFF,$0040000000200000,$0000000800010000
   Data.q $0000000004800000,$0100000000000000,$0000000000000000,$249000844C000000,$7C3C00A088800000,$C858002890800000,$68500044240C0088,$9CCC00C0A8900080
   Data.q $88C4007888100084,$D0D000D0A0000068,$404800D0B87000C0,$58C00084E4840020,$E0C00048B0480024,$B880003C64B400B0,$50A400382C340048,$9C6C0014AC2C0024
   Data.q $780000D0E080002C,$2C280070808800A8,$CC000044CC340040,$58200000507000F4,$2C00004490B40080,$8CE800B0C8C80064,$D4E800E0F8D8005C,$D89800F8E44400C8
   Data.q $E0F800446CC400A0,$482800F4F4A0009C,$ECF400D0D838006C,$680000F4DC6400E4,$A4F40080BCE400A0,$D85C000070480084,$D480004CB4780068,$B8E80028B048006C
   Data.q $3C9C004878E000A8,$942C00B8A080000C,$807000A080580000,$C02400D0C0AC0080,$D44C00C4F8C400E8,$EC840038A8300054,$F4F800C4F4F800F8,$ACA400F8DC2C00B4
   Data.q $80380004904400A4,$E478004898980020,$D89C0044241C0080,$2C4C005474B8008C,$9000002870A8002C,$782800046C5000C8,$F09C00749CF800A0,$604800B8D0F800A4
   Data.q $60280094B8F40070,$F4B4002CC02C0020,$2C0400042C9C00B4,$A4D000D0C0900054,$A0C8007088C80094,$68D00094E48C0068,$C0800048C0600038,$8C04002858B40060
   Data.q $683800F8DC0000B8,$BCE000743C000090,$E8C8006494F800A0,$E85400D4DCF400F0,$F4B4005878C000F8,$E86C00F4F4E400F8,$781800F8E07800F8,$B0F80094B8DC00A0
   Data.q $B8780074DC6C0094,$C8E80078C8980060,$9070001C48A400B8,$EC9400D8E8C000A8,$C04000D0E8E800F8,$F8D800749CCC0038,$500000F4F4F400F8,$88380004308C0090
   Data.q $A8D0003890880000,$70B000D0A8100088,$B42C003030400048,$D0100050D0400020,$90E00068380000F8,$E8A000C4D4F80068,$F8F8004078C000A4,$C06C0088B0F800E4
   Data.q $AC580038B848004C,$BCF800A8C8F8002C,$40A8005078F000A4,$A0240010A0280010,$C8B8009088780008,$F8800060D85400D8,$D83800F8E83000F8,$E0980010904800F8
   Data.q $A8F8000868600098,$F0A800B0F0A80078,$C82C00B8E0E800A8,$98D800C8B8A00038,$401000F8D8100060,$F8C000B0C0E00070,$C8E000F8EC7800F8,$C8F80060C8780090
   Data.q $F8CC001848B000B4,$ECF800D4F8F800D4,$A0300064381000D4,$00000010A0400008,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$000000FFFFFF0000,$0000000000000000,$5F5F5F5F5F5F895F,$00000000895F5F5F,$0000000000000000,$5F5F890000000000
   Data.q $2B2B2B1569BB3C5F,$00895F0289A01815,$0000000000000000,$2BBB895F89000000,$719559BA9D9E9994,$023C150A3A957171,$000000000000005F,$5B9926125F5F0000
   Data.q $59BA9D9D9D9E9E5B,$63289898BEBE7195,$00000000005F023C,$999999AC26BB5F89,$59BA9D9D9D9E5B7A,$FF9830BEBE717195,$5F0000005F5F7330,$9999ACACAC57125F
   Data.q $59BA9D9D9D9E5B99,$9830BEBEBE719595,$5F00005F5F62FFFF,$9999ACAC57575712,$59BA9D9D9E9E5B99,$9830BEBEBE719559,$A05F005F8CFFFF87,$9999ACAC57576F6F
   Data.q $59BA9D9D9E9E5B99,$9830BEBEBE719559,$665F5F8EFFFF8787,$9999ACAC57576F57,$59BABA9D9D9E7A99,$9830BEBEBE719595,$3B5F5F7EFFFF8787,$9999ACAC57576F57
   Data.q $9D5B79795B9E7A7A,$9830BEBEBEBE9559,$3B5F3C30FFFF8798,$64AC34AC57576F57,$5FAB3E3E4BA91A4D,$8798BE6E6315BB3C,$3B5FA087FFFF8798,$3EA98BB257576F57
   Data.q $6E1A6750389A39C0,$7E73A0897F8E0C8C,$3B5FA087FFFFFFFF,$7B9BA13E05265757,$FF373827BC43AD58,$5F180A2887FFFFFF,$3B5FA087FFFF7151,$654E3684A2A92357
   Data.q $87373827435EAE58,$6E98FFFFFFFF8798,$9F5FA087FF623C69,$117B36A591903E23,$87373827435E5865,$98989887FFFF8798,$535FA0FF0A5F8598,$4E7B3644911F5DC0
   Data.q $9837382743AD5865,$9898989887878798,$0489180A5FB898BD,$4E7B36911F1F1F5D,$983738BC43AD5865,$BD98989898989898,$19213C3C33BD47BD,$4E36A5911F1F1F1F
   Data.q $983738BC5EAD5811,$BD98989898989898,$5D55029747474747,$4E36A5911F1F1F1F,$981638BC5EAE6511,$BDBD989898989898,$B08A5F3347474747,$7B3644911F1F1F1F
   Data.q $034C9ABC5E58654E,$BD98989898830E4A,$5D8AA02C484747BD,$7B36911F1F1F1F1F,$010BA19C9658654E,$254AA3082EB4936D,$5D04A02C474747AF,$7B36441F1F1F1F1F
   Data.q $A7A72F45C138654E,$930188326A8D4249,$C035891D405A2EBF,$114E7B91B01F1F1F,$72727272069CB965,$42A8292972727272,$8A00522488326A0D,$AA651136B01F1F90
   Data.q $B7B7A6A6A61B6868,$767676767676B7B7,$550000BF546B6BB3,$7DAAAD36B01F903E,$822D2D2D2D2D2D2A,$7746464646468282,$0000001793546B92,$8114501FB0193E55
   Data.q $B6B6B6B6B6B6B6B6,$72B674747474B6B6,$000000001E241C20,$87B613C0C08A5500,$7575757575757575,$6A31867575868675,$00000000001E6001,$0F786D5C04000000
   Data.q $FFFFFFFFFFFFFF70,$606D566175FFFFFF,$000000000000001E,$604F520000000000,$41A4A4B13D3F2293,$001E0760B46C8009,$0000000000000000,$0000000000000000
   Data.q $6060600707071E17,$0000008F1E070707,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$C0FF000000000000,$00F87F0000FEFF03,$00C0070000F01F00,$0080010000800300,$0000000000000100,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0080010000800000,$00E0030000C00100
   Data.q $00FE1F0000F80700,$FFFFFF01C0FF7F00,$0028FFFFFFFFFFFF,$0020000000100000,$0000002000010000,$0000000004400000,$0000000000000000,$0000000000000000
   Data.q $0000000000000000,$3298000000000000,$2B93A70030960300,$2992F7002992EC00,$3197DC002C94F500,$0000000000006E00,$0000000000000000,$0000000000000000
   Data.q $3197000000000000,$74CDFF0131979C00,$C8FFFF8BAEF6FF48,$DCFFFFBAD4FFFFAA,$BFEAFFCBDCFFFFC8,$2692FF3E65B3FFAA,$000003003298FD00,$0000000000000000
   Data.q $8CEAFE002C920000,$B1FFFF83ADFFFF5C,$C1FFFF96B9FFFF8A,$D2FFFFAFCBFFFFA3,$E2FFFFC8DAFFFFBB,$FFFFFFE0EBFFFFD4,$2F97FF5A79BDFFFC,$2C92000000009F00
   Data.q $9FFFFF6B9EFFF800,$AFFFFF7CA7FFFF6F,$BFFFFF94B8FFFF88,$D1FFFFADC9FFFFA1,$E0FFFFC5D8FFFFBA,$F1FFFFDEE9FFFFD2,$A5D2FFF9FBFFFFEB,$6BD22D003198FF8E
   Data.q $9EFFFF6598FFFF38,$AFFFFF7BA6FFFF6E,$C0FFFF93B7FFFF87,$D3FFFFB1CAFFFFA2,$E0FFFFC5D9FFFFBC,$F1FFFFDDE8FFFFD1,$FFFFFFF6F9FFFFEA,$7FE6FB002A94FFFF
   Data.q $9DFFFF6598FFFF4C,$A4CEFF80A7FFFF6D,$9441FF2B9870FF69,$30A2FF02972DFF07,$89CDFF1B49A8FF05,$F6FFFFD6E2FBFF69,$FFFFFFF5F8FFFFF0,$7FE6FE1745A1FFFF
   Data.q $9181FF6A98FFFF4C,$DB75FF0DA22DFF2E,$FFD2FFB2F7ACFF71,$FFFFFF6FD284FFD5,$FBFEFFFFFFFFFFFC,$2E96FF7E9DCFFFF7,$FFFFFFD3DEF0FF01,$7FF1FE1644A1FFFF
   Data.q $D23FFF00942BFF52,$E881FF6BDE60FF4B,$FCC2FFA3F19FFF87,$FEFFFF6AD080FFC2,$FDFFFFF3FCFFFFF0,$FFFFFFE9FAFFFFF8,$9ACDFF77A3D4FFE6,$8441FE1745A1FF83
   Data.q $D138FF45D331FF01,$E579FF63DB58FF46,$F9BAFF9CEF97FF81,$FDFFFF6AD081FFBC,$FBFFFFEBFBFFFFEB,$F7FFFFE4F9FFFFED,$BAE3FFC9F4FFFFD7,$C02CFE0A389BFF83
   Data.q $CF33FF40CF31FF28,$E371FF5CD94FFF42,$F6B2FF95ED90FF7A,$FFFFFF6FD284FFB4,$FAFFFFE5FFFFFFEA,$F5FFFFDCF8FFFFE3,$F9FFFFC3F3FFFFD1,$C330FE012E96FFBD
   Data.q $CF31FF40CF31FF2F,$E069FF54D647FF40,$EEA2FF8FEA89FF73,$4C00FF13A02FFFA1,$4D2DFF683500FF87,$CAC9FF94897AFF72,$FEFFFFBCF0FCFFB2,$A430FF0A40A2FFB8
   Data.q $CE2FFF41D031FF0C,$E782FF72DD68FF3E,$C95AFF65CD7CFF8C,$E955FFFFEF5CFF8B,$EB48FFFFEA4EFFFF,$C52EFFFFE340FFFF,$5600FFBF8900FFED,$6B55DA31314BFF90
   Data.q $CF2BFF20B6307706,$CC98FFADEDA5FF3C,$F69FFFF4F5A2FF7C,$F296FFFFF49AFFFF,$ED8DFFFFEF91FFFF,$E77DFFFFEB88FFFF,$3302FFFFD801FFFF,$000000000000FF65
   Data.q $9F3074086E510000,$FFF4FF4FB24DFF06,$FDE3FFFFFFE7FFFF,$FBE0FFFFFDE2FFFF,$FEE3FFFFFBDFFFFF,$9003FFFFFFDAFFFF,$0000FE54290CFFBF,$0000000000000000
   Data.q $0000000000000000,$2900B92F2A500000,$A184FF875C25FF58,$C1ADFFD7C7B4FFBB,$4310FFAF9170FFD4,$323FFB4E270EFF74,$0000000000004239,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$07E0000000000000
   Data.q $0000000001800000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$07E0000001800000,$00280000FFFF0000
   Data.q $0020000000100000,$0000000800010000,$0000000001400000,$0100000000000000,$0000000000000000,$2A5000FFFFFF0000,$5C2500582900002F,$C7B400BBA1840087
   Data.q $917000D4C1AD00D7,$270E0074431000AF,$6E510039323F004E,$B24D00069F300008,$FFE700FFFFF4004F,$FDE200FFFDE300FF,$FBDF00FFFBE000FF,$FFDA00FFFEE300FF
   Data.q $290C00BF900300FF,$B63000066B550054,$EDA5003CCF2B0020,$F5A2007CCC9800AD,$F49A00FFF69F00F4,$EF9100FFF29600FF,$EB8800FFED8D00FF,$D80100FFE77D00FF
   Data.q $A4300065330200FF,$CE2F0041D031000C,$E7820072DD68003E,$C95A0065CD7C008C,$E95500FFEF5C008B,$EB4800FFEA4E00FF,$C52E00FFE34000FF,$560000BF890000ED
   Data.q $C3300031314B0090,$D6470040CF31002F,$EA890073E0690054,$A02F00A1EEA2008F,$350000874C000013,$897A00724D2D0068,$F0FC00B2CAC90094,$40A200B8FEFF00BC
   Data.q $CF330028C02C000A,$E371005CD94F0042,$F6B20095ED90007A,$FFFF006FD28400B4,$FAFF00E5FFFF00EA,$F5FF00DCF8FF00E3,$F9FF00C3F3FF00D1,$844100012E9600BD
   Data.q $D1380045D3310001,$E5790063DB580046,$F9BA009CEF970081,$FDFF006AD08100BC,$FBFF00EBFBFF00EB,$F7FF00E4F9FF00ED,$BAE300C9F4FF00D7,$7FF1000A389B0083
   Data.q $D23F0000942B0052,$E881006BDE60004B,$FCC200A3F19F0087,$FEFF006AD08000C2,$FDFF00F3FCFF00F0,$FFFF00E9FAFF00F8,$9ACD0077A3D400E6,$7FE6001745A10083
   Data.q $9181006A98FF004C,$DB75000DA22D002E,$FFD200B2F7AC0071,$FBFE00FCFFFF00D5,$DEF0007E9DCF00F7,$98FF001644A100D3,$A7FF006D9DFF0065,$98700069A4CE0080
   Data.q $972D00079441002B,$49A8000530A20002,$E2FB006989CD001B,$F8FF00F0F6FF00D6,$9EFF00386BD200F5,$AFFF007BA6FF006E,$C0FF0093B7FF0087,$D3FF00B1CAFF00A2
   Data.q $E0FF00C5D9FF00BC,$F1FF00DDE8FF00D1,$2A9400F6F9FF00EA,$9EFF00002C920000,$A7FF006F9FFF006B,$B8FF0088AFFF007C,$C9FF00A1BFFF0094,$D8FF00BAD1FF00AD
   Data.q $E9FF00D2E0FF00C5,$FBFF00EBF1FF00DE,$3198008EA5D200F9,$ADFF005C8CEA0000,$B9FF008AB1FF0083,$CBFF00A3C1FF0096,$DAFF00BBD2FF00AF,$EBFF00D4E2FF00C8
   Data.q $2F97005A79BD00E0,$3197000031970000,$AEF6004874CD0001,$D4FF00AAC8FF008B,$DCFF00C8DCFF00BA,$65B300AABFEA00CB,$329800002692003E,$2B93000030960000
   Data.q $2C94000029920000,$8000008000000000,$0080008080000000,$8080008000800000,$808000C0C0C00000,$FF0000FF00000080,$00FF00FFFF000000,$FFFF00FF00FF0000
   Data.q $1212000909090000,$2C2C001F1F1F0012,$454500393939002C,$5F5F005252520045,$7878006C6C6C005F,$9292008585850078,$ABAB009F9F9F0092,$C5C500B8B8B800AB
   Data.q $DEDE00D2D2D200C5,$F8F800EBEBEB00DE,$A0A400FFFBF000F8,$CAF000C0DCC000A0,$0000003E000000A6,$0000007C0000005D,$000000BA0000009B,$242400F0000000D9
   Data.q $6C6C00FF484800FF,$B4B400FF909000FF,$1E00003E140000FF,$3200007C2800005D,$000000BA3C00009B,$C8C8C8C8BA000000,$00000000000000BA,$C0C096A4BCBBBABA
   Data.q $C800000000C3C2C1,$C096A4B1B0AFAEAD,$83C800C8B77DB68C,$9796A4A3B0A19183,$828F00AB7DA9A88C,$979695B193AE9183,$8276C87D6FA9A88C,$8A89888786858483
   Data.q $8376817D6F8E8C8B,$7D7D4D7C7B7A7978,$8866817D80C87F6F,$6F6F4D6C6B6A6968,$5756817473505E7D,$5E5E4D5C5B5A5958,$483865646352505E,$505E4D4C4B4A4948
   Data.q $4838C85453525150,$403F3E3D3C3B3A48,$5728465444434241,$31302F2E2D2C2B1B,$1A19373617343331,$222120201E1D1C1B,$0C00002726252323,$14111111110F0E0D
   Data.q $0000000018171411,$0807060504030200,$0000000000000A09,$0000000000000000,$1FF8000000000000,$0180000007C00000,$0000000001000000,$0000000000000000
   Data.q $0000000000000000,$0000000000000000,$0100000000000000,$0FE0000003800000,$0000FFFF0000
icoend:
EndDataSection
Edit : Fixed XP bug
Last edited by RASHAD on Wed Sep 25, 2013 4:06 pm, edited 1 time in total.
Egypt my love
Top
User avatar
Zebuddi123
Enthusiast
Enthusiast
Posts: 796
Joined: Wed Feb 01, 2012 3:30 pm
Location: Nottinghamshire UK
Contact:
Contact Zebuddi123

Re: Fancy Windows ToolTips [Windows]

Post by Zebuddi123 »

Very Nice :D
Thanks Zebuddi. :D
malleo, caput, bang. Ego, comprehendunt in tempore
Top
User avatar
electrochrisso
Addict
Addict
Posts: 989
Joined: Mon May 14, 2007 2:13 am
Location: Darling River

Re: Fancy Windows ToolTips [Windows]

Post by electrochrisso »

8)
PureBasic! Purely the best 8)
Top
User avatar
Kwai chang caine
Always Here
Always Here
Posts: 5494
Joined: Sun Nov 05, 2006 11:42 pm
Location: Lyon - France

Re: Fancy Windows ToolTips [Windows]

Post by Kwai chang caine »

Nice one thanks 8)
ImageThe happiness is a road...
Not a destination
Top
davido
Addict
Addict
Posts: 1890
Joined: Fri Nov 09, 2012 11:04 pm
Location: Uttoxeter, UK

Re: Fancy Windows ToolTips [Windows]

Post by davido »

Cool :!:

Thanks for sharing. :D
DE AA EB
Top
ebs
Enthusiast
Enthusiast
Posts: 557
Joined: Fri Apr 25, 2003 11:08 pm

Re: Fancy Windows ToolTips [Windows]

Post by ebs »

These are great tootips!

I'm running Windows XP and I noticed something odd:
Move the mouse over a button, and the tooltip appears. Don't move the mouse until the tooltip disappears (about 6 seconds).
Now, the tooltips will appear for every button except the one where the tooltip disappeared.

Can anyone else duplicate this, especially on newer versions of Windows?
I'm wondering if it's due to Win XP, or if it happens on all versions.

Regards,
Eric
Top
IdeasVacuum
Always Here
Always Here
Posts: 6426
Joined: Fri Oct 23, 2009 2:33 am
Location: Wales, UK
Contact:
Contact IdeasVacuum

Re: Fancy Windows ToolTips [Windows]

Post by IdeasVacuum »

ebs, I think you will find that can happen with WinXP's regular tooltips, in any application. I don't know what causes the fault (OS priority too low?) but it is a known issue that tooltips get lost.

A work-around that I have used is to display a small borderless/titlebar-less regular window instead. You can do a lot with that and keep it cross-platform.
IdeasVacuum
If it sounds simple, you have not grasped the complexity.
Top
RASHAD
PureBasic Expert
PureBasic Expert
Posts: 4946
Joined: Sun Apr 12, 2009 6:27 am

Re: Fancy Windows ToolTips [Windows]

Post by RASHAD »

Previous Post fixed for Windows XP
Egypt my love
Top
ebs
Enthusiast
Enthusiast
Posts: 557
Joined: Fri Apr 25, 2003 11:08 pm

Re: Fancy Windows ToolTips [Windows]

Post by ebs »

Rashad,

Thank you for your fast (immediate!) reply and the fix for Win XP.
I did some searching and found a post from netmaestro from 2006 using #TTM_DELTOOL and #TTM_ADDTOOL, but this is even simpler.

It's this kind of response that makes me glad that I pushed my company to adopt PureBasic!

Thanks,
Eric
Top
RASHAD
PureBasic Expert
PureBasic Expert
Posts: 4946
Joined: Sun Apr 12, 2009 6:27 am

Re: Fancy Windows ToolTips [Windows]

Post by RASHAD »

Hi Eric
You are welcome :)
Egypt my love
Top
Post Reply

Return to “Tricks 'n' Tips”