Счетчик чистого времени: Счетчик чистого времени APK (Android App)

Счетчик чистого времени APK (Android App)

Скачать APK(298 KB)

Это приложение будет полезно для выздоравливающих зависимых.

Описание Стиль жизни

Реклама

App APKs

Это приложение будет полезно для выздоравливающих зависимых.
Оно подсчитывает количество времени, прошедшего с указанной даты, в днях, месяцах и годах, а так же в часах, минутах и секундах 🙂
Для персонализации, в настройках приложения есть возможность указать имя и зависимость, а так же пол для корректного отображения склонений.
Есть возможность установить изображение в качестве фона программы, или выбрать цвета фона и шрифтов на свой вкус.
Возможность установить пароль для входа в приложение, что бы защитить всю эту информацию от постороннего доступа.
Три экрана: от первого лица, от второго — с приветствием, и экран подробной статистики.
Переключение между экранами осуществляется тапом по дисплею или по стрелкам.
Приложение умеет делать скриншот и дает возможность поделиться им в соц. сетях или сообщении. Например, скриншот от первого лица, с возможностью добавления собственного текста — лозунга.

Есть виджет для рабочего стола с бегущими минутами и секундами.
Опция поздравления с юбилеями в статусбар.
Разрешение для доступа к карте памяти нужно для сохранения скриншотов в папку CleanCounter.
Если вы хотите это приложение на вашем языке — пишите на e-mail [email protected]
Приложение принципиально бесплатное. Таким и останется.
Комментарии и оценки приветствуются )
Чистого дня!

Подробнее…

Скачать APK(298 KB)

Популярные запросы

rumble instapro youtube vanced spotify vi music bondee bbc iplayer faceplay android auto sofascore netflix instagram telemundo outline vpn learn the heart yowhatsapp geforce now toffee iptv smarters pro game guardian

Ещё

Реклама

Google Play Маркет Google LLC · Инструменты

InstaPro Sam Mods · Социальные

YouTube Vanced Team Vanced · Видеоплееры и редакторы

自由浏览 Greatfire. org · Связь

HushSMS Uploader · Инструменты

Ещё

Mi Home Beijing Xiaomi Mobile Software Co.,Ltd · Стиль жизни

Samsung Pay Samsung Electronics Co., Ltd. · Стиль жизни

Leon.bet Leon · Стиль жизни

Rewards FF Garena savonie · Стиль жизни

Google Home Google LLC · Стиль жизни

AppEven gamesfires · Стиль жизни

Муслим тақвими (намоз ва азон) Al Khorazmee · Стиль жизни

AppValley Android Crafile · Стиль жизни

Muslim Pro Bitsmedia Pte Ltd · Стиль жизни

Apperwall — заработок онлайн Apperwall · Стиль жизни

Ещё

Ещё

Вам может понравиться

blockman go apk gcam apk play dead inside apk youtube vanced apk sunwin.fun apk lili apk son sürüm project drift 2.0 apk vizer tv apk 5.0 download clash of clans telegram app download apk

Clean Day — Счетчик трезвости

Снимки экрана (iPhone)

Описание

Оставайся чистым день за днём вместе с Clean Day!

Новое приложение для выздоравливающих зависимых. Твой товарищ в чистой жизни.

Начни с персональных настроек, выбрав удобный режим отражения времени чистой жизни — в секундах, днях, месяцах и годах.

Приложение первым поприветствует тебя, отразив успех и поздравив с важными событиями, пришлёт поздравление на почтовый ящик.

Актуальный дизайн и приятные глазу фоновые фото будут поднимать настроение и радовать.

Высказывания известных людей, созвучные основным ориентирам выздоравления, позволят настроиться на очередной чистый день.

Двигаясь вперёд с каждым днем, делись своим чистым временем и опытом с друзьями через социальные сети.

Дорогу осилит идущий. Скачивай и радуйся чистоте!

17 авг. 2021 г.

Версия 1.5

