It is currently Mon Aug 21, 2017 2:41 pm




 Page 1 of 1 [ 3 posts ] 
Author Message
 Post subject: PureBasic
PostPosted: Wed Jun 03, 2015 3:32 pm 
Site Admin
User avatar

Joined: Mon Nov 22, 2010 11:46 am
Posts: 1310
Location: Abbeville , Louisiana
PureBasic IDE Picture Form Designer

Image



_________________
Meaux Racing Heads
MaxRace Software
ET_Analyst ( DragStrip Simulation Software )
PipeMax ( Engine Simulation Software )
http://www.maxracesoftware.com
http://www.maxracesoftwares.com
Offline
 Profile  
 
 Post subject: Re: PureBasic
PostPosted: Wed Jun 03, 2015 3:49 pm 
Site Admin
User avatar

Joined: Mon Nov 22, 2010 11:46 am
Posts: 1310
Location: Abbeville , Louisiana
PureBasic IDE Picture Form Designer Source Code

Image



_________________
Meaux Racing Heads
MaxRace Software
ET_Analyst ( DragStrip Simulation Software )
PipeMax ( Engine Simulation Software )
http://www.maxracesoftware.com
http://www.maxracesoftwares.com
Offline
 Profile  
 
 Post subject: Re: PureBasic
PostPosted: Wed Jun 03, 2015 3:50 pm 
Site Admin
User avatar

Joined: Mon Nov 22, 2010 11:46 am
Posts: 1310
Location: Abbeville , Louisiana
;
; This code is automatically generated by the FormDesigner.
; Manual modification is possible to adjust existing commands, but anything else will be dropped when the code is compiled.
; Event procedures needs to be put in another source file.
;

Enumeration FormWindow
  #Window_0
EndEnumeration


Procedure OpenWindow_0(x = 0, y = 0, width = 1126, height = 723)
  OpenWindow(#Window_0, x, y, width, height, "", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_ScreenCentered)
EndProcedure

Procedure Window_0_Events(event)
  Select event
    Case #PB_Event_CloseWindow
      ProcedureReturn #False

    Case #PB_Event_Menu
      Select EventMenu()
      EndSelect

    Case #PB_Event_Gadget
      Select EventGadget()
      EndSelect
  EndSelect
  ProcedureReturn #True
EndProcedure

OpenWindow_0()

Repeat
  event = WaitWindowEvent()
Until Window_0_Events(event) = #False

End



_________________
Meaux Racing Heads
MaxRace Software
ET_Analyst ( DragStrip Simulation Software )
PipeMax ( Engine Simulation Software )
http://www.maxracesoftware.com
http://www.maxracesoftwares.com
Offline
 Profile  
 
Display posts from previous:  Sort by  
 Page 1 of 1 [ 3 posts ] 


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Jump to:  

cron