Bug in TTrayIcon (64bit)
Posted: Sun May 24, 2020 8:43 amThe sample testtray.prg doesn't show any icons in the tray area (FWH 64bit).
Any ideas?
EMG
Any ideas?
EMG
EMG
FiveTech Software tech support forums
www.FiveTechSoft.com
https://forums.fivetechsupport.com/
Bug in TTrayIcon (64bit)
https://forums.fivetechsupport.com/viewtopic.php?f=18&t=39015
Page 1 of 1
Posted: Sun May 24, 2020 8:43 amRe: Bug in TTrayIcon (64bit)
Posted: Wed May 27, 2020 3:48 pmUp.
EMG
EMG
Re: Bug in TTrayIcon (64bit)
Posted: Sat Jun 13, 2020 8:30 amAny news?
EMG
EMG
Re: Bug in TTrayIcon (64bit)
Posted: Sat Jun 13, 2020 11:01 amtesting it...
Sorry for the delay my friend
Sorry for the delay my friend
Re: Bug in TTrayIcon (64bit)
Posted: Sat Jun 13, 2020 11:58 amThank you!
EMG
EMG
Re: Bug in TTrayIcon (64bit)
Posted: Mon Jul 20, 2020 9:23 amAs a reminder...
EMG
EMG
Re: Bug in TTrayIcon (64bit)
Posted: Mon Jul 20, 2020 9:59 amDear Enrico,
We have implemented some changes in Class TTrayIcon and in Class TStruct for 64 bits, but still we are unable to get it
working on 64 bits...
We have implemented some changes in Class TTrayIcon and in Class TStruct for 64 bits, but still we are unable to get it
working on 64 bits...
- Code: Select all Expand view
- if ! IsExe64()
STRUCT oTray
MEMBER cbSize AS LONG
MEMBER hWnd AS LONG
MEMBER uID AS LONG
MEMBER uFlags AS LONG
MEMBER uCallMsg AS LONG
MEMBER hIcon AS LONG
MEMBER cTip AS STRING LEN 64
ENDSTRUCT
else
STRUCT oTray
MEMBER cbSize AS LONG
MEMBER hWnd AS LONGLONG
MEMBER uID AS LONG
MEMBER uFlags AS LONG
MEMBER uCallMsg AS LONG
MEMBER hIcon AS LONGLONG
MEMBER cTip AS STRING LEN 64
ENDSTRUCT
endif
- Code: Select all Expand view
- case nType == LONGLONG
do case
case cType == "N"
uData = PadR( AllTrim( Str( uData ) ), nLen )
endcase
::cBuffer = If( nOffset > 0, SubStr( ::cBuffer, 1, nOffset ), "" ) + ;
uData + SubStr( ::cBuffer, nOffset + nLen + 1 )
Re: Bug in TTrayIcon (64bit)
Posted: Mon Jul 20, 2020 10:10 amThank you anyway.
EMG
EMG