Ни один релиз компонентов для VCL не обходится без. Анимация индикаторов Два новых типа. Долго и успешно кодил на delphi. Y51n9XAjM80/hqdefault.jpg' alt='Delphi Компоненты Стрелочный Индикатор' title='Delphi Компоненты Стрелочный Индикатор' />Ссылка на скачивание исходника https yadi. B0j. RY5t. NotificЕще раз про стрелочные индикаторы и совсем без МК Geektimes. Всем привет Бывает нужно глянуть, сколько осталось свободной памяти, запуская третий четвертый экземпляр тяжелой программыигры не хочется доводить до ситуации, кода предыдущие экземпляры свопятся. Или с загрузкой процессора раньше я думал, что современные Crysis, Call of Duty, Mass Effect и т. Теперь я знаю, что даже когда картинка подтормаживает проц загружен не больше 3. Ну или с ходу оценить, все ли ядра использует рендеринг. А какое удовольствие глазу доставляют дергающиеся стрелочки. И вот, разбирая старый старый хлам в старом старом шкафу, я нашел ИХ. Как раз два стрелочных индикатора из старого бобинного магнитофона. Ох сколько он в свое время перемотал бобин с Кино и Modern Talking. Итак, чтобы идея заработала, были нужны красивые индикаторы с подходящей шкалой аппаратная часть для подключения индикаторов к компьютеру программа для вывода загрузки памяти и процессора. Delphi Компоненты Стрелочный Индикатор' title='Delphi Компоненты Стрелочный Индикатор' />Разделил пополам, достал старую шкалу, по размерам нарисовал и распечатал новую. Собрал в обратном порядке. После написания статьи посмотрел на фотографии и разобрал их опять. Взял у жены красный лак для ногтей и покрасил стрелки. AiUleTifLJk/hqdefault.jpg' alt='Delphi Компоненты Стрелочный Индикатор' title='Delphi Компоненты Стрелочный Индикатор' />Delphi оказалась наиболее популярной на рынке систем быстрой. CBuilder унаследовал версию Библиотеки Визуальных Компонент Delphi 2. Его компонента моделирует бинарный индикатор, который меняет цвет при изменении состоянии. Delphi быстро и качественно Я старался везде, где это только было возможно указывать источник. Как раз два стрелочных индикатора из старого бобинного магнитофона. Через полчаса программа на Delphi единственное, что еще. Ссылка на скачивание исходника httpsyadi. B0jRY5t NotificПолучилось заметнее это видно на видео. Инструкция Crown 50C3ma. Аппаратная часть. Тут я с контроллерами мудрить не стал. На мамке есть LPT, он мне для каких то других целей пригодится вряд ли, так что нечего ему простаивать. Простейший ЦАП резисторы и диоды, рисуем для двух каналов эстеты, простите за ISIS Точностью резисторов пренебрег, запилил то, что бывает в природе 1. Ом. Как водится, паяем макет и проверяем в работе. Калибровка заключается в установке стрелок подстроечниками на максимальное деление шкалы при передаче в порт значения 2. С железом все. Программа. Сложнее всего оказалось найти драйвер для работы с LPT Win 8 х. После нескольких часов поисков я наконец нашел DLPort. IO драйвер библиотека 3. Ссылку, к сожалению, уже потерял, лишь сохранил себе на Яндекс. Диск. Через полчаса программа на Delphi единственное, что еще как то помню со времен учебы была написана Спойлерprocedure TForm. Timer. 1TimerSender TObject. Mem. Status. dw. Length sizeof TMemory. Status. Global. Memory. Status Mem. Status. Mem. Val round1. Mem. Status. dw. Memory. Load1. 00 shl 4 верхние 4 бита память, нижние CPU. CPUUsage. 3 CPUUsage. CPUUsage. 2 CPUUsage. CPUUsage. 1 CPUUsage. CPUUsage 0. Collect. CPUData. for i 0 to Get. CPUCount 1 do begin. CPUUsage CPUUsage Get. CPUUsagei. CPUUsage CPUUsage Get. CPUCount. CPUUsage CPUUsage CPUUsage. CPUUsage. 2 CPUUsage. CPUVal Round1. CPUUsage. CPUVal CPUVal or Mem. Val. Dl. Port. Write. Port. Uchar 8. 88, CPUVal. Два раза в секунду читаются значения загрузки RAM и CPU и отправляются в порт H3. В комментариях к оригинальной статье был вопрос про то, сколько ресурсов кушает программа, показывающая загрузку ресурсов. Отвечаю согласно диспетчеру задач загрузки процессора более 0 не было, а вот памяти 9. Ничего, еще доберусь до оптимизации и поправлю. Подсветки нет, но планируется. Думаю откуда запитать. Конструкция носит скорее эстетический характер плюс удовольствие от сделанногособранногоспаянного лично, а ведь это бесценно. Напоследок небольшое видео Спасибо за внимание, желаю и Вам найти в шкафу стрелочный индикатор.