PureBasic Forums - English

...


Can you try this code (by normeus)? Works fine for me:


Define Folder_ID, SFolderLoc.s
If SHGetSpecialFolderLocation_(0, #CSIDL_PROFILE, @Folder_ID) = 0
SFolderLoc.s = Space(#MAX_PATH*2)
SHGetPathFromIDList_(Folder_ID, @SFolderLoc)
CoTaskMemFree_(Folder_ID)
EndIf
Debug sFolderLoc ...

Anything wrong with simply using :

DatabaseUpdate( #DB_YTCS, "Vacuum DB_MEM into '.\gaga.s3db' " )

??

With globals,there is some use for this behaviour, in order to remind you inside a procedure that a variable has global scope.
But in long procedures, even the Global definition (usually at the procedure's start ) is a daunting "solution".

(Personally, I prefer a "g_"... prefix for my global ...

@ Marc56us

He just might also be looking for .ddl-, .lib- and other files not executable on their own .

Not too demanding, since the filename is already known. No need for the "ExamineDirectory" chore ;)

EnableExplicit
Define SoughtAfterFile$ = "Notepad.exe"
Define EPath$ = GetEnvironmentVariable("PATH")
Define Flag = 0
Define i = 1
Define SPath$ = StringField( EPath$, i, ";" )
Repeat

; Debug ...

It wouldn't , but if you cannot or are unwilling or unable to read and understand more than a single line of text at a time, that's not my problem.

Yes, Axolotl, I do know, but thanks anyway.

I think the usefulness of debuglevel is dependant of what you do.
It may well be that many fellow programmers never use it, but keep to simple "debug <expression>" lines.
They wouldn't have to change a thing if my proposal really got implemented.

But ...

I know that ^^

But the debug lines clutter tbe view, unnecessarily.

Could we have the debug statement like this:

Debug [DebugLevel, ] <expression>

instead of our traditional

Debug <expression> [, DebugLevel]

, please?

That way, (especially when debug statements have long, complicated expressions to contend with )
* it would look more tidy
* the debuglevel ...

...and a search functionality.

Yes, yes and yes!
... and, if it isn't too much trouble, with RegExp-Functionality.

Or else: optionally have debug output piped to notepad++ . That way, multiple debug output "windows" could be simulated.

Thanks a lot, infratec,
saved me quite some time not having to work this out myself.

Uhmmm..... it's there. I seemed to have the same problem.
I have PB5.72 and PB5.71 installed in adjacent paths of the same directory tree - AND I am creating the .res file through a custom entry in my tools menu in both installations.
On closer examination, I found that much to my surprise, lf I ...

Well, thank you Thorsten.
The missing prefix was surely rather a "glitch" than a "bug".

I obviously somehow misunderstood this part.
"Add encrypted files to the archive or or decrypt files during unpacking"
Never mind, good work though.
Thanks for the quick reply
CJ

Hi, Thorsten.

First of all:Thanks for your effort, basically it's what many need and have written about it many times

Minor problem: Seems like the module prefix is missing in line 1673.

Bigger problem:
* Even with that prefix added, the ZIP file is being created with the two jpgs in unreadable ...

Oh, incidentally , we had a current case in the german forum where a file wouldn't open in some cases: it had to be win7 with a service pack installed while win7 without svc pack or win 10 worked as expected; also, the error did not occur with win7.SP1 when the accesses were more than 60 seconds ...