PureBasic Forums - English

jassing wrote:I have a pureform project with 1/2 dozen windows.
Window#1 is defined as main.
When I open up window#2 (not a child window); it can then open up window#3 -- I want this window to have window#2 as parent, not Window#1 -- is there a way to do it pureform so I don't have to change it in the source?

gnozal wrote:No, you may only have one main window.

jassing wrote:

gnozal wrote:No, you may only have one main window.

Hmm. I am able to have multiple "main" windows, but it only will let me set windows to be child of one.

Maitre_Kanter wrote:Hello,

I'm using Pureform (without JaPBe), in code infusion,
when I put a CR as below :

Code: Select all

Line1

Line2

and I save as PB file using Pureform, the CR between line1 and line 2 is missing.

When I edited the generated PB file, I notice that only one CR is present (the one after Line1).

Arnaud.

Maitre_Kanter wrote:Is it possbile to detect F5 to activate Build Mode / Preview Mode with WM_KEYDOWN.

jassing wrote:Is it possible to get "Toggle child window" to stick between sessions?
while editing a project, I am always going to to screen where I do not want to have a parent defined and select "toggle child window" -- is there a way to get this preference to 'stick'?

gnozal wrote:Actually, the keys are detected with GetAsyncKeyState_() in the main loop, with a minimum of 50 ms between 2 keystrokes.
I don't remember why (2006 !), but it was the best solution at the time.

;- enumeration (Windows)
#KF_UP       =       $8000
#KF_RECENTLY_PRESSED = $0001

;- enumeration (Owner)
#KEY_UP = 0
#KEY_DOWN  = 1
#KEY_STILL_DOWN  = 2

;- Globals
Global    F5_KeyCurrentState.u
Global    F5_KeyTrigger.i

OpenWindow( 0 , 20 , 20 , 20 , 20 , "Test KeyUp" )

;{- Event loop
Repeat
  ;:PureFORM:Loop:Start:
  Delay(1)
  
  WaitWindowEvent()
  
  F5_KeyCurrentState = GetAsyncKeyState_(#VK_F5)
      
  If ( F5_KeyCurrentState > 0 )
  
    Select ( F5_KeyCurrentState & (#KF_UP | #KF_RECENTLY_PRESSED ))
      Case #KF_UP | #KF_RECENTLY_PRESSED
        F5_KeyTrigger = #KEY_DOWN
      Case #KF_UP
        F5_KeyTrigger = #KEY_STILL_DOWN    ;repeat     
    EndSelect
  Else
    If ( F5_KeyTrigger >= #KEY_DOWN )
      F5_KeyTrigger = #KEY_UP
      Debug "#KEY_UP" 
    EndIf
  EndIf      
      
  ;:PureFORM:Loop:End:
ForEver      

gnozal wrote:The [Main Window], [Child Window] and 'non child window' status is saved with the form (*.pbf file) [if a main window is defined].

Maitre_Kanter wrote:...
see below a little piece of code for Keystroke management using GetAsyncKeyState_ API :
...

gnozal wrote:

Maitre_Kanter wrote:...
see below a little piece of code for Keystroke management using GetAsyncKeyState_ API :
...

Thanks, but I can't find any reference to #KF_RECENTLY_PRESSED ?

#KF_UP       =       $8000
#KF_RECENTLY_PRESSED = $0001