Flash A Window Title Bar In PowerBuilder
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 | //[External Function declaration] Function Boolean FlashWindowEx(Ref s_flashinfo str_flashinfo) Library "user32.dll" [powerscript] //[structure s_flashinfo] cbsize UnsignedLong hwnd UnsignedLong dwflags UnsignedLong ucount UnsignedLong dwtimeout UnsignedLong Constant UnsignedLong FLASHW_STOP = 0 // Stop flashing Constant UnsignedLong FLASHW_CAPTION = 1 // Flash the window caption Constant UnsignedLong FLASHW_TRAY = 2 // Flash the taskbar button. // Flash both the window caption and taskbar button. Constant UnsignedLong FLASHW_ALL = 3 // Flash continuously, until the FLASHW_STOP flag is set. Constant UnsignedLong FLASHW_TIMER = 4 // Flash continuously until the window comes to the foreground Constant UnsignedLong FLASHW_TIMERNOFG = 12 ULong ll_win s_flashinfo lstr_flashinfo lstr_flashinfo.cbsize = 20 lstr_flashinfo.hwnd = Handle(This) // handle(parent) if from a control lstr_flashinfo.dwflags = FLASHW_ALL lstr_flashinfo.ucount = 10 // 10 times lstr_flashinfo.dwtimeout = 0 // speed in ms, 0 default blink cursor rate FLASHWINDOWEX(lstr_flashinfo) |
Good Luck!