• Performance improvement and bug fixes.

• Enjoying the app? Let us know what you think!

Оценки и отзывы

Оценок: 1,1 тыс.

Кнопка — СРЫВА….

Сделайте возможность записи — срыв!

МДА

Приложение хорошее,но из-за фотографий на фоне(дорог) сорвалась уже два раза! Просьба поменять задний фон!

.

Очень жаль , что нет никотиновой зависимости

Разработчик ADS PROJECTS GROUP LTD указал, что в соответствии с политикой конфиденциальности приложения данные могут обрабатываться так, как описано ниже. Подробные сведения доступны в политике конфиденциальности разработчика.

Данные, используе­мые для отслежи­вания информации

Следующие данные могут использоваться для отслеживания информации о пользователе в приложениях и на сайтах, принадлежащих другим компаниям:

Не связанные с пользова­телем данные

Может вестись сбор следующих данных, которые не связаны с личностью пользователя:

• Идентифика­торы
• Диагностика

Конфиденциальные данные могут использоваться по-разному в зависимости от вашего возраста, задействованных функций или других факторов. Подробнее

Информация

Провайдер

ADS PROJECTS GROUP LTD

Размер

36,1 МБ

Категория

Здоровье и фитнес

Возраст

4+

Copyright

© Arturs Voicehovics

Цена

Бесплатно

• Поддержка приложения
• Политика конфиденциальности

Другие приложения этого разработчика

Вам может понравиться

vb.net — Создайте простой таймер для подсчета секунд, минут и часов

спросил 12 лет, 4 месяца назад

Изменено 3 года, 6 месяцев назад

Просмотрено 75 тысяч раз

Я пытаюсь создать довольно простую программу, которая по сути является таймером. У меня три набора этикеток, lbl_seconds , lbl_minutes и lbl_hours . Эти метки имеют значение по умолчанию 00:00 , и я хочу, чтобы таймер менял это значение для каждой метки. Я гуглил это, но я не могу найти никакой хорошей информации об этом.

Нужно ли мне три отдельных таймера? Я также заметил, что у таймеров есть собственный обработчик событий тиков. Я думаю, именно в этом мне нужно изменить значение метки. Как это сделать?

• vb.net
• таймер

4

Вот пример этого

 Dim timercount As Integer = 60 'Количество секунд
Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Обрабатывает btnStart.Click
    Timer1.Interval = 1000 'Количество миллисекунд в секунде
    Timer1.Enabled = True 'Запустить таймер
Конец сабвуфера
Private Sub btnReset_Click(ByVal sender As System.Object, ByVal e As System. EventArgs) Обрабатывает btnReset.Click
    Timer1.Enabled = False 'Остановить таймер
    timercount = 60 'Сбросить до 60 секунд
    lblOutput.Text = timercount.ToString() 'Сбросьте отображаемое значение до 60
Конец сабвуфера
Private Sub Timer1_Tick (отправитель ByVal как System.Object, ByVal e как System.EventArgs) обрабатывает Timer1.Tick
    lblOutput.Text = timercount.ToString() 'показать обратный отсчет в метке
    Если timercount = 0 Then 'Проверьте, достиг ли он 0, если да, то остановите таймер и отобразите готово
        Timer1.Enabled = Ложь
        lblOutput.Text = "Готово"
    Else 'Если timercount больше 0, то вычтите из него единицу
        таймер-= 1
    Конец, если
Конец сабвуфера
 

Я думаю, вам нужно что-то в этом роде

 Публичная функция GetTime (время как целое число) как строка
    Dim Hrs As Integer 'количество часов'
    Dim Min As Integer 'количество минут'
    Dim Sec As Integer 'число секунд'
    «Секунды»
    Секунда = мод 60 времени
    «Минуты»
    Мин.  = ((Время - С) / 60) Mod 60
    'Часы'
    Часы = ((Время - (Сек + (Мин * 60))) / 3600) Mod 60
    Формат возврата (часы, "00") и ":" и формат (мин, "00") и ":" и формат (сек, "00")
