PureBasic Forums - English

Hi everyone

This is my best mojo so far. :D

To achieve best performance try to change delays values, x values and cnt values.



Enumeration
#win1
#box1
#bt1
#sp1
EndEnumeration

Global event

InitSprite()

If OpenWindow(#win1, 0, 0, 800, 600, "Side Menu", #PB_Window_SystemMenu | #PB_Window ...

Hi

Made a small program. Don't know if this will help you. I tried. :D



Enumeration
#win1
#im1
#box1
#ig1
#bt1
EndEnumeration

Global event

If OpenWindow(#win1, 0, 0, 800, 600, "Side Menu", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)

ButtonGadget(#bt1, 10, 10, 120, 20, "Menu ...

function GetAsyncKeyState_ is reacting to all space presses because if i pressed space inside a string gadget it exits window.

So sharing a possible solution.



Enumeration
#sg1
#sg2
EndEnumeration

Global eg, event

If OpenWindow(0, 0, 0, 800, 600, "Close window with <space> after pressing ...

I continue to search in forum and i start seing a function called GetAsyncKeyState_
and codes like #VK_Control, #VK_F5 ... hum ... what if i can do something like this GetAsyncKeyState_(#VK_SPACE) ... let me try ... it worked ... wtf?
This must be Purebasic deep underground because i can't find this ...

Hi everyone

Is it possible to close a window with the space key ?



Global event

If OpenWindow(0,0,0,800,600,"Close window with <space>",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
Repeat
event=WindowEvent()
Select event
Case #PB_Event_CloseWindow
End

; this next code is my ...

Thanks infratec for pointing me in the right direction

Sharing a little code after activating IDE flag.

Hi everybody

1º source code is loaded from some directory in disk
2º Is there a way of getting the source file directory with code when you run the program with F5 ?

The goal is to do this automaticly and then add directories to it:

getsourcecodedir()+"pbi/test.pbi"

xincludefile instruction ...

Thanks everybody for answers. Now i am on the right track.

Hi everyone

1º In window1 when i press "add 1" button it adds to textbox (it's working).
2º Then i open window2 and press "add 1" button and it adds to textbox in window1.
3º Then when i go back to window 1 and press "add 1" button it doesn't work anymore.

What i am doing wrong ? I don't want to ...

So that's why. mk-soft i confirm that i was using a batch file with % to execute the program with parameter.
I went thru command line and it's working. Ta-Da. Learning everyday.

Thanks everybody for the help

Not working on purebasic 5.70 32 bits.

;call your program test
;and type on command line "test %asa" and you will get "asa" not "%asa" for 1st parameter ???

OpenConsole()
Result$ = ProgramParameter(0)
PrintN(Result$)
Input()
CloseConsole()




I am using version 5.70 and windows 7 64bits. I forgot to mention earlier that i have ...