Dots disappear when drag and move control!

[vilian]

Antonio,

In FWH92 as the control drag and move, the rectangle would display the displacement disappears !

How to fix it?

Code: Select all  Expand view

@ 10,20 GET oGet VAR cVar PICTURE "@!" DESIGN SIZE 20,60 PIXEL OF oDlgEdit UPDATE
 

[vilian]

Antonio,


You understand?

[vilian]

Antonio,


Test with the example below. Move the control, you can see the problem.

Code: Select all  Expand view

    #include "FiveWin.ch"

    static oWnd
    function Main()
    local oDlg

        DEFINE WINDOW oWnd      ;
          MDI                   ;

       ACTIVATE WINDOW oWnd MAXIMIZED;
                ON INIT ExibJanela()

    RETURN NIL

    FUNCTION EXIBJANELA()

       DEFINE DIALOG oDlg TITLE "Test" OF OWND

       ACTIVATE DIALOG oDlg CENTERED ;
          ON INIT (PlaceControls( oDlg ))

    return nil

    function PlaceControls( oDlg )

       local oGet, cVar := "Hello"

       @ 20, 20 GET oGet VAR cVar PICTURE "@!" DESIGN SIZE 80, 25 PIXEL OF oDlg UPDATE

    return nil

 

[Antonio Linares]

Vilian,

Already fixed. Please review the required changes:

viewtopic.php?f=18&p=78465#p78465