German TimeDialog Alternative für B4i

Wolli013

Well-Known Member
Licensed User
Longtime User
Hallo Freunde, ich nutze für B4A den TimeDialog um die Uhrzeit auszuwählen.
Welche Alternative gibt es für B4i ?
Habe im Forum bis jetzt nichts dazu gefunden.

B4X:
Private Sub LabelTimer_Click

    Dim ret As Int
    Dim Bmp As Bitmap
    Dim Td As TimeDialog
    Dim st(2), Eintrag As String = "Startzeit"
    Dim Std1,Min1 As String
    Dim S, M As Double
    Bmp.Initialize(File.DirAssets, "uhr.png") 'Hole das Bild
 
    st = Regex.Split(":", DateTime.Time(StartTime))  ' zerteilt den String in Stunden und Minuten
    S = st(0)           ' Stunden als Zahl
    M = st(1)           ' Minuten als Zahl
    Td.Hour = S
    Td.Minute = M
    Td.Is24Hours = True
    ret = Td.Show(CRLF & Eintrag & CRLF , "Neue Startzeit eingeben", "Speichern", "", "Abbruch", Bmp)
    
    If ret = DialogResponse.POSITIVE Then
        Std1 = Td.Hour : Min1 = Td.Minute   
    End If

End Sub
 

Alexander Stolte

Expert
Licensed User
Longtime User
Habe im Forum bis jetzt nichts dazu gefunden.
Na das halte ich aber für ein Gerücht.
Welche Alternative gibt es für B4i ?
ist sogar das 1. Suchergebnis was kommt wenn du nach "Time dialog" suchst hier im forum.

Oder redest du von einem anderen time picker? Ein Bild würde helfen.
 

Wolli013

Well-Known Member
Licensed User
Longtime User
Den habe ich außen vor gelassen.
Natürlich habe ich den schon gesehen und mich gefreut, läuft aber nicht bei mir, warum auch immer.
Entweder mache ich was verkehrt oder was auch immer.
Nutze das mitgelieferte Beispiel.

1713691114902.png
 

Alexander Stolte

Expert
Licensed User
Longtime User
Die Bibliothek besteht aus 2 weiteren Bibliotheken, wie der Titel sagt, brauchst du den B4Xdiaoog der in der XUI View lib. drin ist und den AS_TimerPicker. Es steht sogar mit im thread das man den AS_TimePicker benötigt, ich habe das jetzt mal rot gemacht so das es ins Auge springt. Normalerweise nutzt er die automatisch mit, aber das funktioniert nur wenn man alle erforderlichen libs. hat.
 

Alexander Stolte

Expert
Licensed User
Longtime User
Du brauchst diese lib. auch:
 

Wolli013

Well-Known Member
Licensed User
Longtime User
Das Beispiel geht, wenn ich es in meinem Program B4i einbinde bekomme ich Fehlermeldungen.

1713697965589.png
 

Alexander Stolte

Expert
Licensed User
Longtime User
Richtig. Ich könnte die Zeile code in einer separaten b4xlib entfernen, aber dann musst du folgende variable auf false setze, sonst bleibt das keyboard offen, wenn der Benutzer die zeit übers keyboard eingibt.
B4X:
TimePickerDialog.KeyboardEnabled = False
 
Top