Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Fri Jan 02, 2015 7:01 pm
by FranciscoA
Error: Unresolved external '_HB_FUN_MIFUN' referenced from c:\fwh\samples\gfl.obj
Esto indica que el linker no encuentra la function MiFun() porque está en otro .prg que no enlazas.
Por favor muestra como lo enlazas: usando rmake, o si usas otra herramienta (por ej. VerCe)
Saludos
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 12:13 am
by willy1701
Hola, necesitaria si alguien tiene y me puede pasar un ejemplo de como usar TXBrowse desde recurso con bases de datos, ya que no consigo hacer que funcione, estoy usando fwh 6.12 desde ya muchas gracias. Mi correo es
guillefernandoluis@yahoo.com.ar.-
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 12:29 am
by cnavarro
Puedes poner el codigo que no te funciona?
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 11:44 am
by willy1701
#include "FiveWin.ch"
#include "XBrowse.ch"
//-----------------------------------------------------------------------------------------------------------------
function MiBrowse()
local oDlg, oBrw, oWnd, oCol
SET RESOURCES TO "Mio.dll"
ErrorBlock( { | o | MsgInfo( o:Description ) } )
USE DATOS\Cli ALIAS Cli
DEFINE WINDOW oWnd FROM 2, 2 TO 25, 80
DEFINE DIALOG oDlg RESOURCE "Listado"
oBrw := TXBrowse() :New( oWnd )
oBrw:nColDividerStyle := LINESTYLE_INSET
oBrw:nRowDividerStyle := LINESTYLE_INSET
oBrw:lColDividerComplete := .T.
oBrw:nMarqueeStyle := MARQSTYLE_HIGHCELL
oCol = oBrw:AddCol()
oCol:bStrData = { || Cli->CLIENTE }
oCol:cHeader = "CLIENTES"
oCol:nEditType = 0
oBrw:oClient := oBrw
oBrw:CreateFromResource( 101 )
ACTIVATE DIALOG oDlg CENTER
ACTIVATE WINDOW oWnd MAXIMIZED
return nil
//-------------------------------------------------------------------------------------------
Aclaracion: Es la primera vez que utilizo esta clase, siempre use el tcbrowse de fivewin 2.3 y nunca tuve problemas, usaba el resource workshop, ahora estoy utilizando el resource builder.
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 12:16 pm
by willy1701
Hola Critobal, ya lo probe y no funciona. No me da ningun error, cuando se esta ejecutando me muestra el browse pero esta vacio sin nada!!.
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 1:42 pm
by cnavarro
Prueba con
- Code: Select all Expand view
oBrw:cAlias := "Cli"
Aunque te aconsejaria que para empezar utilizaras el comando y no la funcion
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Thu Jan 15, 2015 2:05 pm
by willy1701
Cristobal, sigue igual no me muestra lo que tiene la base
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Fri Jan 16, 2015 5:26 am
by Antonio Linares
Guillermo,
la versión 6.12 es muy antigua.
La versión actual es la 14.12
Imáginate la de años que han pasado (ocho) y la de cambios y mejoras que se han hecho
![Smile :-)](./images/smilies/icon_smile.gif)
Re: Necesito Ayuda!!!!!
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jan 17, 2015 3:01 pm
by FranciscoA
Guillermo.
Intenta cambiando esto:
- Code: Select all Expand view
oBrw := TXBrowse() :New( oWnd )
Por esto;
- Code: Select all Expand view
oBrw := TXBrowse() :New( oDlg )
Cambia esto:
- Code: Select all Expand view
oBrw:oClient := oBrw
por esto:
- Code: Select all Expand view
oDlg:oClient := oBrw
Saludos.
PD: oBrw:nMarqueeStyle := MARQSTYLE_HIGHCELL //En la Ver. 1204 es: MARQSTYLE_HIGHLCELL