SetFocus_(WindowID())

[Bong-Mong]

when i use SetFocus_(WindowID()) it locks my buttons, any ideas

TrackBarGadget(#Gadget_EC, 250, 230, 80, 20, 0, 1, #PB_TrackBar_Ticks)
SetGadgetState(#Gadget_EC, 0)

loaded=#False
Quit=#False

Repeat
EventID.l = WindowEvent()

SetFocus_(WindowID())

Select EventID
Case 0


next question, how do i run a windows command like netstat -n from purebasic,

[Num3]

You're buttons are locked beacuse you're using setfocus_ inside a LOOP!

When the window receives the command is generates a window event and executes setfocus_ again...

Better use it before the loop..

To run an external command use RunProgram(FileName$ [, Parameter$, WorkingDirectory$ [, Flags]])

[Bong-Mong]

SetFocus_(WindowID()) does'nt work no where else

im tring to hide the border around trackbars.
the command worked where it was but locked button,
when i move the command to outside loop, it does'nt do nothin

[PB]

> SetFocus_(WindowID()) does'nt work no where else

Try putting WindowEvent() after the SetFocus command (it should flush
the event buffer and stop the loop).

[Danilo]

@Bong-Mong:
You have to set the focus after an event for the
TrackbarGadget happened, not for all messages.

Code: Select all

#Gadget_EC = 1

OpenWindow(0,0,0,500,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"")
  CreateGadgetList(WindowID())
  TrackBarGadget(#Gadget_EC, 250, 230, 80, 20, 0, 1, #PB_TrackBar_Ticks) 
  SetGadgetState(#Gadget_EC, 0)
  ButtonGadget(2,10,10,100,20,"Button")

loaded=#False 
Quit=#False 

Repeat
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      End
    Case #PB_EventGadget
      Select EventGadgetID()
        Case #Gadget_EC
          SetFocus_(WindowID())
      EndSelect
  EndSelect
ForEver

[Bong-Mong]

Thanks, i was using the gadget_EC for Eject/Close cdrom