FiveTech Software tech support forums

Code: Select all

#include "FiveWin.ch"

function Main()

   local oBmp, oWnd
   
   DEFINE BITMAP oBmp FILENAME "explorer.bmp"
   
   DEFINE WINDOW oWnd TITLE "Sprites in FiveWin"
   
   @ 2, 2 BUTTON "Sprite" SIZE 80, 20 ;
      ACTION DrawSprite( oWnd:hWnd, 0, 0, 300, 300, oBmp:hBitmap )
   
   ACTIVATE WINDOW oWnd
   
   oBmp:End()

return nil