Pregunta sobre Dialogo

[Compuin]

Buenos dias,

He podido notar que desde PellesC o cualquier herramienta para crear dialogos desde recursos (.RES) es posible ver el codigo que se genera con cada uno de ellos.

Existe alguna forma de pasar ese codigo a un archivo p.e. con otra extension y asociarlo a un .PRG a fin de usarlo en elugar del recurso?

Atento a sus comentarios

[Joaquim Ferrer]

En las samples de Fivewin tienes una utilidad llamada rc2prg
Puedes pasar un archivo de recursos RC a PRG y al compilarlo, ya no necesitas usar recursos.
Saludos

[Compuin]

Gracias Joaquin,

Ahora mi duda es como lo puedo llamar desde otro PRG, en lugar de usar un DEFINE DIALOG <Nombre_del_recurso>

Por ejemplo

DEFINE DIALOG oDlg OF <PRG DEL RECURSO.prg> o cualquier otra extension preferiblemente para el codigo del recurso

Gracias de antemano

[Antonio Linares]

Puedes usar el diseñador fiveform.prg que está en la carpeta samples de FiveWin:

https://code.google.com/p/fivewin-contr ... p&can=2&q=

Pulsa el botón derecho del ratón sobre el diálogo para generar el código fuente

[Compuin]

Gracias Antonio,

Para explicar mejor mi planteamiento, si creamos un recurso en PellesC y generamos el codigo tendriamos lo siguiente

[mastintin]

O mejor aún si incorporamos ese texto en un campo memo de una base de datos . ¿ Se podría cargar en tiempo de ejecución para generar el formulario ? .
Saludos

[Antonio Linares]

El ejemplo FWH/samples/re.prg muestra como abrir un RC desde un fichero (sirve una variable cadena, leida desde un campo memo, etc), como analizarlo y como generar un diálogo de forma equivalente a DEFINE DIALOG ... RESOURCE ...

Revisa el código fuente de la función ShowDialog() en samples/re.prg

Aunque la opción más poderosa es usar un script que compila y ejecuta un PRG desde el propio EXE. Tienes un ejemplo en FWH/samples/scripts.prg. Por ejemplo, si usamos FiveForm.exe para generar el código PRG, podriamos leerlo y ejecutarlo desde un EXE.

[vilian]

Antônio,

Is possible to do fiveform import dialog from rc files ?

[karinha]

Code: Select all

Application
===========
   Path and name: C:\DOWNLOAD\fiveform\fiveform.exe (32 bits)
   Size: 5,602,304 bytes
   Compiler version: Harbour 3.2.0dev (Rev. 18881)
   FiveWin  Version: FWH 13.01
   Windows version: 6.1, Build 7601 Service Pack 1

   Time from start: 0 hours 0 mins 6 secs 
   Error occurred at: 22/05/2015, 09:43:40
   Error description: Error BASE/1004  Message not found: NIL:INITIATE
   Args:
     [   1] = U   

Stack Calls
===========
   Called from:  => __ERRRT_SBASE( 0 )
   Called from: ../../../tobject.prg => NIL:ERROR( 0 )
   Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
   Called from: ../../../tobject.prg => NIL:MSGNOTFOUND( 0 )
   Called from: ../../../tobject.prg => NIL:INITIATE( 0 )
   Called from: C:\fwteam\samples\fiveform.prg => OPEN( 144 )
   Called from: C:\fwteam\samples\fiveform.prg => (b)MAIN( 35 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 465 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 656 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1714 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1408 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3178 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 991 )
   Called from: C:\fwteam\samples\fiveform.prg => MAIN( 89 )