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

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

Postby gkuhnert » Thu Apr 14, 2011 1:56 pm

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  Expand view
#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?
Last edited by gkuhnert on Thu Apr 14, 2011 3:14 pm, edited 1 time in total.
Best Regards,

Gilbert Kuhnert
CTO Software GmbH
http://www.ctosoftware.de
User avatar
gkuhnert
 
Posts: 274
Joined: Fri Apr 04, 2008 1:25 pm
Location: Aachen - Germany // Kerkrade - Netherlands

Re: Error with TFolderEx and oWnd:Update()

Postby gkuhnert » Thu Apr 14, 2011 3:14 pm

Ok, this was clearly my mistake, in FWH11.03 it's working fine and I was testing in FWH10.09
Best Regards,

Gilbert Kuhnert
CTO Software GmbH
http://www.ctosoftware.de
User avatar
gkuhnert
 
Posts: 274
Joined: Fri Apr 04, 2008 1:25 pm
Location: Aachen - Germany // Kerkrade - Netherlands


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 84 guests