Page 1 of 1

Error with TFolderEx and oWnd:Update() (solved)

Posted: Thu Apr 14, 2011 1:56 pm
by gkuhnert
Hi,

if I call oWnd:Update() on a window with a Folderex and a Get on it, I get an error message.

Update: It also happens without Get

Just push the button on following example:

Code: Select all

#include "FiveWin.ch"

function main()
   local oWnd
   local oFld, oBtn1, cGet1 := Replicate(" ", 20)

   DEFINE WINDOW oWnd TITLE "Test Update TFolderex"

   @ 3, 3 FOLDEREX oFld PIXEL ADJUST PROMPT  "Page &1", "Page &2"

        @  2,1 GET cGet1 OF oFld:aDialogs[1] SIZE 180,20 UPDATE
        @  4,1 BUTTON oBtn1 OF oFld:aDialogs[1] SIZE 100,20 ACTION (oWnd:Update())

   ACTIVATE WINDOW oWnd ON INIT oFld:Resize()

RETURN NIL
 
and you get following error:
Application
===========
Path and name: D:\fw1009\fwh\samples\testfx7.exe (32 bits)
Size: 1,578,496 bytes
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 04/14/11, 15:56:59
Error description: Error BASE/2017 Argument error: AEVAL
Args:
[ 1] = U
[ 2] = B {|| ... }
[ 3] = U
[ 4] = U

Stack Calls
===========
Called from: => AEVAL(0)
Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW:TWINDOW(640)
Called from: => TFOLDEREX:UPDATE(0)
Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW(640)
Called from: => AEVAL(0)
Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW:TWINDOW(640)
Called from: => TWINDOW:UPDATE(0)
Called from: testfx7.prg => (b)MAIN(12)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1447)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => SENDMESSAGE(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(408)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(944)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => WINRUN(0)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE(978)
Called from: testfx7.prg => MAIN(14)
What can I do about it?

Re: Error with TFolderEx and oWnd:Update()

Posted: Thu Apr 14, 2011 3:14 pm
by gkuhnert
Ok, this was clearly my mistake, in FWH11.03 it's working fine and I was testing in FWH10.09