Конечная функция
 

Вы указываете время (в секундах), которое хотите отобразить в тексте этикетки, и время будет отформатировано по вашему желанию.

напр.

 lblTime.Text = GetTime(90)
 

На этикетке будет отображаться 00:01:30 .

---

Для справки, вы можете посмотреть этот проект, который я представил на FreeVBCode некоторое время назад. Единственное предостережение — проект находится в VB6. Однако вы должны иметь возможность открыть его в Visual Studio.

3

Начните с добавления таймера. Назовите его как хотите, в этом примере я оставлю его как Timer1. Добавьте метку и установите текст как: 00:00.

В коде после установки класса (обычно это Public Class Form1) сделать переменную в качестве секундомера:

Затемнить секундомер Как новый секундомер моя метка 00:00 называется Label1)

 Label1. Text = String.Format("{0}:{1}:{2}", watch.Elapsed.Hours.ToString("00"), watch.Elapsed. Минуты.ToString("00"), часы.Elapsed.Seconds.ToString("00"))
 

Используйте один таймер и в случае необходимости измените значение ваших меток.

Вам нужен один таймер и три счетчика секунд, минут и часов.

Считать минуты, затем по модулю минуты/60, если вернуть 0, то начать считать минуты.
По модулю минут/60, если вернуть 0, то начать считать часы.

1

Зарегистрируйтесь или войдите в систему

Зарегистрируйтесь с помощью Google

Зарегистрироваться через Facebook

Зарегистрируйтесь, используя адрес электронной почты и пароль

Опубликовать как гость

Электронная почта

Требуется, но не отображается

Опубликовать как гость

Электронная почта

Требуется, но не отображается

Таймер обратного отсчета в vb.

net

В следующем коде у меня есть таймер, который отсчитывает от 5 минут. Я пытаюсь иметь визуальный таймер обратного отсчета в фунтах в мм:сс, но пример, который я использовал, не работает. Он ведет обратный отсчет, но не обновляет фунты, пока не достигнет 00:00.

Задавший следующий вопрос (получил ли я код) сказал, что это работает отлично, но для меня это совсем не так.

Пример, который я использовал

Мой код:

 Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Обрабатывает MyBase.Load
    picLogo.SizeMode = PictureBoxSizeMode.StretchImage
    'Таймер до обновления
    tmrUpdate.Interval = 300000 '5 минут
    TargetDT = DateTime.Now.Add(CountDownFrom)
    tmrUpdate.Enabled = Истина
Конец сабвуфера
Private Sub tmrUpdate_Tick (отправитель как объект, e как EventArgs) обрабатывает tmrUpdate.Tick
    Dim ts As TimeSpan = TargetDT.Subtract(DateTime.Now)
    Если ts.TotalMilliseconds > 0 Тогда
        lblTimer.Text = ts.ToString("мм\:сс")
    Еще
        lblTimer. Text = "00:00"
        tmrUpdate.Stop()
    Конец, если
Конец сабвуфера
 

• vb.net
• таймер

7

Ответ:

Использование асинхронного сабвуфера У меня был запущен таймер обратного отсчета, в то время как другие вещи происходили в фоновом режиме. Таким образом, приложение все еще можно было использовать во время Sub Wait() , и этот код также отображал таймер обратного отсчета. Используется один таймер с интервалом в 1 секунду.

 Частная асинхронная подпрограмма DoStuff()
'Делать вещи
времяUpDate = 599
 tmrUpdate.Start()
 Приложение.DoEvents()
 Ждать Task.Run(Sub()
 Ждать()
 Конец суб)
 Петля
Конец сабвуфера
Private Sub Timer1_Tick (отправитель как объект, e как EventArgs) обрабатывает tmrUpdate.Tick
 Dim hms = TimeSpan.FromSeconds(timeUpDate)
 Dim m = hms.Minutes.