PureBasic Forums - English

This has nothing to do with the certificate. Windows 7 itself can not handle TLS 1.3 "Windows 7 doesn't support TLS1.3, end-of. (...) So you need an external solution. Unfortunaley the PB inbuild libcurl uses the system ssl stuff. -> you fail. If you are using my HTTPRequestI, you can set #LibC...

Procedure RemoveListDuplicates() If ListSize(WordsList()) > 0 ; Only process if there is at least one element Define previousLine.s = "zzzzzzzz" ForEach WordsList() If LCase(previousLine) = LCase(WordsList()) DeleteElement(WordsList()) ; Remove the duplicate element ;NextElement(WordsList...

Write PB code, then PB will understand.

I removed the Define.

Personally I don't need a 'DarkTheme'

Simply search for myString :wink: Global myString.s = "@A#*+=-,. " I only showed the 'optimized' part. You had to copy the code from the first post and replace the corresponding part, after checked the original speed. But here it is a complete version with EnableExplicit: EnableExplicit Gl...

Piero wrote: ↑Sat Apr 20, 2024 9:33 pm Buy a Mac?

This does not solve the problem:
Plugin several USB disks an find the mountpoint by the name of the disk.

To reduce your enumeration: EnableExplicit Structure Char_Structure Char.s{1} EndStructure Define Chars.i Define Drive$ Define *Drives Define *Ptr.Char_Structure *Drives = AllocateMemory(1024) If *Drives *Ptr = *Drives Chars = GetLogicalDriveStrings_(MemorySize(*Drives), *Drives) While Chars If *Ptr...

Meassured with: Procedure EventHandler() Protected.d StartTime, EndTime Select Event() Case #PB_Event_CloseWindow End Case #PB_Event_Gadget File = OpenFileRequester("Please choose image to load", "", "Image|*.bmp;*.jpg;*.png", 0) If IsImage(image) FreeImage(image) EndIf...

Last step: Procedure AsciiToIMage(File$) Structure Character_Structure CharString.s{1} EndStructure Protected S.s Protected.i x, y, LoopCountX, LoopCountY Protected Ratio.d Protected.i NewWidth, NewHeight.i Protected.i width, Height.i Protected Color.i Protected.i r, g, b Protected Average.i Protect...

Second step: Procedure AsciiToIMage(File$) Structure Character_Structure CharString.s{1} EndStructure Protected S.s Protected.i x, y, LoopCountX, LoopCountY Protected Ratio.d Protected.i NewWidth, NewHeight.i Protected.i width, Height.i Protected Color.i Protected.i r, g, b Protected Average.i Prote...

A first step: Procedure AsciiToIMage(File$) Structure Character_Structure CharString.s{1} EndStructure Protected S.s Protected.i x, y, LoopCountX, LoopCountY Protected Ratio.d Protected.i NewWidth, NewHeight.i Protected.i width, Height.i Protected Color.i Protected.i r, g, b Protected Average.i Prot...

I loaded a GIF and .... failed.

You should restict the files like this:

Updated libcurl dlls to 8.7.1