PureBasic Forums - English

Comfort

God... enough of this!

Comfort

The problem is the window the user has opened is only 480 wide.

Then he needs to change the Image width to 480.

Comfort

Try changing the size of the Image... the ImageGadget Width and Height will change with it.

Comfort

That be the ExamineDirectory() example.

Comfort

This is constantly being triggered by a Focus event type. Maybe add tooltip instead.

Code: Select all

  Case #STRING_INPUT2
    MessageRequester("Uyarı", "Buraya yazamazsın",#PB_MessageRequester_Warning)

Comfort

Code: Select all

For n=0 To 2
  n=10
Next
Debug n

It's not broken... it's just quirky.

Comfort

Procedure GetEvents(Array events.EventStructure(1), *numEvents.Integer)
Protected event.i
*numEvents\i = 0
event = WindowEvent()
While event And *numEvents\i < #MAX_EVENTS
events(*numEvents\i)\event = event
events(*numEvents\i)\eventGadget = EventGadget()
events(*numEvents\i)\eventType ...

Comfort

Code: Select all

If i < 0:Break:EndIf
txt$ = GetGadgetItemText(GadgetNumber,i)
If ProcDb(txt$) < 0:Continue:EndIf

Recode this, removing Break and maybe losing that Continue.

Comfort

Very nice... thanks for sharing.

Comfort

Sparkie's code here doesn't work anymore (illegal memory access) -> https://www.purebasic.fr/english/viewtopic.php?p=171031#p171031

Anyone know how to fix it? Thanks.

A couple of variables need to be integers for it to work with C backend compiler... there could be more.

Line 10 :

Global ...

Comfort

Replacing line #27 = ShowWindow() with...

Code: Select all

            SendMessage_(WindowID(0), #WM_SYSCOMMAND, #SC_HOTKEY, WindowID(0))

should work.

Comfort

So, not a feature then.

Thanks.

Comfort

Is this a feature or an annoyance?

Procedure Test()
If GetGadgetText(EventGadget()) = "Binded Button"
MessageRequester("Button Test","As it should be!")
FreeGadget(0)
UnbindedButton = ButtonGadget(0, 10, 10, 200, 20, "Unbinded Button")
Else
MessageRequester("Button Test","Not expected."+Chr ...

Comfort

With or without a keyboard shortcut, it needs a test for key repeat.

Something like this (without shortcut):

; output PlayerName variable to debug
Global PlayerName.s

If OpenWindow(0, 0, 0, 322, 50, "StringGadget example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
InitSprite ...

Comfort

Pokes and Peeks drive me crazy, when there is a far elegant method available.

PureBasic Forums - English

Search found 28 matches

Re: Question about the dimensions of an image.

Re: Question about the dimensions of an image.

Re: Question about the dimensions of an image.

Re: File modification date

Re: MessageRequester triggers itself

Re: Loop ? The behavior not working

Re: Resize canvas slow on large monitor

Re: after doing a DatabaseUpdate program shuts down

Re: simple oil paint simulator

Re: What parameters does PB use internally to create windows?

Re: restore window & give it focus.

Re: Unexpected BindGadgetEvent() callback

Unexpected BindGadgetEvent() callback

Re: User input example printing 2-3 times in debug

Re: Best way to return pointer to allocated memory inside procedure?