Un problema con la Gestion de Recursos

[Blessed]

Hola amigos

Estoy teniendo problemas ocasionales con los recursos, veamos el siguiente error:

Application
===========
Path and name: C:\Adm_Com\Adm_com.exe (32 bits)
Size: 3,864,576 bytes
Time from start: 2 hours 44 mins 29 secs
Error occurred at: 24/11/2011, 12:10:14
Error description: Error FiveWin/3 Cannot create Dialog Box:
Resource: 27

Stack Calls
===========
Called from: .\source\classes\DIALOG.PRG => CREATEDLGERROR(559)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(290)
Called from: Prg\coti_nueva.prg => COTI_AGREDIT(647)
Called from: Prg\coti_nueva.prg => (b)GENCOTIZA(165)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1447)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => SENDMESSAGE(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(408)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(944)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => WINRUN(0)
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE(978)
Called from: Prg\Admin.prg => MAIN(106)

En Archivo de recursos tengo definido lo siguiente:

Code: Select all

#define DLG_EMI_CAT        27

DLG_EMI_CAT DIALOG 19, 73, 434, 29
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "Productos"
FONT 8, "Tahoma"
{
 EDITTEXT 820, 2, 12, 80, 12
 EDITTEXT 822, 140, 12, 49, 12, ES_RIGHT | NOT WS_TABSTOP | WS_BORDER
 EDITTEXT 823, 190, 12, 40, 12, ES_RIGHT | WS_BORDER | WS_TABSTOP
 EDITTEXT 824, 397, 12, 34, 12, ES_RIGHT | WS_BORDER | WS_TABSTOP
 EDITTEXT 826, 231, 12, 165, 12, ES_AUTOHSCROLL | WS_BORDER | WS_TABSTOP
 LTEXT "Codigo", -1, 32, 3, 24, 8
}
 

En el programa fuente el ID lo incluyo de un archivo cabecera .ch

Code: Select all

    
DEFINE DIALOG oDlg_Prod RESOURCE DLG_EMI_CAT ;
          TRANSPARENT COLOR  0, oApp:Color2007

   REDEFINE GET oCt_Get[1] VAR cArticulo ID 820 OF oDlg_Prod UPDATE PICTURE "@!" 
   REDEFINE GET oCt_Get[2] VAR sn_Precio ID 822 OF oDlg_Prod PICTURE "@R 999,999.9999" 
   REDEFINE GET oCt_Get[3] VAR nCantidad ID 823 OF oDlg_Prod UPDATE PICTURE "@K 999,999.99" ;
            VALID Coti_Cantidad( nCantidad, cArticulo, @cDescr )
   REDEFINE GET oCt_Get[4] VAR nPorcent  ID 824 OF oDlg_Prod UPDATE PICTURE "999.9999" 
   REDEFINE GET oCt_Get[5] VAR cDescr    ID 826 OF oDlg_Prod UPDATE PICTURE "@!" ;
            VALID ValidaDescr( cArticulo, @lCmb_Descr ) WHEN lCod_Valido

   ACTIVATE DIALOG oDlg_Prod CENTERED ;
            ON INIT IF( CodeProc == NUEVA, oCt_Get[1]:oBtn:Click(),) 
 

Funciona Cientos de veces al dia, pero de cuando en cuando explota, y no se porque aun, estoy probando aqui y alla desde hace algunos meses y sigo igual, alguna idea, o alguien que le haya sucedido antes.

Saludos

[fgondi]

Estimado amigo,

Ese problema lo tengo desde hace mucho tiempo y nunca he podido dar con ello.

[Antonio Linares]

_,

Prueba a cambiar el nombre DLG_EMI_CAT por otro, a ser posible sin "_".

Hay nombres que a Windows, por alguna razón, no le "gustan" a veces

[fgondi]

Antonio,

Gracias por tu respuesta.

Yo no tengo ningún recurso sin "_".

[Antonio Linares]

Fernando,

Aún así, en el diálogo que te falle a veces (en caso de ser el mismo) prueba a cambiarle el nombre

[fgondi]

Antonio,

Ok. Lo cambio y pruebo durante un tiempo.

Muchas gracias.

[Blessed]

Gracias por tu respuesta Antonio

Igual que Fernando, hare _ y actualizare a mis clientes.

Saludos