Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » FoxPro/Visual FoxPro » _screen agregar objeto

FoxPro/Visual FoxPro - _screen agregar objeto

Volver
Nuevo Tema
<<>>
 
Vista:
sin imagen de perfil

_screen agregar objeto

Publicado por marcelo (139 intervenciones) el 19/07/2010 22:52:25
tengo este codigo para agregar una imagen al _screen de entrada :

1
2
3
4
5
6
7
8
9
_screen.addobject("oImg", "image")
 
_screen.oImg.picture = 'escudo.bmp' &&FOTO FONDO

_screen.oImg.visible = .T.
_screen.oImg.stretch = 2 && ESTIRA
_screen.oImg.width =120
_screen.oImg.height = 120 && ALTO
_screen.oImg.Top=150
_screen.oImg.Left=400

lo que no puedo resolver es que me sale un mensaje que dice qeue l objeto que quiero agregar ya existe .
hay alguna funcion o codigo que me permita preguntar previo a agregar la imagen si el objeto oImg ya existe?
desde ya gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:_screen agregar objeto

Publicado por es_binario (757 intervenciones) el 20/07/2010 01:37:38
para evitar errores usa el try catch

1
2
3
4
5
6
7
8
9
10
11
12
13
14
try && intenta poner la imagen
_screen.addobject("oImg", "image")
 
_screen.oImg.picture = 'escudo.bmp' &&FOTO FONDO

_screen.oImg.visible = .T.
_screen.oImg.stretch = 2 && ESTIRA
_screen.oImg.width =120
_screen.oImg.height = 120 && ALTO
_screen.oImg.Top=150
_screen.oImg.Left=400
 
catch
  && ya existe no hace nada
endtry
Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:_screen agregar objeto

Publicado por alberto (404 intervenciones) el 20/07/2010 06:18:11
tienes que poner este comando despues del read events
1
_SCREEN.REMOVEOBJECT("oImg", "Image")

esto te quita de memoria el objeto agregado asi cuando entras de nuevo no te dice que ya existe el objeto.
saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Leonardo Daniel A.
Val: 1.115
Oro
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:_screen agregar objeto

Publicado por Leonardo Daniel A. (499 intervenciones) el 17/01/2019 04:00:02
Hola.. ya intentaste con macrosubtitucion.. &


1
2
3
4
5
6
7
8
_nombre = "miTexto1"
_comando = "_screen.NewObject(_nombre, 'textbox')"
_objeto = &_comando
 
_objeto.visible = .t.
 
_comando2 = "_screen."+_nombre+".visible = .t."
&_comando2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:_screen agregar objeto

Publicado por Edgar Zambrano (31 intervenciones) el 21/07/2010 18:20:22
1
2
3
4
5
6
7
8
9
10
11
12
13
14
local _verificar
 
_verificar = "_screen.oImg"
if !(vartype(&_verificar)#"U")

      _screen.addobject("oImg", "image")
 
      _screen.oImg.picture = 'escudo.bmp' &&FOTO FONDO 

      _screen.oImg.visible = .T.
      _screen.oImg.stretch = 2 && ESTIRA
      _screen.oImg.width =120
      _screen.oImg.height = 120 && ALTO
      _screen.oImg.Top=150
      _screen.oImg.Left=400
endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar