[futurebasic] Re: Clipboard/Memory??

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : December 1997 : Group Archive : Group : All Groups

From: Martin Fitzgibbons <rush@...>
Date: Tue, 09 Dec 1997 21:04:05 +1100
I have got the hang of it now. I notice that this track is well troden,
judging from the number of informative replies and analogies.

Further clarification though on 2 replies received

David suggested the following lines to be added to my code

  hState = FN HGETSTATE(hndl&)
  err = FN HPURGE(hndl&)
  err = FN HSETSTATE(hndl&,hState)

Someone else offered 

  DEF DISPOSEH(hndl&)

Which is better, if there is such a choice?

  DIM rect;8
  PICTURE ON (118,38)-(630,450)                   'record a PICT
  FOR x = 1 TO 80
    LONG IF board(x) <> 3
      PICTURE FIELD x,objs$(board(x))
    END IF
  NEXT x
  PICTURE OFF, hndl&                              'PICT for PICTURE 
  LONG IF hndl& > 0                               'valid handle?
    scrapHndl&= FN ZEROSCRAP                      'delete contents of 
    PICTlen&  = FN GETHANDLESIZE(hndl&)           'size of pict?
    osErr     = FN HLOCK(hndl&)                   'lock handle
    LONG IF osErr = _noErr                        'if no error then...
      osErr = FN PUTSCRAP(PICTlen&, _"PICT", [hndl&]) :'put on clipbd
    END IF
    osErr = FN HUNLOCK(hndl&)                     'unlock the handle
  END IF
=============
  Put here
=============
Martin Fitzgibbons

Email: ................ rush@...
Web Site .............. http://www.illawarra.net.au/rush