Цитата:
|
Сообщение от andruxa-forever
Ну ты знаешь как это осуществить????
|
для простоты ставь 2 метки, 1 скрываешь. можешь и переменную типа string использовать.
осуществляется это так
label1.Caption:=inttostr(((DateTimeToUnix(DateTime Picker2.Date))-(DateTimeToUnix(DateTimePicker1.Date)))div 86400);
Label2.Caption:='прошло'+inttostr(strtoint(Label1. Caption) div 365)+' лет, '+inttostr(((strtoint(Label1.Caption) mod 365) div 30)) +' месяцев, '+inttostr(((((strtoint(Label1.Caption) mod 365) mod 30))div 7))+' недель и '+inttostr((((((strtoint(Label1.Caption) mod 365) mod 30))mod 7))div 1)+' дней';
лучше переменную юзай