Error TWindow:HadleEvent

Error TWindow:HadleEvent

Postby jicorral » Mon Jul 14, 2008 2:21 pm

I'm novice. I'm getting an error. It's my first time with Harbour. Any clue? Does anybody can help me?

Error BASE/1004 Message not found: TWINDOW:HANDLEEVENT from Errorsys, line: 0

I'm getting the error in rumtime doing:

Code: Select all  Expand view  RUN
DEFINE WINDOW oWnd TITLE "Fichero: " + oScan:cFile FROM 1,1 TO 500,650 PIXEL


o

Code: Select all  Expand view  RUN
oWnd := TWindow():new( 1, 1, 500, 650, "kk"



And the error.log file is:

Code: Select all  Expand view  RUN
Application
===========
   Path and name: D:\Pruebas\Escaner\Escanea.exe (32 bits)
   Size: 1,108,992 bytes
   Time from start: 0 hours 0 mins 0 secs
   Error occurred at: 07/14/08, 16:09:13
   Error description: Error BASE/1004  Message not found: TWINDOW:HANDLEEVENT
   Args:
     [   1] = O   Object

Stack Calls
===========
   Called from:  => __ERRRT_SBASE(0)
   Called from:  => TWINDOW:ERROR(172)
   Called from: source\rtl\tobject.prg => (b)HBOBJECT(103)
   Called from:  => TWINDOW:MSGNOTFOUND(0)
   Called from:  => TWINDOW:HANDLEEVENT(162)
   Called from:  => _FWH(0)
   Called from:  => SENDMESSAGE(0)
   Called from:  => TWINDOW:GETFONT(0)
   Called from:  => TWINDOW:NEW(0)
   Called from: Escanea.prg => MAIN(72)

System
======
   CPU type: Intel(R) Core(TM)2 CPU          6320  @ 1.86GHz 1866 Mhz
   Hardware memory: 1024 megs

   Free System resources: 90 %
        GDI    resources: 90 %
        User   resources: 90 %

   Compiler version: Harbour devel build 1.1-1 Intl.
   Windows version: 5.1, Build 2600 Service Pack 3

   Windows total applications running: 0

Variables in use
================
   Procedure     Type   Value
   ==========================
   __ERRRT_SBASE
     Param   1:    N    13
     Param   2:    N    1004
     Param   3:    C    "Message not found"
     Param   4:    C    "TWINDOW:HANDLEEVENT"
     Param   5:    N    1
     Param   6:    O    Class: TWINDOW
     Local   1:    U   
   TWINDOW:ERROR
     Param   1:    C    "Message not found"
     Param   2:    C    "TWINDOW"
     Param   3:    C    "HANDLEEVENT"
     Param   4:    N    1004
   (b)HBOBJECT
     Param   1:    O    Class: TWINDOW
     Param   2:    C    "HANDLEEVENT"
     Param   3:    N    49
     Param   4:    N    0
     Param   5:    N    0
   TWINDOW:MSGNOTFOUND
     Param   1:    C    "HANDLEEVENT"
     Param   2:    N    49
     Param   3:    N    0
     Param   4:    N    0
   TWINDOW:HANDLEEVENT
     Param   1:    N    49
     Param   2:    N    0
     Param   3:    N    0
   _FWH
     Param   1:    N    0
     Param   2:    N    49
     Param   3:    N    0
     Param   4:    N    0
     Param   5:    N    1
     Local   1:    O    Class: TWINDOW
   SENDMESSAGE
     Param   1:    N    1705320
     Param   2:    N    49
   TWINDOW:GETFONT
     Local   1:    O    Class: TWINDOW
     Local   2:    U   
     Local   3:    U   
     Local   4:    U   
   TWINDOW:NEW
     Param   1:    N    1
     Param   2:    N    1
     Param   3:    N    500
     Param   4:    N    650
     Param   5:    C    "kk"
     Local   1:    N    47120384
     Local   2:    U   
     Local   3:    U   
     Local   4:    U   
     Local   5:    U   
     Local   6:    L    .F.
     Local   7:    L    .F.
     Local   8:    N    16777215
     Local   9:    N    16777215
     Local  10:    U   
     Local  11:    C    "SINGLE"
     Local  12:    L    .T.
     Local  13:    L    .T.
     Local  14:    L    .T.
     Local  15:    L    .T.
     Local  16:    L    .F.
     Local  17:    O    Class: TWINDOW
   MAIN
     Param   1:    C    "kk1.jpg"
     Param   2:    N    1
     Param   3:    L    .F.
     Param   4:    L    .T.
     Local   1:    U   
     Local   2:    U   
     Local   3:    U   
     Local   4:    O    Class: TFONT
     Local   5:    U   
     Local   6:    U   
     Local   7:    U   
     Local   8:    U   
     Local   9:    C    "1-Scale Gray"
     Local  10:    A    Len:    3
     Local  11:    A    Len:    6
     Local  12:    C    "0-Dpi"

Linked RDDs
===========
   DBF
   DBFFPT
   DBFBLOB
   DBFNTX

DataBases in use
================

Classes in use:
===============
     1 ERROR
     2 HBCLASS
     3 HBOBJECT
     4 TSCAN32
     5 TFONT
     6 TWINDOW
     7 TBRUSH
     8 TREG32

Memory Analysis
===============
      105 Static variables

   Dynamic memory consume:
      Actual  Value:          0 bytes
      Highest Value:          0 bytes
User avatar
jicorral
 
Posts: 47
Joined: Thu Jul 10, 2008 7:33 am

Postby James Bott » Mon Jul 14, 2008 4:04 pm

Can you run this without an error?

Code: Select all  Expand view  RUN
#include "fivewin.ch"

function main()
   local oWnd
   define window oWnd
   activate window oWnd
return nil


Have you ever compiled and run a FWH/Harbour program successfully?

Regards,
James
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA

Postby Antonio Linares » Mon Jul 14, 2008 4:59 pm

This code works fine here:
Code: Select all  Expand view  RUN
#include "FiveWin.ch"

function Main()

   local oWnd

   oWnd := TWindow():New( 1, 1, 500, 650, "ok" )

   ACTIVATE WINDOW oWnd

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42107
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby jicorral » Tue Jul 15, 2008 7:17 am

No. The problem is fivewin version. I was compiling with 2.7, the error gone with 7.09. Thx.

James Bott wrote:Can you run this without an error?

Code: Select all  Expand view  RUN
#include "fivewin.ch"

function main()
   local oWnd
   define window oWnd
   activate window oWnd
return nil


Have you ever compiled and run a FWH/Harbour program successfully?

Regards,
James
User avatar
jicorral
 
Posts: 47
Joined: Thu Jul 10, 2008 7:33 am


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 74 guests