Scrollview in commondialog

[davelt99]

I've been trying to insert a label into a scrollview into a commondialog.
The label is preloaded with multiple lines of text but the text does not appear in the dialog box.

a portion of the code is listed below:

Dim lblData As Label 
lblData.Initialize("")  
sText="asdasdasd" & crlf & "adasdasd" & crld & "qsasdasdasdadasd"
lblData.Text=sText

Dim cd2 As CustomDialog2
Dim sv As ScrollView
Dim pnl As Panel
sv.Initialize(0)
sv.Color=Colors.White
pnl=sv.Panel
pnl.AddView(lblData,5,5,260dip,340dip)
cd2.AddView(sv,280dip,320dip)
pnl.AddView(lblData,5,5,260dip,340dip)
ret = cd2.Show("Work Data", "OK", "", "", Null)

Any help would be greatly appreciated.

Thank you,

Dave Tucker

 

[Erel]

sv.Initialize(0)

The above line sets the inner panel height to 0 pixels.