Private Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As Long
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
LockWindowUpdate 0
End Sub
Private Sub WebBrowser1_DownloadBegin()
LockWindowUpdate Picture1.hWnd
End Sub
VB_D3D_Денис писал(а):Delphi: void WINAPI SetWindowRedraw(HWND hwnd, BOOL fRedraw)
Сейчас этот форум просматривают: AhrefsBot, SemrushBot, Yandex-бот и гости: 101