Enlazar fichero XSCRLL.C del GRID de CanalFive

RPATON · Post by **RPATON** » Mon Dec 04, 2006 6:39 pm

¿Cómo puedo solucionar este error:
Error: Unresolved external '_HB_FUN_XHSCRLL' referenced from C:\RICARDO\HWINAGE\OBJ\GRID.OBJ al enlazar el fichero XSCRLL.C de la librería GRID de CanalFive ?

#include <WinTen.h>
#include <Windows.h>
#include <ClipApi.h>

CLIPPER xVScrll() // ( hWnd, wRows, nHRow, nRows, lHeader, nHeader )
{
HWND hWnd = _parni( 1 );
WORD wRows = _parni( 2 );
int nHRow = _parni( 3 );
int nRows = _parni( 4 );
HDC hDC = GetDC( hWnd );
RECT rct;
BOOL bHeader = _parl( 5 );
WORD nHeader = _parni( 6 );

GetClientRect( hWnd, &rct );

if ( bHeader )
rct.top = nHeader + 1;
rct.bottom = ( nHRow * nRows ) - 1;
ScrollWindowEx( hWnd, 0, -( nHRow * wRows ), 0, &rct, 0, 0, 0 );
ReleaseDC( hWnd, hDC );
}

//----------------------------------------------------------------------------//

CLIPPER xHScrll() // ( hWnd, nCols, nLeft, nRight )
{
HWND hWnd = _parni( 1 );
WORD wCols = _parni( 2 );
int nLeft = _parni( 3 );
int nRight = _parni( 4 );
HDC hDC = GetDC( hWnd );
RECT rct;

GetClientRect( hWnd, &rct );

if ( nLeft ) {
rct.left = nLeft;
}

if ( nRight ) {
rct.right = nRight;
}

ScrollWindowEx( hWnd, wCols, 0, 0, &rct, 0, 0, 0 );

ReleaseDC( hWnd, hDC );
}

//----------------------------------------------------------------------------//

Taiwan · Post by **Taiwan** » Tue Dec 05, 2006 2:14 am

Hello

I have C5 Grid full source code.
How do I help you?

Richard

RPATON · Post by **RPATON** » Tue Dec 05, 2006 4:17 pm

Hello:

Connect file XSCRLL.C in VERGE and it appears to me the following error. How I can cause that these necessary functions for the GRID of CanalFive are recognized?

Compilado y Enlazado de: [C:\RICARDO\HWINAGE\HWINAGE.Exe]
Ejecución No. 1
Ejecutada a las: 17:16:19
============================================================
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_XVSCRLL' referenced from C:\RICARDO\HWINAGE\OBJ\GRID.OBJ
Error: Unresolved external '_HB_FUN_XHSCRLL' referenced from C:\RICARDO\HWINAGE\OBJ\GRID.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRD.OBJ and C:\RICARDO\HWINAGE\OBJ\VRDINI.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRD.OBJ and C:\RICARDO\HWINAGE\OBJ\OTROS.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRDINI.OBJ and C:\RICARDO\HWINAGE\OBJ\OTROS.OBJ
Fin del proceso.
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland
** error 2 ** deleting C:\RICARDO\HWINAGE\HWINAGE.exe
Ha habido ERRORES al intentar Generar la Aplicacion
============================================================
VERCE v4.3 -> Ver Resultados de Compilación y Enlazado v4.3
Juan Carlos Salinas Ojeda
jcso@hotmail.com, jcso@esm.com.mx
Minatitlán, Veracruz. MEXICO
Y Solo Veracruz es bello !!!
FiveWin for Harbour!!

Thank you very much.

wmormar · Post by **wmormar** » Tue Dec 05, 2006 6:23 pm

RPATON wrote:Hello:

Connect file XSCRLL.C in VERGE and it appears to me the following error. How I can cause that these necessary functions for the GRID of CanalFive are recognized?

