PureBasic Forums - English

luis wrote: ↑Mon May 15, 2023 12:57 am Where I saw something like that before ?

Ahhh this is great !

Yup, but apparently he didn't

So, i've been experiencing this compiler error. Whenever i try to call a function that requires a string as input using OpenLibrary and CallFunction, it refuses to compile and throws this error: 'Number Expected Instead Of A String". Here Is An Example with the function MessageBox from user32....

Faster than regex.... Shouldn't the repeat loop in your procedure look like this? Procedure myCountString( toSearch.s, toFind.s ) Protected p=1, count=0 Repeat p = FindString(toSearch,toFind,p) If p p+1 count+1 EndIf Until p=0 ProcedureReturn count EndProcedure

From what I see here, your example would not work simply by extracting JSON to a structure because ExtractJSONStructure requires the Structure member names to be identical to the JSON member keys. The structure would need fields like this which of course is not allowed... Structure Example Database ...

It's probably a leftover of previous install, it should only install in programdata, as program files is usually read only. No, this was first time install on new os. My actual install path was: C:\Compilers\PureBasic602_64 And the example folder shows up in both: C:\Compilers\PureBasic602_64\Examp...

Is the installer suppose to install the Examples folder twice on Windows?

It seems to be installing the same thing here and here...
C:\Program Files\PureBasic\Examples
C:\ProgramData\PureBasic\Examples

Or extract into a structure... json$ = ~"{\"jsonrpc\":\"2.0\",\"id\":1,\"result\":\"0x0000000000000000000000000000000000000000000000000000000000000000\"}" Structure jsondata jsonrpc.s id.i result.s EndStructure hJSON= ParseJSON(#PB_Any,json...

Not sure what the final output is suppose to look like but here is the output from idle's code... 1st image is on 4k monitor (4096x2160), 175% scaling, no dpi aware. 2nd image is 4k monitor (4096x2160), 175% scaling, dpi aware enabled. https://reelmedia.org/test/4knodpi2.jpg https://reelmedia.org/te...

1st image is on 4k monitor (4096x2160), 175% scaling, no dpi aware.
2nd image is 4k monitor (4096x2160), 175% scaling, dpi aware enabled. (notice this version does not scale to the entire screen)

jassing wrote: ↑Thu Apr 06, 2023 4:44 am If I use #PB_ANY, it doesn't work.

Because as Demivec said, you have to use and you used...

The positioning of the text is what is available with PureBasic.
If you are on Windows you can select the API flag which will allow you to center the text vertically...

Like this?? Structure Songs ; store all songs name in an sub directory (Path$) Path$ SongQty.i List SongName$() EndStructure Structure DirInfos ; store the song info in an parent directory TotalSong.i TotalDir.i List DirNo.Songs() EndStructure Global NewList RootDir.DirInfos() AddElement(RootDir()) ...

If you add a custom gadget to your form it will be exported regardless of the platform you are designing for.
Of course your custom gadget must be made for SpiderBasic if you want it to compile with SpiderBasic.

Um, just tried your code using 6.01 B4 x64 on Windows 10 Home and it worked fine. Tried both ASM and C backend.
Line 77 does not return 0 (returns 140728349698768 on my system)

Shouldn't it be... Structure MyStruct Param.s EndStructure CompilerIf Defined(MyStruct, #PB_Structure) Debug "1. Constant 'MyStruct' is declared" CompilerEndIf CompilerIf Not Defined(MyStruct, #PB_Structure) Debug "2. Constant 'MyStruct' is not declared" CompilerEndIf ;Structure ...