German negative Werte für Position

[Moosi]

Hallo,

ich seh den Wald vor lauter Bäumen nicht mehr. Ich möchte ein einfaches Panel außerhalb des Screens erstellen um es bei gegebener zeit in den sichtbaren Bereich zu schieben.

Wie gebe ich beim AddView denn negative Werte an?

Activity.AddView(wwPanel, 60dip, -700dip, 1800dip, 700dip)

klappt nicht. Das Panel hat hinterher eine Höhe von 0

Ich würde mich über einen Stubs in die richtige Richtung freuen.

 

[MaFu]

Warum erstellst Du es nicht unsichtbar und mit den korrekten Koordinaten?

 

[Moosi]

ich möchte es per animate dann in den screen fahren. von -700 nach 200

 

[MaFu]

Ist ein Argument
Probiers mal so:
Activity.AddView(wwPanel, 60dip, 0dip, 1800dip, 700dip)
wwPanel.Top = -wwPanel.Height

 

[klaus]

Activity.AddView(wwPanel, 60dip, -700dip, 1800dip, 700dip) das funktioniert !
Die Höhe ist richtig.
Wo und wie bekommst Du eine Höhe von 0 ?

 

[Moosi]

Ich weiss nicht warum sich die Höhe ändert.
Wenn ich z.B. Activity.AddView(wwPanel, 60dip, -650dip, 1800dip, 700dip)
mache, wird mein Panel 50 hoch. Es wird alles oberhalb quasi abgeschnitten.

Das Ganze am unteren Bildschirmrand, also mit positiven Werten klappt wie erwartet.

Kann es am SDK liegen. 4.2.2 ?

 

[klaus]

Nochmals, wo und wie bekommst Du die Höhe von 0 !?

Dieser Code funktioniert !

Sub Process_Globals
   Dim Timer1 As Timer
End Sub

Sub Globals
   Dim pnlTest As Panel
End Sub

Sub Activity_Create(FirstTime As Boolean)
   Timer1.Initialize("Timer1", 20)
   pnlTest.Initialize("pnlTest")
   pnlTest.Color = Colors.Red
'   Activity.AddView(pnlTest, 60dip, -700dip, 1800dip, 700dip)
   Activity.AddView(pnlTest, 60, -700, 1800, 700)
End Sub

Sub Activity_Click
   Timer1.Enabled = True
End Sub

   
Sub Timer1_Tick
'   pnlTest.Top = pnlTest.Top + 20dip
   pnlTest.Top = pnlTest.Top + 20
   If pnlTest.Top >= 0 Then
     Timer1.Enabled = False
   End If
End Sub

Wenn Du auf den Bildschirm klickst verschiebt sich das Panel nach unten wie rewartet.
Ich habe die dip Werte rausgenommen weil mein Gerät HD ist aber mit einer Density von 3.
Das heisst dass alle dip Wert mit 3 multiplizeirt sind.

 

[Moosi]

Vielen Dank Klaus,

Ich habe das Problem nur bedingt eingrenzen können.
Dein Test funktioniert natürlich.
Jetzt wollte ich das reinfahren des Panels per Animation.Start() machen und ganau das klappt nicht.
Es scheint das im Zusammenhang mit der Animation Klasse und den negativen Werten irgendetwas nicht stimmt.
Ich habe es aber einfach umschifft und verschiebe das Panel ähnlich wie in Deinem Beispiel. Fertig!

Vielen Dank nochmal für die Hilfe
Moosi

 

[klaus]

Kannst Du ein kleines Testprogramm schreiben welches das Problem zeigt, Ich schau dann mal rein.
Du schreibst dass Du die Animation Klasse benutzt, bist Du sicher dass es eine Class ist und nicht die Animation Library ?
Ich habe noch nie mit der Animation Library gearbeitet.

 

[Moosi]

Es ist natürlich die Library und keine Class.

Ich bin ein wenig im Stress, weil die App fertig werden muss. Mal sehen, wann ich es schaffe einen Test zu machen.