PureBasic Forums - English

Request iocp Code

Free WebGadget Memory ???




Enumeration
#Window_0
#Window_1
#Button_0
#Button_1
#StatusBar_0
EndEnumeration

Global NewList WebBrowser.l()

Procedure Open_Window_1()
Url.s = "http://www.purebasic.fr/"
EnableWindow_(WindowID(#Window_0),#False)
If OpenWindow(#Window_1,000,000,530,215 ...

I must do this procedure ah.
Or trouble you to help me solve

Nobody knows to solve problem ???

Code in the second cycle after the error has occurred.

I now propose to the problem, and before the issue is absolutely not the same,

No previous use of threads.

Now the use of the thread.

trouble you to help solve the problem.

This problem has been bothering the good days.



Enumeration ...

now this is the emergence of new problems.

Enumeration
#Web_0
#Panel_0
#Window_0
EndEnumeration



Declare Main()
Declare WebBrowser_(INT.l)
Declare.l WebBrowser_Scroll(Gadget.l,X.l,Y.l)

;-
Procedure WebBrowser_(INT.l)
Url.s = PeekS(INT)
If OpenWindow(#Window_0,#Null,#Null,1000,700,#NULL$,#PB_Window_SystemMenu)
If CreateGadgetList ...

Enumeration
#Window_0
EndEnumeration


Procedure Open_Window_0()
If OpenWindow(#Window_0, 216, 0, 600, 300, "New window ( 0 )", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
If CreateGadgetList(WindowID(#Window_0))
EndIf
Repeat
Until WaitWindowEvent() = #PB_Event ...

Enumeration
#Web_0
#Window_0
#String_0
#Button_0
EndEnumeration

Procedure.l WebBrowser_Scroll(Gadget.l,X.l,Y.l)
If X = #Null And Y = #Null
ProcedureReturn #False
EndIf
Res.l = #False
IWebBrowser2.IWebBrowser2 = GetWindowLong_(GadgetID(Gadget),#GWL_USERDATA)
IDispatch.IDispatch = #Null ...

code, as is the speed test

code, as is the speed test

code, as is the speed test

code, as is the speed test

Enumeration
#Window_0
#Button_0
#Button_1
#ListIcon_0
EndEnumeration

Structure LVFINDINFO
Flags.l
Psz.s
Lparam.l
Pt.POINT
VkDirection.l
EndStructure

Procedure.l GetIndex(Gadget.l,Caption.s)
pItem.LVFINDINFO
ZeroMemory_(@pItem,SizeOf(LVFINDINFO))
hWnd.l = GadgetID(Gadget)
If hWnd ...

Enumeration
#Window_0
#Button_0
#Button_1
#ListIcon_0
EndEnumeration

Structure LVFINDINFO
Flags.l
Psz.s
Lparam.l
Pt.POINT
VkDirection.l
EndStructure

Procedure.l GetIndex(Gadget.l,Caption.s)
pItem.LVFINDINFO
ZeroMemory_(@pItem,SizeOf(LVFINDINFO))
hWnd.l = GadgetID(Gadget)
If hWnd ...

to search on the second column -which I do not think is possible. ?????

Can not search the second column ?????