Ver Mensaje Individual
  #5
Antiguo 19 de julio de 2016, 00:47
Rapinto
Gran amigo del Foro
Guru de COBOL
Activista del Foro: Activista del Foro - Issue reason: ¡Gracias! Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por ayudar mucho a los foreros Guru de los Gurus: Por solidos y amplios conocimientos - Issue reason: Por saber demasiado! 
Última Actividad 29.01.2018 20:23
Posts Posts: 240
Likes enviados Enviados: 19
Likes recibidos Recibidos: 224

Fito,

Poderias usar a "Description" da Form. A "description" não é a "Caption".
Ou o "ProgId". Terias que retificar o ProgID na tab OLE da Form.

Em cada Form garante no "Open" da Form que o nome é igual ao da Form com:

Código COBOL:
  1.     move "FrmMain" to "Description"   OF POW-SELF.

No teste se pode ou não usar:

Código COBOL:
  1. IF "Description"   OF POW-SELF = "FrmMain"
  2.       DISPLAY "NÃO PODE USAR ESTA FORM"

A "Description" está na tab "OLE" das propriedades da Form.

Não sei se isto te poderá ajudar.

Un saludo,
Rui Pinto
Rapinto is offline   Responder Con Cita