German Initialize ScrollView

[Matzele73]

Hallo Zusammen,
kann mir bitte jemand sagen, wie man ein ScrollView erzeugt?

Der folgende Code funktioniert nicht:

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
   
Dim iv As Label        'create an TextReader
iv.Initialize("iv")
iv.Text = "Hallo"   
   
Dim ScrollView1 As ScrollView
ScrollView1.Initialize("ScrollView1")
Activity.AddView(ScrollView1, 0, 0, 100%, 100%)
ScrollView1.Panel.Height = 200dip   
ScrollView1.Panel.AddView(iv, 5dip, 5dip, ScrollView1.Width - 10dip, 190dip)
End Sub

Vielen Dank,
Matthias

 

[klaus]

Um besser helfen zu können müsstest Du näher erklären :
- was Du genau machen willst ?
- was nicht funktioniert ?
- was Du von Deinem Code erwartest ?

Die ScrollView musst Du in Globals deklarieren.
ScrollView1.Initialize(Höhe) erwartet den Wert der inneren Höhe des ScrollView1.Panels.
Wenn Du eine ScrollView mit Event deklarieren willst musst Du sie mit:
ScrollView1.Initialize2(Höhe, "ScrollView1") deklarieren !
Wenn ScrollView1.Panel.Height kleiner ist als ScrollView1.Height ist gibt es kein scrollen !

Es gibt eine Zusammenfassung von einigen ScrollView Anwendungen in ScrollView examples summary.

Beste Grüsse.

 

[Matzele73]

Hallo Klaus,
vielen Dank für den Hinweis.

Mein Fehler war, dass ich bei "Initialize" als Parameter "ScrollView1" angegeben und nicht die Höhe deklariert habe.
Nun läuft es prima!

Viele Grüße,
Matthias