Hola a todos.
Hace ya tiempo que no programo, y ahora me toca de nuevo, he comprado Harbour/(x)Harbour y me pongo a compilar un módulo en el que solo hay un menú, y despues de algunas vicisitudes con Verce para poder compilar, me arroja el siguiente error
Application
===========
Path and name: D:\clientes\REGEL2\REGELW\REGEL.Exe (32 bits)
Size: 375,808 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 04-11-2007, 11:39:30
Error description: Error BASE/1004 No exported method: NHEIGHT
Args:
[ 1] = U
Stack Calls
===========
Called from: => NHEIGHT(0)
Called from: D:\clientes\REGEL2\REGELW\geshinic.prg => (b)MAIN(69)
Called from: => TMDIFRAME:PAINT(0)
Called from: => TMDIFRAME:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(0)
Called from: => UPDATEWINDOW(0)
Called from: => TMDIFRAME:ACTIVATE(0)
Called from: D:\clientes\REGEL2\REGELW\geshinic.prg => MAIN(69)
System
======
CPU type: Intel(R) Celeron(R) CPU 2.80GHz 2683 Mhz
Hardware memory: 256 megs
Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %
Compiler version: Harbour devel build 1.1-1 Intl.
Windows version: 5.0, Build 2195 Service Pack 4
La línea que produce el error es esta
ACTIVATE WINDOW oWMain MAXIMIZED ;
ON PAINT PalBmpDraw( hDC, ;
( oWMain:nHeight() / 4 ) - ( oBmp:nHeight() / 4 ) - 50,;
( oWMain:nWidth() / 4 ) - ( oBmp:nWidth() / 4 ), oBmp:hBmpPal ) ;
ON INIT EscogeArea() ;
VALID MsgYesNo( "Realmente desea salir?","Elija" )
Esto funciona bien en Fivewin, pero parece que no en Harbour,
¿Alguna ayudita?
Gracias a todos
Pedro
No exported method: NHEIGHT
-
Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
-
Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: