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.
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