View Issue Details
ID | Project | Category | View Status | Date Submitted | Last Update |
---|---|---|---|---|---|
0005379 | JEDI VCL | 00 JVCL Components | public | 2010-10-25 21:38 | 2012-02-29 16:55 |
Reporter | hholmes | Assigned To | AHUser | ||
Priority | normal | Severity | minor | Reproducibility | always |
Status | resolved | Resolution | fixed | ||
Product Version | 3.40 | ||||
Target Version | Fixed in Version | 3.45 | |||
Summary | 0005379: TJvTimeEdit does not function properly when using the spin buttons with HOUR24 set to FALSE | ||||
Description | Drop component on a new form and set to HOUR24 to FALSE and run. Use the UP spinner and it jumps from 09 to 22. Go down and it jumps from 20 to 9. If you keep going up the hour field goes all the way to 99 then jumps to a single 0. If you go down it goes from 1 to 12 but when you go from 10 to 09 it goes to 19. I took a quick look through the source and it seems to be jumping through its own validation routine in mid change. I wrapped the part of the code that alters the TEXT property with changing the FCHANGING property. It works for me but I'm not sure its the correct solution. Also the SECONDS and the AM/PM options don't adjust when the spinner is clicked with focus set to those parts of the edit field. I don't see any code for altering those fields with the spinner buttons. FChanging := true; ....function code here FChanging := false; | ||||
Additional Information | It is also missing the icon in the JV Edits component tab. | ||||
Tags | No tags attached. | ||||
|
When the ShowSeconds is set to false the AM/PM indicator was not working so I altered the code as follows: //added this to the beginning of the UpdateTimeDigits procedure: var SecondsOffset:integer; ... if FShowSeconds then SecondsOffset:=10 else SecondsOffset:=7; //in the increment part I changed the A/P code to this: if Text[SecondsOffset] = 'A' then Text := SetNumberChar(Text, SecondsOffset, 'P') else Text := SetNumberChar(Text, SecondsOffset, 'A'); //in the decrement part I changed the A/P code to this: if Text[SecondsOffset] = 'P' then Text := SetNumberChar(Text, SecondsOffset, 'A') else Text := SetNumberChar(Text, SecondsOffset, 'P'); |
|
Please try with the latest SVN content. If this is still here, please provide the zipped sources of a sample application showing this. |
|
Fixed in svn revision 12905. |
Date Modified | Username | Field | Change |
---|---|---|---|
2010-10-25 21:38 | hholmes | New Issue | |
2010-10-25 21:57 | hholmes | Note Added: 0017951 | |
2010-11-09 14:15 | obones | Note Added: 0018030 | |
2010-11-09 14:15 | obones | Status | new => feedback |
2010-11-27 14:17 | AHUser | Note Added: 0018178 | |
2010-11-27 14:17 | AHUser | Status | feedback => resolved |
2010-11-27 14:17 | AHUser | Fixed in Version | => Daily / SVN |
2010-11-27 14:17 | AHUser | Resolution | open => fixed |
2010-11-27 14:17 | AHUser | Assigned To | => AHUser |
2012-02-29 16:55 | obones | Fixed in Version | Daily / SVN => 3.45 |