TENDRE Q RETROCEDER A 16 BITS? POR TSBROWSE

TENDRE Q RETROCEDER A 16 BITS? POR TSBROWSE

Postby A&C » Fri Feb 02, 2007 1:50 pm

baje tsbr.. como indico ANTONIO LINARES,, pero nose si las .LIB no corresponden ya q al compilar me marca el siguiente error::

Error: Unresolved external '_hb_stack' referenced from C:\CLASSTERCEROS\SBX.LIB|Scroll

si es asi.. alguien las tiene que me las pueda mandar a mi Mail
zxzxzx@123mail.cl

o estoy haciendo algo mal

GRACIAS
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby Patricio Avalos Aguirre » Fri Feb 02, 2007 2:49 pm

Tienes que tener paciencia

Ya que el cambio es bastante traumatico jijii :-), y espera cuando te cambies de base de DATOS ( ya se ADS, SQL, MySql ) ...

Te envie un correo con la libreria..


Saludos

Patricio
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Postby A&C » Fri Feb 02, 2007 6:40 pm

Estimado Patricio

muchisimas gracias por la libreria q me enviaste,,

ejecute do.bat y se genero la LIB

la compile al mi programa,, con verce pero me arroja el siguiente error::

Error: Unresolved external '_HB_FUN_MENU_OLBX' referenced from C:\CLASSTERCEROS\SBROWSEH.LIB|TSBrowse
Error: Unresolved external '_HB_FUN_HB_ENUMINDEX' referenced from C:\CLASSTERCEROS\SBROWSEH.LIB|TSBrowse
Error: Unresolved external '_HB_FUN_ADSKEYNO' referenced from C:\CLASSTERCEROS\SBROWSEH.LIB|TSBrowse

analice el problema y se trata en TSbr... el prg se hace mencion a MENU_OLBX() es una funcion que no se encuentra al igual de las demas,, las busque en todos los PRGs q compile para generar la LIB y no estan ,,

ati te funciona bien la libreria,, porque con verce no me deja seguir si marca algun error
si sabes de q se trata y me puedes ayudar mas aun,, se agradece


ATTE. Claudio.
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby Patricio Avalos Aguirre » Fri Feb 02, 2007 6:49 pm

Code: Select all  Expand view  RUN
function Menu_oLbx( nRow, nCol, oLbx )
   local oMenu, oClp, cVar := ""

   if oLbx:ClassName = "TWBROWSE"
      cVar := cValtoChar( Eval( oLbx:bLine )[oLbx:nColAct] )
   elseif oLbx:ClassName = "TSBROWSE"
      cVar :=   Alltrim(cValToChar( EVal( oLbx:aColumns[ oLbx:nCell ]:bData ) ))
   endif

   DEFINE CLIPBOARD oClp OF oLbx FORMAT TEXT

   MENU oMenu POPUP
      MENUITEM "Copiar"  ACTION ;
                  iif( oClp:Open(), (;
                                       oClp:Clear(),;
                                       oClp:SetText( cVar ),;
                                       oClp:End(),;
                                       oMenu:End() ),;
                      MsgInfo( "El clipboard no esta habilitado por ahora", "Usuario" ) )

      MENUITEM "&Excel"              ACTION oLbx:toExcel()


      if oLbx:ClassName = "TSBROWSE"
         SEPARATOR
         MENUITEM "Excel &Versión 2.1"              ACTION oLbx:Excel2()
         SEPARATOR
      endif

      MENUITEM "&Imprimir"              ACTION oLbx:Report()

   ENDMENU

   ACTIVATE POPUP oMenu AT nRow, nCol-1 OF oLbx

return( .t. )


FUNCTION ADSKEYNO()
RETURN( OrdKeyNo() )

ENUMINDEX es un funcion de xHarbour



Saludos
Patricio
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Postby A&C » Fri Feb 02, 2007 8:11 pm

muchisimas gracias por tu ayuda amigo... ojala hubieran mas como tu


ENUMINDEX es un funcion de xHarbour


y como la incorporo a mi programa.. tu como lo hiciste


atte.. CLAUDIO
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby Patricio Avalos Aguirre » Fri Feb 02, 2007 8:41 pm

Compilando con xharbour...

La tsbrowse que te envie fueron cambiados todos los "for" por
"For EACH", y esta es una extension de xHarbour es mucho mas rapido que los for comunes

te envie por mail la tsbrowse.prg con los "for" normales

Saludos
Patricio
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Postby A&C » Sat Feb 03, 2007 2:35 am

Amigo una duda:: re ferente a compilar con xharbo..... lo hago con verce4.3 claro.. ,, referente a la TSbrowse.prg q me enviaste al correo,, la revise y igual hay "For EACH", eso es correcto q deban estar ahi


con la lib q genere y compilando con xharbour me da este error solamente


Error: Unresolved external '_HB_FUN_HB_ENUMINDEX' referenced from C:\CLASSTERCEROS\MSBROWSEH.LIB|TSBrowse

ya me dijiste q era una funcion de xharbourd pero ,, estoy compilando con xharb.... pq igual me aparece el error


Pd. disculpa las molestias

un agradecido

Atte. CLAUDIO
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby A&C » Sat Feb 03, 2007 12:54 pm