Compilado y Enlazado de: [C:\RICARDO\HWINAGE\HWINAGE.Exe]
Ejecución No. 1
Ejecutada a las: 17:16:19
============================================================
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_XVSCRLL' referenced from C:\RICARDO\HWINAGE\OBJ\GRID.OBJ
Error: Unresolved external '_HB_FUN_XHSCRLL' referenced from C:\RICARDO\HWINAGE\OBJ\GRID.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRD.OBJ and C:\RICARDO\HWINAGE\OBJ\VRDINI.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRD.OBJ and C:\RICARDO\HWINAGE\OBJ\OTROS.OBJ
Warning: Public symbol '_HB_FUN_GETPPSECTION' defined in both module C:\RICARDO\HWINAGE\OBJ\VRDINI.OBJ and C:\RICARDO\HWINAGE\OBJ\OTROS.OBJ
Fin del proceso.
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland
** error 2 ** deleting C:\RICARDO\HWINAGE\HWINAGE.exe
Ha habido ERRORES al intentar Generar la Aplicacion
============================================================
VERCE v4.3 -> Ver Resultados de Compilación y Enlazado v4.3
Juan Carlos Salinas Ojeda
jcso@hotmail.com, jcso@esm.com.mx
Minatitlán, Veracruz. MEXICO
Y Solo Veracruz es bello !!!
FiveWin for Harbour!!

Thank you very much.

Hola.

El archivo .C es para Clipper y tu necesitas uno para 32 bits, posiblemente ahi esté el problema.

Saludos

Silvio · Post by **Silvio** » Wed Dec 06, 2006 12:25 am

i HAVE CONVERTE THE GRID AND BANNER CLASS OF CANALFIVE INTO 32 BIT AND THEY RUN OK

Silvio · Post by **Silvio** » Wed Dec 06, 2006 12:53 am

YOU MUST CHANGE XSCROLL.C,GRID.PRG.FOOT.PRG,HEADER.PRG,COLUMNA.PRG AND THEN THE OTHER C FILES....
IT'S EASY..

REMEBER IN XHARBOUR THERE IS
hB_PARNI(?)

BUT i SAW PACO TRYING TO CREATE A NEW CONTROL GRID2 BIT .. YOU MUST ONLY WAIT ....

RPATON · Post by **RPATON** » Wed Dec 06, 2006 9:01 pm

Thanks. Solved the XSCRLL.C of this form: Another problem:

#pragma BEGINDUMP
#include <windows.h>
#include "hbapi.h"
HB_FUNC( XVSCRLL )
{
HWND hWnd = hb_parni( 1 );
WORD wRows = hb_parni( 2 );
int nHRow = hb_parni( 3 );
int nRows = hb_parni( 4 );
HDC hDC = GetDC( hWnd );
RECT rct;
BOOL bHeader = hb_parl( 5 );
WORD nHeader = hb_parni( 6 );
GetClientRect( hWnd, &rct );
if ( bHeader )
rct.top = nHeader + 1;
rct.bottom = ( nHRow * nRows ) - 1;
ScrollWindowEx( hWnd, 0, -( nHRow * wRows ), 0, &rct, 0, 0, 0 );
ReleaseDC( hWnd, hDC );
}
HB_FUNC( XHSCRLL )
{
HWND hWnd = hb_parni( 1 );
WORD wCols = hb_parni( 2 );
int nLeft = hb_parni( 3 );
int nRight = hb_parni( 4 );
HDC hDC = GetDC( hWnd );
RECT rct;
GetClientRect( hWnd, &rct );
if ( nLeft ) {
rct.left = nLeft;
}
if ( nRight ) {
rct.right = nRight;
}
ScrollWindowEx( hWnd, wCols, 0, 0, &rct, 0, 0, 0 );
ReleaseDC( hWnd, hDC );
}
#pragma ENDDUMP
Another problem: I have the following error. To that it must?Application
===========
Path and name: C:\RICARDO\HWINAGE\HWINAGE.Exe (32 bits)
Size: 3,069,952 bytes
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 06/12/2006, 21:53:06
Error description: Error BASE/1004 Class: NIL has no exported method: ATITLES Args:

Stack Calls
===========
Called from ATITLES(0)
Called from TGRID:ADDCOLUMN(756)
Called from TCOLGRID:NEW(170)
Called from ARTICULOS(64)
Called from (b)MAIN(137)
Called from TBTNBMP:CLICK(0)
Called from TWINDOW:LBUTTONUP(0)
Called from TWINDOW:HANDLEEVENT(0)
Called from TWINDOW:HANDLEEVENT(0)
Called from _FWH(0)
Called from WINRUN(0)
Called from TWINDOW:ACTIVATE(0)
Called from MAIN(180)

