[Done] Stringgadget bug

[drgolf]

Hello again,

With PB 6.30 B1, this code no longer work :

Code: Select all

If OpenWindow(0, 0, 0, 322, 205, "StringGadget BUG !", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    StringGadget(0, 10, 10, 200, 150, "aaaaaaa ",#ES_MULTILINE|#WS_BORDER|#WS_VSCROLL|#ES_AUTOVSCROLL|#PB_String_ReadOnly|#ES_WANTRETURN|#ESB_DISABLE_BOTH)
   
   SetGadgetText(0,"absvdhfdhfh")
  
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf

[STARGÅTE]

What are all these Constants?
Only PB constants are officially supported!
https://www.purebasic.com/documentation ... adget.html

For multi line output, you can try to use the EditorGadget()

[Fred]

The right way to do that is to use SetWindowLongPtr_() with the style flag

[drgolf]

Hello Fred,

The #es_multiline style dont work with Setwindowlongptr_().

See windows api doc here : https://learn.microsoft.com/fr-fr/windo ... rol-styles

The stringgadget multiline is usefull because of contextmenu with clipboard functions.

I need to create the control and this is not easy (for me, simple and old coder).

Code: Select all

hInstance = GetModuleHandle_(0) 
   HwndEditText  = CreateWindowEx_(#WS_EX_STATICEDGE,"EDIT","",#WS_VISIBLE | #WS_CHILDWINDOW |#ES_MULTILINE|#WS_BORDER|#WS_VSCROLL|#ES_AUTOVSCROLL|#PB_String_ReadOnly|#ES_WANTRETURN|#ESB_DISABLE_BOTH, 10,10,280,120,WindowID(0),200,hInstance,0)
   SendMessage_(HwndEditText,#EM_REPLACESEL,0,"Hello"+#CRLF$+"aaaaaa")

Again, PB update break working apps...

[Fred]

May be if you used the commands as documented, it wouldn't break ? Just an idea.

[Kiffi]

May be if you used the commands as documented, it wouldn't break ? Just an idea.

[Fred]

I will revert the change as it can't be modified after creation with SetWindowLongPtr()

[Fred]

Fixed.