Search found 554 matches

by Wolfram
Sat Dec 27, 2025 9:58 am
Forum: Mac OSX
Topic: ExplorerTreeGadget color
Replies: 8
Views: 863

Re: ExplorerTreeGadget color

Here, under macOS 14.8.2, I can't see any problem.
by Wolfram
Fri Dec 26, 2025 6:36 pm
Forum: Mac OSX
Topic: ExplorerTreeGadget color
Replies: 8
Views: 863

Re: ExplorerTreeGadget color

Do you mean something like this?

If OpenWindow(0, 0, 0, 300, 300, "ExplorerTreeGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ExplorerTreeGadget(0, 10, 10, 280, 280, "*.pb;*.pbi")

CocoaMessage(0, GadgetID(0), "setBackgroundColor:", CocoaMessage(0, 0, "NSColor systemRedColor ...
by Wolfram
Wed Nov 12, 2025 9:16 pm
Forum: Mac OSX
Topic: NSPopOver Functions
Replies: 3
Views: 1099

Re: NSPopOver Functions

Nice!

A smal variation with a list...

#NSMaxYEdge = 2 ; 0-3 change the orientation
#NSFocusRingTypeNone = 1

Global popover = 0
Global vc = 0
Global contentView = 0
Global label = 0
Global NSTableView

; Create
Procedure.i CreateContentView(width, height)
Protected rect.NSRect
rect\origin\x = 0 ...
by Wolfram
Thu Sep 18, 2025 7:01 pm
Forum: Mac OSX
Topic: Change Theme
Replies: 7
Views: 2907

Re: Change Theme

rndrei wrote: Wed Sep 17, 2025 6:26 pm Why doesn't borderless clean, does it give an error?

Code: Select all

  mask = CocoaMessage(0, #window, "styleMask")
  mask | #NSBorderlessWindowMask
  CocoaMessage(0, #window,"setStyleMask:", mask)
 
by Wolfram
Mon Sep 08, 2025 7:08 pm
Forum: Tricks 'n' Tips
Topic: Select folder dialog
Replies: 15
Views: 7850

Re: Select folder dialog

Thank you very much! This is such a great community.
by Wolfram
Sun Sep 07, 2025 9:45 pm
Forum: Tricks 'n' Tips
Topic: Select folder dialog
Replies: 15
Views: 7850

Re: Select folder dialog

Can someone give me an example for the AddCheckButton() Method please?
by Wolfram
Wed Jul 30, 2025 2:40 pm
Forum: Coding Questions
Topic: GetExtensionPart fails with a space
Replies: 17
Views: 1915

Re: GetExtensionPart fails with a space



Procedure.s MyGetExtensionPart3(*p)

*str.string = @*p
length = StringByteLength(*str\s)

*char.character = *p +length


Repeat

*char -SizeOf(character)

If *char\c = 46
*char +SizeOf(character)
*str = @*char

ProcedureReturn *str\s

EndIf

Until *char = *str ...
by Wolfram
Sat Jul 12, 2025 1:07 am
Forum: Coding Questions
Topic: Order of JSON items
Replies: 9
Views: 1123

Re: Order of JSON items

Hello Sergey,

your example does not work in my case.
I want to get the name in the same order as it is written, but I get Tom, Michel, Peter.


Global NewList packages.s()


Declare findUser(JSONValue, getMembers=#NO)


Procedure.i findUser(JSONValue, getMembers=#NO)
Protected key$


Select ...
by Wolfram
Fri Jul 11, 2025 10:01 am
Forum: Coding Questions
Topic: Order of JSON items
Replies: 9
Views: 1123

Re: Order of JSON items

Sergey wrote: Thu Jul 10, 2025 7:09 pm I'm used a pointer to json object in memory (from min to max), maybe this help you order json members :wink:
Sounds good, but how can I get the address of the object if I use NextJSONMember() ?
by Wolfram
Tue Jul 08, 2025 2:45 pm
Forum: Coding Questions
Topic: Order of JSON items
Replies: 9
Views: 1123

Order of JSON items

Why is the order of the items in this example different from the order I see in a text editor?


Global NewList packages.s()

Declare findIsMandatory(JSONValue, getMembers=#NO)


Procedure.i findIsMandatory(JSONValue, getMembers=#NO)
Protected key$


Select JSONType(JSONValue)
Case #PB_JSON ...
by Wolfram
Mon Jun 23, 2025 9:39 pm
Forum: Mac OSX
Topic: ListIconGadget with Icon and Text example
Replies: 0
Views: 1249

ListIconGadget with Icon and Text example

Here is an example of a ListIconGadget under macOS with icons with variable size.
Unfortunately, the constrain does not work as it should or as I expect it to. If anyone has a suggestion for improvement, please post it.



Global mainWindow, NSTableView


CreateImage(0, 32, 32, 32, $FF0000 ...
by Wolfram
Thu Jun 19, 2025 11:45 am
Forum: Mac OSX
Topic: Cocoa: How to feed an OutlineView Programatically
Replies: 6
Views: 3892

Re: Cocoa: How to feed an OutlineView Programatically

I guess that's the right...

Global RootNode = CocoaMessage(0, 0, "NSTreeNode treeNodeWithRepresentedObject:$", @"Root node")
CocoaMessage(0, RootNode, "retain")

ChildNode1 = CocoaMessage(0, 0, "NSTreeNode treeNodeWithRepresentedObject:$", @"Child node 1")
ChildNode2 = CocoaMessage(0, 0 ...
by Wolfram
Thu Jun 19, 2025 8:34 am
Forum: Mac OSX
Topic: Cocoa: How to feed an OutlineView Programatically
Replies: 6
Views: 3892

Re: Cocoa: How to feed an OutlineView Programatically

Unfortunately I get an error "[ERROR] Illegal instruction. (executing binary Data?)" on line 43.

Code: Select all

ProcedureReturn CocoaMessage(0, item, "representedObject") ;<-- hier it crashes
Can someone explain me why?
by Wolfram
Tue Jun 17, 2025 8:26 am
Forum: Mac OSX
Topic: How can I unfold a TreeGadget?
Replies: 8
Views: 1611

Re: How can I unfold a TreeGadget?

Here is what I was looking for...

Code: Select all

CocoaMessage(0, GadgetID(tree), "expandItem:", #nil,  "expandChildren:", #YES)
by Wolfram
Mon Jun 16, 2025 7:39 pm
Forum: Mac OSX
Topic: How can I unfold a TreeGadget?
Replies: 8
Views: 1611

Re: How can I unfold a TreeGadget?

No, it does not help.
If I use a shortcut (option + arrowRight) it opens in a second.