[futurebasic] [FB^3] ICONS in Pallette

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : October 1999 : Group Archive : Group : All Groups

From: Brian Heibert <brian0821@...>
Date: Sun, 10 Oct 1999 11:30:09 -0500
I want to put icons in a Pallette

Here's the code PG produced:

'---------------------------------------------------------------
:                                      'CONSTANTS
'---------------------------------------------------------------
_tray             = 1                 'Tray window


LOCAL FN buildTray
  WINDOW _tray,"Tray",(  13,  63)-(  75, 445), 1409
END FN


LOCAL FN updateTray
  ' If you're not using PG, add...
  DIM gObjT,gObjL,gObjB,gObjR
  PEN 1, 1, 1, _patCopy, 19
  
  CALL PAINTRECT(gObjT)
  PEN 1, 1, 1, _patCopy, 0
  CALL FRAMERECT(gObjT)
  'User Item:CVI("ICON") Rect: (  14,   8)-(  46,  40)
  'User Item:CVI("ICON") Rect: (  14,  46)-(  46,  78)
  'User Item:CVI("ICON") Rect: (  14,  84)-(  46, 116)
  'User Item:CVI("ICON") Rect: (  14, 121)-(  46, 153)
  'User Item:CVI("ICON") Rect: (  14, 157)-(  46, 189)
  'User Item:CVI("ICON") Rect: (  14, 193)-(  46, 225)
  'User Item:CVI("ICON") Rect: (  14, 229)-(  46, 261)
  'User Item:CVI("ICON") Rect: (  14, 265)-(  46, 297)
  'User Item:CVI("ICON") Rect: (  14, 301)-(  46, 333)
  'User Item:CVI("ICON") Rect: (  14, 337)-(  46, 369)
END FN

This doesn't work , I looked up ICON in the FB^3 Helper, couldn't find 
anything usefull, I looked it up in the online documentation and 
couldn't find anything either. This code was generated by Program 
Generator