Amigo:: compile la tsbrowse.prg pero al momento de hacerlo la compilacion si bien se crea el .LIB,, me marca este error:

Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSCombo.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSMulti.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
ScrllBar.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
BtnDown.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\TSBFUNCS.C:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\SCROLL.C:
Warning W8070 ..\source\function\SCROLL.C 75: Function should return a value in
function HB_FUN_SETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 101: Function should return a value in
function HB_FUN_SETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 128: Function should return a value in
function HB_FUN_GETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 140: Function should return a value in
function HB_FUN_GETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 160: Function should return a value in
function HB_FUN_SETSCROLLINFO
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\GETBTN.C:
D:\TSBROW6\LIB>edit do.bat

D:\TSBROW6\LIB>do
El sistema no puede hallar el archivo especificado.
No se esperaba >> en este momento.
D:\TSBROW6\LIB>edit do.bat

D:\TSBROW6\LIB>do
No se encuentra D:\TSBROW6\LIB\*.lib
El sistema no puede hallar el archivo especificado.
No se esperaba >> en este momento.
D:\TSBROW6\LIB>edit do.bat

D:\TSBROW6\LIB>do
No se encuentra D:\TSBROW6\LIB\*.lib
El sistema no puede hallar el archivo especificado.
No se esperaba >> en este momento.
D:\TSBROW6\LIB>edit do.bat

D:\TSBROW6\LIB>do
No se encuentra D:\TSBROW6\LIB\*.lib
El sistema no puede hallar el archivo especificado.
Presione una tecla para continuar . . .
No se esperaba >> en este momento.
D:\TSBROW6\LIB>edit do.bat

D:\TSBROW6\LIB>do
No se encuentra D:\TSBROW6\LIB\*.lib
El sistema no puede hallar el archivo especificado.
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSBrowse.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
SBMsgSpa.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSColumn.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSBtnGet.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSGet.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSCombo.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSMulti.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
ScrllBar.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
BtnDown.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
RPreview.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TMetafil.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\TSBFUNCS.C:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\SCROLL.C:
Warning W8070 ..\source\function\SCROLL.C 75: Function should return a value in
function HB_FUN_SETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 101: Function should return a value in
function HB_FUN_SETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 128: Function should return a value in
function HB_FUN_GETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 140: Function should return a value in
function HB_FUN_GETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 160: Function should return a value in
function HB_FUN_SETSCROLLINFO
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\GETBTN.C:
D:\TSBROW6\LIB>lear
"lear" no se reconoce como un comando interno o externo,
programa o archivo por lotes ejecutable.

D:\TSBROW6\LIB>clear

D:\TSBROW6\LIB>for %i in (*.lib) do del %i

D:\TSBROW6\LIB>del SBrowseH.LIB

D:\TSBROW6\LIB>for %i in (*.obj) do del %i

D:\TSBROW6\LIB>for %i in (*.c) do del %i

D:\TSBROW6\LIB>for %i in (*.log) do del %i

D:\TSBROW6\LIB>del Lib.log

D:\TSBROW6\LIB>del log.log

D:\TSBROW6\LIB>for %i in (*.ppo) do del %i

D:\TSBROW6\LIB>for %i in (*.bak) do del %i

D:\TSBROW6\LIB>do
No se encuentra D:\TSBROW6\LIB\*.lib
No se encuentra D:\TSBROW6\LIB\*.log

//
El sistema no puede hallar el archivo especificado. /// este es el primero
//

Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSBrowse.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
SBMsgSpa.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSColumn.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSBtnGet.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSGet.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSCombo.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TSMulti.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
ScrllBar.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
BtnDown.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
RPreview.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TMetafil.c:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\TSBFUNCS.C:
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
/// aca los demas,,,, me arroja warning en scroll.c
..\source\function\SCROLL.C:
Warning W8070 ..\source\function\SCROLL.C 75: Function should return a value in
function HB_FUN_SETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 101: Function should return a value in
function HB_FUN_SETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 128: Function should return a value in
function HB_FUN_GETSCROLLRANGE
Warning W8070 ..\source\function\SCROLL.C 140: Function should return a value in
function HB_FUN_GETSCROLLPOS
Warning W8070 ..\source\function\SCROLL.C 160: Function should return a value in
function HB_FUN_SETSCROLLINFO
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
..\source\function\GETBTN.C:
D:\TSBROW6\LIB>

cuando la incorporo al programa ,, y la compilo con mi aplicacion con verce..

me da este error

Unrecoverable error 9000

"Program with 1st fun: TSBROWSE" was compiled by older version, PCODE version 0 is no longer supported - please recompile

QUE SERA...

No tienes la LIB ya compilada y el .CH ,, porque es todo lo q se necesita verdad---

Ojo.. Harb. y xHarb. no son lo mismo,, ya q compilo con xharbour

GRACIAS
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby A&C » Sat Feb 03, 2007 8:45 pm

....
Mi segundo amor es Programar
User avatar
A&C
 
Posts: 214
Joined: Sat Aug 19, 2006 1:37 pm
Location: Chile

Postby Antonio Linares » Sat Feb 03, 2007 9:39 pm

Tienes que recompilar TSBrowse con el xharbour que estás usando
regards, saludos

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


Return to FiveWin para Harbour/xHarbour

Who is online

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