Gracias por su ayuda, detectado y resuelto. El detalle esta en: BITMAPS 'AA_ICO' que defino en MSGITEM : DEFINE MSGITEM oMsgItem OF oWnd:oMsgBar PROMPT oVP:cUsuyPAC SIZE 5*len(oVP:cUsuyPAC) BITMAPS 'AA_ICO' Elimine BITMAPS de MSGITEM y lo cambie por: DEFINE ICON oIcon RESOURCE 'AA_ICO' ...
Después de un buen rato he encontrado el error, lo provoca esta línea: DEFINE MSGITEM oMsgItem OF oWnd:oMsgBar PROMPT oVP:cUsuyPAC SIZE 5*len(oVP:cUsuyPAC) BITMAPS 'AA_ICO' // ESTA LINEA PROBOCA EL ERROR Esta en el fuente: TestError.prg, línea 145, si omito esta línea ...
... mueve el cuadro de diálogo para alinear su parte inferior con la parte superior del "msgitem". Uso: ACTIVATE DIALOG oDlg ON INIT (..... oMsgItem:Anchor( oDlg ) ) * XBROWSE - Mejora en el método oCol( u ) Hasta ahora, el parámetro puede ser (1) orden de creación, (2) cabecera o ( 3 ) ...
... used in ON INIT clause of a dialog, moves the dialog to align its bottom with the top of the msgitem. Usage: ACTIVATE DIALOG oDlg ON INIT (..... oMsgItem:Anchor( oDlg ) ) * XBROWSE - Method oCol( u ) enhanced. Till now, the parameter can be either (1) creation order, (2) header or ( 3 ) group ...