Verify times on quarter hour

[lespaul]

I need to verify that a text time entry (I know there's the time entry component, but nobody liked that one, they would rather type in a text form of the times) from a user input ends on the quarter hour. I know that I can split the entry apart and check the last two digits for 15, 30, 45 or 00, but was wondering if there's a different/better way.

Any ideas?

thanks!

leslie

 

[Zathras]

Assuming you have converted the input to a TDateTime, multiply by 4 and see how close the fractional part is to zero or 1 (like less than .00004 or greater than .99996)

See function Frac().

 

[lespaul]

thanks I'll look into that after lunch!

les

 

[Zathras]

Actually, I think I did that too fast. Multiply by 4 will give you quarter days.

Try multiplying by 96 (4 x 24) to get it to quarter hours.