// Downloads an image from Internet and displays it in an Image control of application
// Display the wait window
WaitWindowStart("Downloading the image...")
// Start the download thread
ThreadExecute("MyThread", threadNormal, procDownloadImage)
INTERNAL PROCEDURE procDownloadImage
// Download the image
IF HTTPRequest("https://www.windev.com/img/visual/21/logo-pcsoft.png") THEN
bufImage is Buffer = HTTPGetResult()
// Display the downloaded image in an Image control of the window
INTERNAL PROCEDURE procUpdImage
IMG_NoName1 = bufImage
// Close the wait window
- In order for the wait window to be closed, WaitWindowEnd must be called as many times as WaitWindowStart was called.
- WaitWindowStart and WaitWindowEnd can be called from a secondary thread.
Business / UI classification: UI Code