Enlazar pantalla con .rc sin dll en el exe

Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Fri Oct 21, 2016 3:08 pm

Hola foro
No se si estoy haciendo bien pero quiero enlazar test.rc al exe sin la presencia del dll, es decir evitar poner en prg las lineas:
SET RESOURCES TO cPathEXE+"\Test.dll"
BWCCRegister( GetResources( ) )


al llamar a esta funcion se cuelga en esta linea y obviamente mi archivo test.rc si esta en la misma ubicacion que mi prg.

Code: Select all  Expand view
STATIC FUNCTION NewDialog( oWnd )

   local oDlg, oBrw

   DEFINE DIALOG oDlg RESOURCE "TEST" OF oWnd   //aqui se cuelga

   oBrw := TXBrowse():New( oWnd )

   REDEFINE XBROWSE oBrw ID 101  ;
      HEADERS "An array", "test" ;
      OF oDlg ;
      ARRAY { { "first", "row" }, { "second", "row" } } AUTOCOLS ;
      COLORS CLR_WHITE, CLR_BLUE


   ACTIVATE DIALOG oDlg ;
     ON INIT ( oBrw:SetColor( CLR_WHITE, CLR_BLUE ) )

RETURN NIL
 




Aqui mi archivo test.mak que se compila bien pero que al ejecutarlo se cuelga por la falta del dialogo test
Code: Select all  Expand view

#Borland make sample, (c) FiveTech Software 2005-2009

HBDIR=c:\131\harbour
BCDIR=c:\131\bcc582
FWDIR=c:\131\fwh

#change these paths as needed
.path.OBJ = .\obj
.path.PRG = .\
.path.CH  = $(FWDIR)\include;$(HBDIR)\include
.path.C   = .\
.path.rc  = .\

#important: Use Uppercase for filenames extensions, in the next two rules!

PRG =        \
testxbrw.PRG

PROJECT    : Testxbrw.exe

Testxbrw.exe  : $(PRG:.PRG=.OBJ) $(C:.C=.OBJ) Alert.res   ==>este archivo no deberia de llamarse igual que el rc?
   echo off
   echo $(BCDIR)\lib\c0w32.obj + > b32.bc
   echo obj\testxbrw.obj , + >> b32.bc
   echo testxbrw.exe, + >> b32.bc
   echo testxbrw.map, + >> b32.bc
   echo $(FWDIR)\lib\FiveH.lib $(FWDIR)\lib\FiveHC.lib + >> b32.bc
   echo $(HBDIR)\lib\hbrtl.lib + >> b32.bc
   echo $(HBDIR)\lib\hbvm.lib + >> b32.bc
   echo $(HBDIR)\lib\gtgui.lib + >> b32.bc
   echo $(HBDIR)\lib\hblang.lib + >> b32.bc
   echo $(HBDIR)\lib\hbmacro.lib + >> b32.bc
   echo $(HBDIR)\lib\hbrdd.lib + >> b32.bc
   echo $(HBDIR)\lib\rddntx.lib + >> b32.bc
   echo $(HBDIR)\lib\rddcdx.lib + >> b32.bc
   echo $(HBDIR)\lib\rddfpt.lib + >> b32.bc
   echo $(HBDIR)\lib\hbsix.lib + >> b32.bc
   echo $(HBDIR)\lib\hbdebug.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcommon.lib + >> b32.bc
   echo $(HBDIR)\lib\hbpp.lib + >> b32.bc
   echo $(HBDIR)\lib\hbwin.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcpage.lib + >> b32.bc
   echo $(HBDIR)\lib\hbct.lib + >> b32.bc
   echo $(HBDIR)\lib\xhb.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcplr.lib + >> b32.bc
   echo $(HBDIR)\lib\hbpcre.lib + >> b32.bc


   rem Uncomment these two lines to use Advantage RDD
   rem echo $(HBDIR)\lib\rddads.lib + >> b32.bc
   rem echo $(HBDIR)\lib\Ace32.lib + >> b32.bc

   echo $(BCDIR)\lib\cw32.lib + >> b32.bc
   echo $(BCDIR)\lib\import32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\odbc32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\nddeapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\iphlpapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\msimg32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\psapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\rasapi32.lib, >> b32.bc

   IF EXIST Alert.res echo Alert.res >> b32.bc
   $(BCDIR)\bin\ilink32 -Gn -aa -Tpe -s @b32.bc >log-prg.txt
   del b32.bc

