Power Builder - Usar nombre de controles datawindows

 
Vista:
sin imagen de perfil

Usar nombre de controles datawindows

Publicado por Daniel Sebastian (4 intervenciones) el 24/04/2015 05:48:18
Buenas, Tengo una Consulta:
Quiero saber si existe una manera de hacer lo siguiente.
Tengo X controles datawindows
dw_1.y = 50
dw_2.y = 50
dw_3.y = 50
...
....
dw_N.y = 50
---
En lugar de colocar esa línea de código por cada dw, necesito algo como
--
for i = 1 to N(Donde n es el numero de dws)
dw_(i).y = 50
next

Si alguien ha podido hacer algo como esto, agradeceré mucho su ayuda.
--
Att: D.S. (Si desean saber para que quiero esto solo preguntén, es una explicación un tanto larga)
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
Imágen de perfil de Antonio
Val: 176
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Usar nombre de controles datawindows

Publicado por Antonio (1271 intervenciones) el 24/04/2015 17:12:15
Buen día Daniel:

Espero que esto te sirva y sea lo que estas buscando...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
object winobjecttype[]
RadioButton vl_Radiobotom
CommandButton vl_commandbotom
PictureButton vl_PictureButton
Picture vl_Picture
DatePicker vl_DatePicker
 
long ll_count
string ls_punt
 
For ll_count = 1 to UpperBound(w_window.Control[])
	if w_window.Control[ll_count].Typeof() = CommandButton! or &
		w_window.Control[ll_count].Typeof() = PictureButton! or &
		w_window.Control[ll_count].Typeof() = Picture! or &
		w_window.Control[ll_count].Typeof() = RadioButton! or &
		w_window.Control[ll_count].Typeof() = DatePicker! then
		Choose case w_window.Control[ll_count].Typeof()
			case CommandButton!
				vl_commandbotom = w_window.Control[ll_count]
				vl_commandbotom.Pointer = 'HyperLink!'
			case PictureButton!
				vl_PictureButton = w_window.Control[ll_count]
				vl_PictureButton.Pointer = 'HyperLink!'
			case RadioButton!
				vl_Radiobotom = w_window.Control[ll_count]
				vl_Radiobotom.Pointer = 'HyperLink!'
			case DatePicker!
				vl_DatePicker = w_window.Control[ll_count]
				vl_DatePicker.Pointer = 'HyperLink!'
			case else
				vl_Picture = w_window.Control[ll_count]
				vl_Picture.Pointer = 'HyperLink!'
		end choose
	end if
Next

El código anterior lo que hace es poner el tipo de puntero del mouse que uno desea, en ti caso, solo debes referenciar el DataWindow.

Ojala te sirva y trambien a todos los del foro.

Saludos desde México
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil

Usar nombre de controles datawindows

Publicado por Daniel (4 intervenciones) el 25/04/2015 07:19:09
Muchísimas Gracias Antonio, era justo lo que buscaba.
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