[vincentblake]

Добрый день помогите написать программку

Что нужно знать для выполнения работы:
1. Компоненты страниц Standard и Additional, их назначение, свойства, методы.
2. Обработка событий.

Напишите программу, запрашивающую у тренера сбор-ной колледжа по лыжам время в минутах и секундах (с точностью до сотых долей секунды) трех победителей 10-километровой гонки. Если какие-то результаты различаются меньше, чем на секунду, напечатать:
ВОТ ТАК БОРЬБА ШЛА ЗА _________________ МЕДАЛЬ!
Изобразите в виде гистограммы время трех призеров.

Попробовал через MaskEdit вводить время , но дальше не продвинулся, не знаю как через function MilliSecondsBetween(const ANow, AThen: TDateTime): Int64 ,выводить сообщение о борьбе за 1 или 2-ую медаль
Кидаю свои наработки