.PRG.OBJ:
  $(HBDIR)\bin\harbour $< /L /N /W /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include >log-prg.txt
  $(BCDIR)\bin\bcc32 -c -tWM -I$(HBDIR)\include -oobj\$& obj\$&.c

.C.OBJ:
  echo -c -tWM -D__HARBOUR__ -DHB_API_MACROS > tmp
  echo -I$(HBDIR)\include;$(FWDIR)\include >> tmp
  $(BCDIR)\bin\bcc32 -oobj\$& @tmp $&.c
  del tmp

Alert.res : Testxbrw.rc
  $(BCDIR)\bin\brc32.exe -r Testxbrw.rc
 
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby Antonio Linares » Fri Oct 21, 2016 7:45 pm

Modifica estas dos lineas en el fichero test.mak:

# IF EXIST Alert.res echo Alert.res >> b32.bc

IF EXIST Testxbrw.res echo Testxbrw.res >> b32.bc

...

# Alert.res : Testxbrw.rc

Testxbrw.res : Testxbrw.rc
regards, saludos

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

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Fri Oct 21, 2016 9:29 pm

Gracias Antonio voy a probar
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Sun Oct 23, 2016 8:09 pm

Hola Antonio sigo con el mismo problema que no encuentra el dialogo

Image
Codigo THUMBNAIL HTML:

Code: Select all  Expand view

#Borland make sample, (c) FiveTech Software 2005-2009

HBDIR=c:\131\harbour
BCDIR=c:\131\bcc582
FWDIR=c:\131\fwh

#change these paths as needed
.path.OBJ = .\obj
.path.PRG = .\
.path.CH  = $(FWDIR)\include;$(HBDIR)\include
.path.C   = .\
.path.rc  = .\

#important: Use Uppercase for filenames extensions, in the next two rules!

PRG =        \
testxbrw.PRG

PROJECT    : Testxbrw.exe

Testxbrw.exe  : $(PRG:.PRG=.OBJ) $(C:.C=.OBJ) Alert.res
   echo off
   echo $(BCDIR)\lib\c0w32.obj + > b32.bc
   echo obj\testxbrw.obj , + >> b32.bc
   echo testxbrw.exe, + >> b32.bc
   echo testxbrw.map, + >> b32.bc
   echo $(FWDIR)\lib\FiveH.lib $(FWDIR)\lib\FiveHC.lib + >> b32.bc
   echo $(HBDIR)\lib\hbrtl.lib + >> b32.bc
   echo $(HBDIR)\lib\hbvm.lib + >> b32.bc
   echo $(HBDIR)\lib\gtgui.lib + >> b32.bc
   echo $(HBDIR)\lib\hblang.lib + >> b32.bc
   echo $(HBDIR)\lib\hbmacro.lib + >> b32.bc
   echo $(HBDIR)\lib\hbrdd.lib + >> b32.bc
   echo $(HBDIR)\lib\rddntx.lib + >> b32.bc
   echo $(HBDIR)\lib\rddcdx.lib + >> b32.bc
   echo $(HBDIR)\lib\rddfpt.lib + >> b32.bc
   echo $(HBDIR)\lib\hbsix.lib + >> b32.bc
   echo $(HBDIR)\lib\hbdebug.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcommon.lib + >> b32.bc
   echo $(HBDIR)\lib\hbpp.lib + >> b32.bc
   echo $(HBDIR)\lib\hbwin.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcpage.lib + >> b32.bc
   echo $(HBDIR)\lib\hbct.lib + >> b32.bc
   echo $(HBDIR)\lib\xhb.lib + >> b32.bc
   echo $(HBDIR)\lib\hbcplr.lib + >> b32.bc
   echo $(HBDIR)\lib\hbpcre.lib + >> b32.bc


   rem Uncomment these two lines to use Advantage RDD
   rem echo $(HBDIR)\lib\rddads.lib + >> b32.bc
   rem echo $(HBDIR)\lib\Ace32.lib + >> b32.bc

   echo $(BCDIR)\lib\cw32.lib + >> b32.bc
   echo $(BCDIR)\lib\import32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\odbc32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\nddeapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\iphlpapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\msimg32.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\psapi.lib + >> b32.bc
   echo $(BCDIR)\lib\psdk\rasapi32.lib, >> b32.bc

   IF EXIST Testxbrw.res echo Testxbrw.res >> b32.bc
   $(BCDIR)\bin\ilink32 -Gn -aa -Tpe -s @b32.bc >log-prg.txt
   del b32.bc

