Timedialog Bug?

thewavemaster

Member
Licensed User
Longtime User
Hi there!

I'm using the following code with the timedialog:

Dim zeit As TimeDialog
zeit.Is24Hours = True
Dim xtime As String
xtime = spaetlb.Text
zeit.Hour=xtime.SubString2(0,2)
zeit.Minute = xtime.SubString2(3,5)
DateTime.TimeFormat="HH:mm"
zret= zeit.Show("Geben Sie die gewünschte Weckzeit für die Spätschicht ein","","OK","Abbrechen","",Null)
If zeit.Response=-1 Then
spaetlb.Text = zeit.Hour & ":" & zeit.Minute
End If


When I use the + and the - to enter the time, everything is okay. But when I enter the time in the dialog with the keyboard, no time is returned.

I think with my sourcecode everything is ok...? Is it maybe a bug?
 

thewavemaster

Member
Licensed User
Longtime User
sry...made a little mistake.

Replace
zeit.Hour & ":" & zeit.Minute
with
DateTime.Time(zeit.TimeTicks)
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…