October 24, 2021, 04:59:14

Author Topic: [bb] PanelWindow by skidracer [ 1+ years ago ]  (Read 699 times)

Offline BlitzBot

  • Jr. Member
  • **
  • Posts: 1
[bb] PanelWindow by skidracer [ 1+ years ago ]
« on: June 29, 2017, 00:28:40 »
Title : PanelWindow
Author : skidracer
Posted : 1+ years ago

Description : demonstrates a backdrop panel for changing background color of a window

Code :
Code: BlitzBasic
  1. Function PanelWindow(window)
  2.         panel=CreatePanel(0,0,ClientWidth(window),ClientHeight(window),window)
  3.         SetGadgetLayout panel,True,True,True,True
  4.         Return panel
  5. End Function
  6.  
  7. window = CreateWindow("Test Master",20,20,200,200)
  8. panel=PanelWindow(window)
  9. SetPanelColor panel,20,40,200
  10.  
  11. i=CreateTextField(4,4,100,20,panel)
  12.  
  13. Repeat
  14.         Select WaitEvent()
  15.                 Case $803 End  
  16.         End Select
  17. Forever


Comments : none...

 

SimplePortal 2.3.6 © 2008-2014, SimplePortal