.PRG.OBJ:
  $(HBDIR)\bin\harbour $< /L /N /W /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include >log-prg.txt
  $(BCDIR)\bin\bcc32 -c -tWM -I$(HBDIR)\include -oobj\$& obj\$&.c

.C.OBJ:
  echo -c -tWM -D__HARBOUR__ -DHB_API_MACROS > tmp
  echo -I$(HBDIR)\include;$(FWDIR)\include >> tmp
  $(BCDIR)\bin\bcc32 -oobj\$& @tmp $&.c
  del tmp

Testxbrw.res : Testxbrw.rc
  $(BCDIR)\bin\brc32.exe -r Testxbrw.rc

 
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby Antonio Linares » Sun Oct 23, 2016 8:40 pm

Abre con Pelles tu EXE y comprueba si los recursos están dentro de él

Se crea el fichero Testxbrw.res ?
regards, saludos

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

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Mon Oct 24, 2016 5:04 am

Efectivamente Antonio no existe el recurso dentro de mi Exe ni tampoco se crea el fichero Testxbrw.res
que estoy haciendo mal?
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby Antonio Linares » Mon Oct 24, 2016 6:18 am

Intenta compilar tu fichero RC y comprueba que errores te da:

$(BCDIR)\bin\brc32.exe -r Testxbrw.rc
regards, saludos

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

Re: Enlazar pantalla con .rc sin dll en el exe

Postby karinha » Mon Oct 24, 2016 1:44 pm

Con fwhx16.08 - BUILDH Testxbrw.prg, está perfecto:

Image

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7214
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Mon Oct 24, 2016 2:00 pm

Antonio
esto lo que me sale
Image
Codigo THUMBNAIL HTML:
He verificado que los mapeos de la carpeta bcc582 son correctos
Code: Select all  Expand view

BCC32.CFG
-I"c:\131\bcc582\include;c:\131\bcc582\include\dinkumware"
-L"c:\131\bcc582\lib"

ILINK32.CFG
-L"c:\131\bcc582\lib"

TLINK32.CFG
/Lc:\131\bcc582\lib

 
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby karinha » Mon Oct 24, 2016 2:05 pm

Code: Select all  Expand view

//-> #include "..\include\WinApi.ch"

TEST DIALOG 6, 15, 306, 227
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "TXBrowse demo"
FONT 8, "MS Sans Serif"
{
 DEFPUSHBUTTON "OK", IDOK, 252, 211, 50, 14
 CONTROL "", 101, "TXBrowse", 0 | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP, 4, 5, 297, 202
}

CLIP BITMAP "../bitmaps/clip.bmp"
STAR BITMAP "../bitmaps/16x16/favorite.bmp"
GREEN BITMAP "../bitmaps/green.bmp"
RED BITMAP "../bitmaps/red.bmp"
BACKGROUND BITMAP "../bitmaps/fiveback.bmp"
 


João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7214
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Mon Oct 24, 2016 2:08 pm

karinha wrote:Con fwhx16.08 - BUILDH Testxbrw.prg, está perfecto:

Image

Saludos.

Image
Karina aqui es donde se me produce el error
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby karinha » Mon Oct 24, 2016 2:15 pm

Perfecto con FWHX16.08 que alias, está marabilloso, jejejejejejejejejejeje.

Image

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7214
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Enlazar pantalla con .rc sin dll en el exe

Postby artu01 » Mon Oct 24, 2016 2:16 pm

Listo, funciono!!! Gracias Karina
quedo asi

Code: Select all  Expand view

//#include "..\include\WinApi.ch"

TEST DIALOG 6, 15, 306, 227
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "TXBrowse demo"
FONT 8, "MS Sans Serif"
{
 DEFPUSHBUTTON "OK", IDOK, 252, 211, 50, 14
 CONTROL "", 101, "TXBrowse", 0 | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP, 4, 5, 297, 202
}

//CLIP BITMAP "../bitmaps/clip.bmp"
//STAR BITMAP "../bitmaps/16x16/favorite.bmp"
//GREEN BITMAP "../bitmaps/green.bmp"
//RED BITMAP "../bitmaps/red.bmp"
//BACKGROUND BITMAP "../bitmaps/fiveback.bmp"
 
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
artu01
 
Posts: 397
Joined: Fri May 11, 2007 8:20 pm
Location: Lima

Re: Enlazar pantalla con .rc sin dll en el exe

Postby karinha » Mon Oct 24, 2016 2:21 pm

Perfecto, esto está fijo en el FWHX16.08 Antes, no. Por esto yo usava // para comentar el include. Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7214
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 94 guests