in our program we have a crash that I am not able to fix
I created a little test that reproduce the problem:
- Code: Select all Expand view RUN
- #include <fivewin.ch>
proc main()
LOCAL oDlg, oGet, xVal := 0, oBtn, cOther := "Other Get"
DEFINE DIALOG oDlg
@ 0,0 GET cOther
@ 1,0 GET oGet VAR xVal SIZE 100,20 PICTURE "@E 99.9999"
@ 2,1 BUTTON oBtn ACTION SetText(oGet)
ACTIVATE DIALOG oDlg ON INIT oGet:Refresh()
proc SetText(oGet)
oGet:varPut("Prezzo offerta (PR_OFF)")
oGet:Disable()
oGet:Refresh()
Here the error.log:
- Code: Select all Expand view RUN
- Application
===========
Path and name: C:\fwh32\samples\getError.exe (32 bits)
Size: 3,623,424 bytes
Compiler version: Harbour 3.2.0dev (r1711221033)
FiveWin version: FWH 17.11
C compiler version: Microsoft Visual C++ 19.11.25508 (32-bit)
Windows version: 6.2, Build 9200
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 05/22/18, 11:01:22
Error description: Error BASE/1073 Argument error: <
Args:
[ 1] = C Prezzo offerta (PR_OFF)
[ 2] = N 0
Stack Calls
===========
Called from: ../../../tget.prg => TCLIPGET:PUTMASK( 0 )
Called from: ../../../tget.prg => TCLIPGET:UPDATEBUFFER( 0 )
Called from: .\source\classes\TGET.PRG => (b)TGET( 198 )
Called from: .\source\classes\TGET.PRG => TGET:REFRESH( 0 )
Called from: getError.prg => SETTEXT( 14 )
Called from: getError.prg => (b)MAIN( 8 )
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK( 179 )
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1685 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3348 )
Called from: => SENDMESSAGE( 0 )
Called from: dialog.prg => TDIALOG:COMMAND( 429 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: dialog.prg => TDIALOG:HANDLEEVENT( 925 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: dialog.prg => TDIALOG:ACTIVATE( 296 )
Called from: getError.prg => MAIN( 9 )
System
======
CPU type: Intel(R) Core(TM) i7-4790 CPU @ 3.60GHz 3592 Mhz
Hardware memory: 12228 megs
Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %
Windows total applications running: 7
1 ,
2 , C:\WINDOWS\System32\SHELL32.dll
3 , C:\WINDOWS\System32\shcore.dll
4 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_5.82.16299.431_none_d026bb
5 , C:\fwh32\samples\getError.exe
6 DDE Server Window, C:\WINDOWS\System32\ole32.dll
7 G, C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.16299.431_none_8e5ffdab0274414
Variables in use
================
Procedure Type Value
==========================
TCLIPGET:PUTMASK
Param 1: O Class: ERROR
TCLIPGET:UPDATEBUFFER
Param 1: C "Prezzo offerta (PR_OFF)"
Local 1: L .T.
Local 2: U
Local 3: C "zz/Pr/ o"
Local 4: C "@E"
Local 5: C "99.9999"
Local 6: U
Local 7: S
Local 8: O Class: TCLIPGET
Local 9: C "Prezzo offerta (PR_OFF)"
Local 10: N 0
Local 11: U
Local 12: U
(b)TGET
Local 1: S
Local 2: O Class: TCLIPGET
TGET:REFRESH
Param 1: O Class: TGET
SETTEXT
(b)MAIN
Param 1: O Class: TGET
TBUTTON:CLICK
Param 1: O Class: TBUTTON
TBUTTON:HANDLEEVENT
_FWH
Param 1: N 2048
Param 2: N 0
Param 3: N 0
Local 1: U
SENDMESSAGE
Param 1: N 0
Param 2: N 2048
Param 3: N 0
Param 4: N 0
Param 5: N 3
Local 1: O Class: TBUTTON
TDIALOG:COMMAND
Param 1: N 1052432
Param 2: N 2048
Param 3: N 0
Param 4: N 0
TWINDOW:HANDLEEVENT
Param 1: N 103
Param 2: N 1052432
Local 1: O Class: TBUTTON
Local 2: N 0
Local 3: N 103
Local 4: N 1052432
Local 5: U
TDIALOG:HANDLEEVENT
Param 1: N 273
Param 2: N 103
Param 3: N 1052432
DIALOGBOXINDIRECT
Param 1: N 273
Param 2: N 103
Param 3: N 1052432
TDIALOG:ACTIVATE
Param 1: N 14090240
Param 2: C "€ È€ Ÿ L € P $ e E D I T O t h e r G e t € P
d f E D I T 0 , 0 0 0 0 P $ + g B U T T O N & B u t t o n "
Param 3: N 0
Param 4: O Class: TDIALOG
MAIN
Param 1: U
Param 2: U
Param 3: U
Param 4: L .F.
Param 5: U
Param 6: L .T.
Param 7: B {|| ... }
Param 8: U
Param 9: U
Param 10: U
Param 11: U
Local 1: N 0
Local 2: S
Local 3: O Class: TDIALOG
Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFNTX
DataBases in use
================
Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TWINDOW
5 TDIALOG
6 TBRUSH
7 TCONTROL
8 TGET
9 GET
10 TCLIPGET
11 TBUTTON
12 TFONT
13 TREG32
14 TRECT
15 TSTRUCT
Memory Analysis
===============
374 Static variables
Dynamic memory consume:
Actual Value: 720896 bytes
Highest Value: 720896 bytes
Can someone help me?