German Dynamische Labels

Discussion in 'German Forum' started by Rallig, Jul 18, 2012.

  1. Rallig

    Rallig Member Licensed User

    Guten Abend,

    ich würde gerne dynamisch Labels erzeugen. Bekomme dies aber irgendwie nicht hin.
    Ist dies überhaupt möglich? Könnt ihr mir einen Hinweis geben?

    Gruß
    Rallig
     
  2. Petrus

    Petrus Member Licensed User

    So z.B.:

    Code:
    Sub Activity_Create(FirstTime As Boolean)

       
    Dim Label1 As Label
       Label1.Text = 
    "Label 1"
       Label1.Initialize(
    "")
       
    Activity.AddView(Label1, 00Activity.Width, 50dip)

    End Sub
    Gruß
    Petrus
     
  3. Rallig

    Rallig Member Licensed User

    Vielen Dank Dir Petrus für die Antwort.

    Da habe ich mich wohl etwas missverständlich ausgedrückt.
    Ich würde gerne eine gewisse Anzahl an Labels anordnen. Das können aber gerne mal 4 oder 6 sein. Deswegen möchte ich im vornherein nicht unbedingt einfach mal 20 Labels anlegen, um dann nach Bedarf eine Menge von diesen anzuzeigen.

    Elegant fände ich dann einfach eine Schleife, die die Labels erzeugt.

    Gruß
    Rallig
     
  4. Petrus

    Petrus Member Licensed User

    Ich würde die maximale Anzahl anlegen und die momentan nicht erforderlichen unsichtbar machen.

    Code:
    Sub Globals
       
       
    Dim mLabel(10As Label

    End Sub

    Sub Activity_Create(FirstTime As Boolean)

       
    Dim x As Int
       
    For x = 0 To 9
          mLabel(x).Initialize(
    "")
          mLabel(x).Visible = 
    False
          
    Activity.AddView(mLabel(x), 001010)
       
    Next
       
    End Sub
    Gruß
    Petrus
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice