detect USB Device arrive/remove : how to use with harbour / HMG

Discuss anything else that does not suite other forums.

Moderator: Rathinagiri

User avatar
AUGE_OHR
Posts: 182
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 17 times
Been thanked: 21 times

Re: detect USB Device arrive/remove : how to use with harbour / HMG

Post by AUGE_OHR » Sun Nov 10, 2019 10:32 pm

hi,
edk wrote:
Sun Nov 10, 2019 10:21 pm
I'm sorry, but I've never had to use peekdword(), and I don't see the appropriate function in Harbour. I wonder if you can use PeekStr(), read 4 bytes and convert them :?:
thx for Answer, i will try

what about "Bit-shift" like this

Code: Select all

   FOR n := 0 TO 31
      IF lAnd( nLShift( 1, n ), nMask )
         ? "New    " , iif( lAnd(nFlags,1), "Media " , "Volume ") ,  Chr( 65 + n)
         nRet := n
      ENDIF
   NEXT
it test 8 Bit Mask where "0" (+65) = "A" Volumn

Post Reply