German Eigenes Menü

Sinimon

Member
Hallo, ich habe ein Samsung galaxy s 2.. und da habe ich neben dem menü button einen touch knopf... wenn ich den drücke, kommt in soziemlich jeder app ein eigenes menü. bei meinen bisherigen versuchen kam natürlich garkein menü... wie kann man so ein extra dialog fenster popuppen? danke
 

Sinimon

Member
Und ich habe noch etwas... wenn ich sowas mache:
text2.Text = list1.Get(btn.Tag + (btn.Tag - 1) * 3 - 1) + 2

dann rechnet er mir ne zahl aus oO in der zeile des list1 steht ein text... und er gibt mir nur zahlen. er rechnet also die zahlen mit dem btn.tag zusammen... wie kann man das unterbinden? danke
 

klaus

Expert
Licensed User
Longtime User
Da sind zwei verschiedene Fragen in dem gleichen Thread.
Es ist besser für Fragen mit verschidenen Themen verschiedene Thread zu erstellen.
Zur Menüfrage habe Ich keine Antwort, Ich weiss nicht von was einem Knopf Du sprichst.

text2.Text = list1.Get(btn.Tag + (btn.Tag - 1) * 3 - 1) + 2
Hier fehlen Informationen, aber mit den Klammern stimmt scheinbar etwas nicht.
text2.Text = list1.Get(btn.Tag + (btn.Tag - 1) * 3 - 1) + 2
zu was ist die 2 am Ende, eine Zahl für Text?.

Beste Grüsse.
 

Sinimon

Member
tut mir leid mit den 2 themen hier... könntest du die andere frage vielleicht trotzdem beantworten? habe das mit den klammern hinbekommen. du hast recht, da fehlen 2 stück...
 

Sinimon

Member
galaxy-s-ii-hands-on-03-sm.jpg


der linke knopf neben dem Homebutton is das. der rechte is der "Zurück" button und der linke is wie gesagt reserviert für optionen usw. also da erscheint dann immer ein popup menu denke ich
 

Sinimon

Member
Habe gerade noch etwas gefunden, das sieht so aus:
activity.addmenuitem(Text, Eventname)
aber was bringt es mir, das hinzuzufügen. mit welchem code kann ich dann auf dieses menü zugreifen...
 

klaus

Expert
Licensed User
Longtime User
Ja, jetzt weiss Ich wovon Du sprichst.
Das ist der 'normale' Menüknopf.
Im Beginner's Guide , Kapitel 12.1.1 Menu Example hast Du ein Beispiel.

Beste Grüsse.
 

Sinimon

Member
Hey, das klappt soweit super.
habe 12 items im menü (Die 12 Monatsnamen). er zeigt aber nur die 1. 4 oder so an... dann steht da Optionen und da kann ich die weiteren anzeigen lassen.. kann ich nich einfach alle untereinander anzeigen lassen wie ein normales menü?
 

specci48

Well-Known Member
Licensed User
Longtime User
Die InputList simuliert so etwas wie eine Combobox, ermöglicht also einer gezielte Auswahl eines Items aus einer vorgegebenen Menge (wähle einen Monat aus den Monaten 1-12).
Weitere Hilfe findest Du in der Doku: InputList oder auch im BeginnersGuide Kapitel "18.4 Keywords".


Gruß
specci48
 

Sinimon

Member
Das ist ja interessant.. so habe ich mir das vorgestellt. aber wie frage ich das item ab, das geklickt wurde? das bekmm ich nich richtig hin...
 

Kiffi

Well-Known Member
Licensed User
Longtime User
Hallo Sinimon,

ausnahmsweise hier ein Beispielcode, damit Du über die
erste Hürde kommst. Und bitte in Zukunft erstmal intensiv
die Suchfunktion dieser Site verwenden. In sehr vielen
Fällen findest Du die entsprechende Antwort hier im
Forum oder in den Dokumentationen.

B4X:
Sub Process_Globals

End Sub

Sub Globals

   Dim myButton As Button

End Sub

Sub Activity_Create(FirstTime As Boolean)

   myButton.Initialize("myButton")

   Activity.AddView(myButton, 5dip, 5dip, 200dip, 60dip)

   myButton.Text = "Monat waehlen..."

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub myButton_Click
   
   Dim ListOfMonth As List
   Dim SelectedMonth As Int
   
   ListOfMonth.Initialize
   
   ListOfMonth.Add("Januar")
   ListOfMonth.Add("Februar")
   ListOfMonth.Add("Maerz")
   ListOfMonth.Add("April")
   ListOfMonth.Add("Mai")
   ListOfMonth.Add("Juni")
   ListOfMonth.Add("Juli")
   ListOfMonth.Add("August")
   ListOfMonth.Add("September")
   ListOfMonth.Add("Oktober")
   ListOfMonth.Add("November")
   ListOfMonth.Add("Dezember")
   
   SelectedMonth = InputList(ListOfMonth, "Monat waehlen", -1)
   
   If SelectedMonth <> DialogResponse.Cancel Then
      Msgbox(ListOfMonth.Get(SelectedMonth), "Gewaehlter Monat")
   End If
   
End Sub

Grüße ... Kiffi
 
Top