Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Noticias y Avisos
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Error MOVE "Parent" de un nodo "Root" en TreeView dmosca PowerCOBOL (ActiveX, v4 - v11) 1 23 de agosto de 2017 08:47
[Información] Error "impresora en uso" al cambiar de Form dmosca PowerFORM 2 20 de abril de 2017 16:44
[Sintaxis] Cambiar variable de entorno "Path" en ejecución Recato53 PowerCOBOL (ActiveX, v4 - v11) 7 10 de agosto de 2015 14:25
[Información] Evento "Resized" del Form (Sheet) Kuk PowerCOBOL V3L10 (Win32) 4 27 de julio de 2015 17:09
[Sintaxis] Propiedad "Bring to front" Roger PowerCOBOL (ActiveX, v4 - v11) 1 21 de marzo de 2015 22:20
Respuesta
 
Herramientas

  #1
Antiguo 18 de julio de 2016, 17:29
IDENTIFICATION DIVISION
Fito
Novato Senior
ENVIRONMENT DIVISION
Avatar de Fito
DATA DIVISION
Forero desde (Registrado)febrero 2015
Argentina
UbicaciónCórdoba, Villa María
Edad48 años
Última Actividad10.12.2019 11:58
PROCEDURE DIVISION
PostsPosts: 190
Ha dicho GraciasEnviado: 72
Ha recibido agradecimientosRecibido: 55
Mejores respuestasSoluiones: 9
ReputaciónReputación: 10
Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road
Form Obtener la propiedad "Name" del Form en ejecución

Hola Amigos:

La propiedad "Name" de un form solamente se puede usar en diseño, cómo puedo saber cuál es el nombre de un form en tiempo de ejecución?

Saludos.

Fito...
Fito no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 18 de julio de 2016, 17:49
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)enero 2015
España
UbicaciónMadrid
Edad34 años
Última Actividad10.12.2019 09:11
PROCEDURE DIVISION
PostsPosts: 1.428
Ha dicho GraciasEnviado: 319
Ha recibido agradecimientosRecibido: 547
Mejores respuestasSoluiones: 87
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

Fito, por PowerCOBOL no se puede, debes saber el nombre. Se puede seguramente hacer por WinAPI, pero cargando la DLL para obtener todas las funciones que exporta.

Toda DLL compilada en PowerCOBOL contiene unas funciones que corresponden a funciones ActiveX estandar (diría yo), + las rutinas globales COBOL que hayas incluido en el proyecto + funciones que corresponden con los nombres de los Form.

Las funciones ActiveX que están presentes en todas las DLL de PowerCOBOL son:
  1. DllCanUnloadNow
  2. CfDllGetClassObjectByName
  3. DllGetClassObject
  4. DllRegisterServer
  5. DllUnregisterServer

El resto serían funciones con el mismo nombre que el Form + las globales. El caso es que aún así hay que conocer las reglas del nombramiento de esa DLL.


Por cierto, para qué lo necesitas???


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
  #3
Antiguo 18 de julio de 2016, 22:53
IDENTIFICATION DIVISION
Fito
Novato Senior
ENVIRONMENT DIVISION
Avatar de Fito
DATA DIVISION
Forero desde (Registrado)febrero 2015
Argentina
UbicaciónCórdoba, Villa María
Edad48 años
Última Actividad10.12.2019 11:58
PROCEDURE DIVISION
PostsPosts: 190
Ha dicho GraciasEnviado: 72
Ha recibido agradecimientosRecibido: 55
Mejores respuestasSoluiones: 9
ReputaciónReputación: 10
Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road Fito is on a distinguished road
Predeterminado

Hola KUK:

Lo necesito para poder hacer un sistema de permisos, para poder decirle a cada usuario en cuál form puede entrar o no.
Ahora estoy usando una variable y le muevo yo el nombre, pero quería hacer algo más general.
También podría usar el "Caption" del form, pero me parecía más correcto hacerlo con el name, porque me aseguraría de que no se repitiera.

Saludos.

Fito...
Fito no ha iniciado sesión   Responder Con Cita
  #4
Antiguo 19 de julio de 2016, 00:06
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)enero 2015
España
UbicaciónMadrid
Edad34 años
Última Actividad10.12.2019 09:11
PROCEDURE DIVISION
PostsPosts: 1.428
Ha dicho GraciasEnviado: 319
Ha recibido agradecimientosRecibido: 547
Mejores respuestasSoluiones: 87
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

Fito, yo creo que te estás complicando la vida. Se puede hacer de manera más fácil, con variables globales. Si un usuario no tiene permiso de abrir un Form, prohibirlo desde el Form llamante y ni siquiera abrir Form hijo.

Quiero decir, ya sabes qué Forms tienes, ¿por qué buscar los nombres en dinámico? Yo pensaba que no sabías qué Forms tendrías o algo así...


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
  #5
Antiguo 19 de julio de 2016, 00:47
IDENTIFICATION DIVISION
Rapinto
Gran amigo del Foro y Guru de COBOL
ENVIRONMENT DIVISION
Avatar de Rapinto
DATA DIVISION
Forero desde (Registrado)febrero 2015
Portugal
UbicaciónPorto
Última Actividad29.01.2018 20:23
PROCEDURE DIVISION
PostsPosts: 246
Ha dicho GraciasEnviado: 19
Ha recibido agradecimientosRecibido: 215
Mejores respuestasSoluiones: 47
Medallas recibidas: 2Medallas: Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por ayudar mucho a los foreros  Guru de los Gurus: Por solidos y amplios conocimientos - Razón: Por saber demasiado! 
ReputaciónReputación: 13
Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road Rapinto is on a distinguished road
Predeterminado

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 no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Breew (20 de noviembre de 2016)
Respuesta

Tags
form , nombre , obtener


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 13:40.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2019, Jelsoft Enterprises Ltd.