B4J Question Detect the end of a window being resized

DarkMann said:

The redraw also calls down some data that it needs from a remote database and this means the data is requested multiple times per second while the redraws are fired repeatedly.

Click to expand...

Sub MainForm_Resize (Width As Double, Height As Double)
   ResizeIndex = ResizeIndex + 1
   Dim MyIndex As Int = ResizeIndex
   Sleep(1000) 'change duration as needed
   If MyIndex = ResizeIndex Then
       Log("resize complete!")
   End If
End Sub

Erel said:

This sounds like a bad idea.


1. Add a global int variable named ResizeIndex.
2.

B4X:

Sub MainForm_Resize (Width As Double, Height As Double)
   ResizeIndex = ResizeIndex + 1
   Dim MyIndex As Int = ResizeIndex
   Sleep(1000) 'change duration as needed
   If MyIndex = ResizeIndex Then
       Log("resize complete!")
   End If
End Sub

Click to expand...