PureBasic Forums - English

can be a screen refresh problem
the same but with a thread
#MainWin = 0
#ScreenWin = 1
Global ScreenW = 2048
Global ScreenH = 2048
Global Thread
Global ThreadSemaphore = CreateSemaphore()

InitSprite()

Procedure UpdateScreen()
WaitSemaphore(ThreadSemaphore)
ResizeGadget(0, #PB_Ignore, #PB_Ignore ...

Without blocking the animation when resizing or moving
#MainWin = 0
#ScreenWin = 1
Global ScreenW = 2048
Global ScreenH = 2048

InitSprite()

Procedure UpdateScreen()
ResizeGadget(0, #PB_Ignore, #PB_Ignore, WindowWidth(#MainWin), WindowHeight(#MainWin))
EndProcedure

Procedure Scrolling()
Static ...

thanks to Ollivier from the French forum for the help
OpenWindowedScreen( GadgetID(0) , 0, 0, ScreenW, ScreenH)
you can open a screen on a gadget
#MainWin = 0
#ScreenWin = 1
ScreenW = 2048
ScreenH = 2048
InitSprite()

If OpenWindow(#MainWin, 0, 0, 400, 300, Str(ScreenW) + " x " + Str(ScreenH ...

if you can use it....
small utility for blacklisting url
to be compiled in administrator mode

https://i.postimg.cc/DZ4VNZKy/Capture2.png

https://i.postimg.cc/FzrpwWMF/Capture.png
OpenWindow(0,0,0,600,800,"BlackList", #PB_Window_SystemMenu | #PB_Window_SystemMenu)
ListIconGadget(0,10,10,580 ...

That's exactly what I wanted ! mk-soft you are the best

hello mk-soft,
it worked once but without giving me the code and since I have this error
ActiveScriptSite - OnScriptError
Line: 8 Column: 3

ActiveScriptSite - AddRef() : Refcount 1 > 2
ActiveScriptSite - QueryInterface() : IActiveScriptSiteInterruptPoll -> No Interface
ActiveScriptSite - AddRef ...

Thank you mk-soft, but what I want is to have the html code when Internet Explorer is already launched. What I want is to retrieve information on a web page for my job (name, delivery date ...)

sorry for my english, I'm french

FindWindow_ is an API that search for an opened window, so if you remove it, your program will never search for window

if I commented the two lines is to show that my program works when it opens itself Internet Explorer.
But when I search the window with FindWindow_ it does not work

the two commented lines, it's my approach to use Internet Explorer already launched

link to COMatePlus
https://www.rsbasic.de/backupprogramme/COMatePLUS.zip

Hello, I can get the html code of Internet Explorer when it is opened by the program. but how to do it when Internet Explorer is already open?
thank you


;***COMate*** COM automation through iDispatch.
;*===========
;*
;*Web gadget demo. (Advanced users!) Based upon code by hm.
;*
;*This demo not ...

can be like that


;Purebasic: 5.11
;OS: Windows 10, x64

EnableExplicit

Enumeration
#Main
#Main_S1:#Main_S2
#Main_B1:#Main_B2:#Main_B3
EndEnumeration

Global.i Event

Global.i Backcolor = 16711680
Global.i Fontcolor = 16777215

Global FontID0 = LoadFont(0, "Verdana", 8, #PB_Font_Bold | #PB ...

Hi C87, I'm sorry that it does not work for you. I redid the test, for me it works

img 1: https://ibb.co/fdgcNhY
img 2: https://ibb.co/RHRPzpL

Excuse for my english. Translated from French into English by Google Translation

It's normal that you only read the first 2 lines, since you are only 2 readstring. Try this

; *****************************************************************************
;*** Attempt to locate specific records in what I think is a sequential file
;*** but doesn't appear to be ...