System
======
CPU type: Intel(R) Pentium(R) 4 CPU 3.00GHz 3000 Mhz
Hardware memory: 1024 megs

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

Compiler version: Harbour Alpha build 45.0 Intl. (Flex)
Windows version: 5.1, Build 2600 Service Pack 2

Windows total applications running: 22
1 M
2 Default IME
3 CiceroUIWndFrame
4 TF_FloatingLangBar_WndTitle
5 WIN AGENTES 8.105 - Empresa:CABALLERO S.C. Ejercicio:2006
6 VERCE v4.3, C:\ricardo\HWINAGE\HWINAGE.VRC - [Ejecución No. 29]
7 Símbolo del sistema
8 Windows Defender
9 Connections Tray
10 Medidor de energía
11 DIEmWin
12 MS_WebcheckMonitor
13 keyboard
14 ATI Tray Icon Application
15 mouse
16 ATI video bios poller client
17 TmPfw
18 Trend Micro PC-cillin Internet Security 14
19 _CLS_PCCGuide
20 GDI+ Window
21 SysFader
22 Program Manager

Variables in use
================
Procedure Type Value
==========================
ATITLES
Local 1: U
Local 2: N 0
TGRID:ADDCOLUMN
Param 1: O Class: TCOLGRID
Local 1: O Class: TGRID
Local 2: U
Local 3: U
Local 4: U
Local 5: N 2
Local 6: N 2
Local 7: N 1
Local 8: N 1
Local 9: N 1
Local 10: N 2
Local 11: U
Local 12: U
Local 13: U
Local 14: O Class: TGRID
Local 15: N 1
Local 16: N 0
Local 17: U
Local 18: C ""
TCOLGRID:NEW
Param 1: C "art->codigo"
Param 2: U
Param 3: N 80
Param 4: U
Param 5: O Class: TGRID
Param 6: O Class: TFONT
Param 7: N 12632256
Param 8: N 0
Param 9: U
Param 10: U
Param 11: U
Param 12: C "LEFT"
Param 13: U
Param 14: U
Param 15: C "CENTER"
Param 16: L .F.
Param 17: B {|| ... }
Param 18: B {|| ... }
Param 19: C "Valor no valido"
Param 20: C "Valor no valido"
Param 21: U
Param 22: U
Param 23: L .F.
Param 24: U
Param 25: L .F.
Param 26: L .F.
Param 27: U
Param 28: B {|| ... }
Local 1: O Class: TCOLGRID
Local 2: U
Local 3: U
ARTICULOS
Local 1: U
Local 2: O Class: TMDICHILD
Local 3: O Class: TGRID
Local 4: U
Local 5: U
Local 6: U
Local 7: U
Local 8: U
Local 9: U
Local 10: U
Local 11: U
Local 12: U
Local 13: U
Local 14: U
Local 15: U
Local 16: U
Local 17: U
Local 18: U
Local 19: U
Local 20: U
Local 21: U
Local 22: U
Local 23: U
Local 24: U
Local 25: U
Local 26: U
Local 27: U
Local 28: O Class: TDATABASE
Local 29: U
Local 30: C " "
Local 31: O Class: TPANEL
Local 32: O Class: TTABS
Local 33: U
(b)MAIN

Silvio · Post by **Silvio** » Wed Dec 06, 2006 9:11 pm

can you send me the sample test for it .please ?

Silvio · Post by **Silvio** » Wed Dec 06, 2006 9:14 pm

you must compile also theader class of grid....

RPATON · Post by **RPATON** » Thu Dec 07, 2006 3:06 pm

I have sent you file ART_.PRG where I use class GRID.

Best regards,

Ricardo Patón

Silvio · Post by **Silvio** » Thu Dec 07, 2006 8:58 pm

good I 'm seeing it

RPATON · Post by **RPATON** » Fri Dec 08, 2006 6:58 pm

I believe that the error was the HEADER.PRG
I have changed “RETURN nil” by “RETURN self” and now if it works.

Thanks for everything.

[img]http://c:\header.jpg[/img]

jnavas · Post by **jnavas** » Sat Dec 16, 2006 4:05 am

RPATON,

Puedes enviarme algunos ejemplos por ventas@datapronet.com?

RPATON wrote:I believe that the error was the HEADER.PRG
I have changed “RETURN nil” by “RETURN self” and now if it works.

Thanks for everything.

[img]http://c:\header.jpg[/img]