1. alessandro feltrin
  2. PowerBuilder
  3. Thursday, 1 August 2019 06:13 AM UTC

Hi all,

 

I have a problem that I can't solve with the synchronized scroll of 2 datawindow.

case :

dw_opt an header freeform datawindow

dw_opt_h a body freeform datawindow

these 2 data windows are very long (width property) so i need to scroll usind the horizontal scroll event.

the solution seems rather simple and works if it is performed by PB. once published for the web it does not work. I discovered that the scrollhorziontal and scrollvertical event do not work on the web, but at this point I wonder how I can perform the synchronized scroll.

Code :

This is the script for the scrollhorizontal event of dw_opt datawindow 

 dw_opt_h.Modify("DataWindow.HorizontalScrollPosition=" + string(scrollpos) )

 

please can someone give me some suggestions?

 

Thanks

 

Chris Pollach @Appeon Accepted Answer Pending Moderation
  1. Wednesday, 28 August 2019 21:05 PM UTC
  2. PowerBuilder
  3. # 1

Hi Alessandro ;

   I have verified that this is a PowerServer bug.The Scroll Horizontal event is firing but the Modify() command is not working on the horizontal. However on the Vertical Scroll, the Modify() command does work OK. Both of these events and Modify() commands work OK in a PB native App. Its only a bug with a PowerServer  Web App (tested with PS2019 as well today).

Please open a Support Ticket for this issue.

Regards ... Chris

Comment
  1. Kai Zhao @Appeon
  2. Friday, 30 August 2019 00:25 AM UTC
HI Chris,



PowerServer does not support the HorizontalScrollPosition property.



Regards,

ZhaoKai
  1. Helpful
There are no comments made yet.
Kai Zhao @Appeon Accepted Answer Pending Moderation
  1. Thursday, 1 August 2019 07:14 AM UTC
  2. PowerBuilder
  3. # 2

Hi alessandro,

Please try script like below, please refer to attached case for details.

Integer li_cols, i

li_cols = Integer(dw_1.Describe( "DataWindow.Column.Count" ))

For i = 1 To li_cols
If Long(dw_1.Describe("#" + String(i) + ".x")) >= scrollpos Then

dw_1.SetColumn(dw_1.Describe("#" + String(i) + ".name"))
Send( Handle( dw_1),256,9,Long(0,0))

dw_2.SetColumn(dw_2.Describe("#" + String(i) + ".name"))
Send( Handle( dw_2),256,9,Long(0,0))

Exit
End If
Next

Regards,
ZhaoKai

Attachments (1)
Comment
There are no comments made yet.
  • Page :
  • 1


There are no replies made for this question yet.
However, you are not allowed to reply to this question.