PureBasic Forums - English

Great, seems to work fine here as well :wink: Maybe the following shorter version will also work (needs to be tested on different PC's): ; Define Enumeration #Win #ListSource #Font EndEnumeration #PB_DpiBits= 16 #PB_DpiScale= 1<<#PB_DpiBits #ViewSourceLines=5 Global DpiScale.i Global ListWidth.i Glo...

I'd like to adjust the height of a listicon gadget to show exactly five rows without showing a scrollbar. The column widths have to be adjusted as well to fill the whole space of the gadget. Actually I am using something like the following code, which is not perfect (the left gap seems to be larger ...

Hm, time for continuing this thread? Was wondering if AutoSize_UseColumn could be speeded up a little bit (see line with '***'), everything else is original Rashad code. :wink: Procedure AUTOSIZE_USEHEADER(gad,font) Header = SendMessage_(GadgetID(gad), #LVM_GETHEADER, 0, 0) nColumns = SendMessage_(H...

Thanks for all your responses, the approach of charvista to collect all founds is a nice one. Meanwhile I tried to put both searches into one loop to avoid scanning the same lines twice. There's still a problem keeping the CRs of the previous lines in memory (so the two if 0 sections are buggy and I...

The given program does show a practical example including CRLFs (ReplaceString), anyhow some fine tuning will have do be done later on: - case sensitive/insensitive search (which I believe can done by a predefined character array finally) - CR or CRLF could be given in the text which shouldn't be a ...

Is the text file small enough to fit in memory in one go? Yes, the text will be loaded into memory. No, searching a second time for the next word costs no extra time with my code, since you can set the start address. Look at the loop in the examples. It's not that easy as you don't know which of th...

While thinking about this thread Find a string in *memory , I'd need a super fast solution for finding two strings in a text file where the two strings have to be within a maximum distance of lines. Let's say I am searching for the words 'MAIN' and 'NEARBY' and the maximum distance of the two words ...

Endless variations are possible... :wink: CompilerIf #PB_Compiler_Version<600 Debug Mid("ARMX",Bool(#PB_Compiler_Processor&6-6)<<2,3) + Str(32<<Bool(#PB_Compiler_Processor&$D=4)) CompilerElse Debug Mid("ARMX",Bool(#PB_Compiler_Processor&6-6)<<2,3) + Str(32<<#PB_Compil...

I've used it in several situations, one is for creating shadows for objects which are transparent... Procedure Min(a,b) If a<b ProcedureReturn a Else ProcedureReturn b EndIf EndProcedure Macro StartClipping() SaveVectorState() ClipPath() EndMacro Macro StopClipping() RestoreVectorState() EndMacro Pr...

Extremly cooool! I had a look where some simple modding could be done and the best procedure for doing so seems to be here: Procedure matiere(num,dx,dy,c1,c2, brillance=$888888,alpha=0,scale.f=1,flockcolor=0,flocktilt=0) Protected i CreateTexture(num,dx,dy) StartDrawing(TextureOutput(num)) If alpha:...

Brute short version...

Quick hack to show the source code matching the search text (maybe this should be shown in a text box instead of a tooltip)... ...maybe the number of the files in the result list should also be seen in the status line. Anyhow there are some issues here, starting a second search immediately after the...

Tried different compiler versions and fonts, didn't see a problem here... ...maybe some additional clues in the message requester will show something?! Global extdot$=Chr($2024) ; And what about using other characters - Chr(8226) - will they be all invinsible? Procedure foo(file$, ext$) MessageReque...

Maybe...
https://www.nirsoft.net/utils/awatch.html
https://www.nirsoft.net/utils/network_traffic_view.html
https://www.nirsoft.net/utils/network_usage_view.html

Not a solution for you (windows) but maybe an inspiration (also for creating more console apps)... :wink: ; Define 500 lines of code EnableExplicit #Q=#DOUBLEQUOTE$ #Shades=4 #ConsoleTitle="Console Clock by Michael Vogel" Global Dim Pattern(#Shades) Structure CharType Width.i Height.i Spac...