Загрузка файла с отображением полной информации

[Аватар]

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

[doktor255]

Меня в этом коде больше интересовала методика корректной перерисовки лэйблов. Сдаётся мне, что

procedure RedrawControl(ALabel: TLabel);
begin
  ALabel.Repaint;
  ALabel.Refresh;
end;

Не самое оптимальное решение. Но к сожалению другого метода перерисовки я не нашёл. Контролы начинали расплываться, и менять "жирность". Ну и собственно по итогу понял, что в программах такого типа расчёты нужно вести не внутри OnWork, а выводить в отдельный таймер. Это позволит более плавно менять показатели без раздражающих скачкообразных изменений.

[Человек_Борща]

А зачем? При установке значения, визуальный контрол сам перересуется.

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

Все проще Об этой проблеме подумали и придумали двойную буфферизацию(свойство DoubleBuffered).

[doktor255]

Сообщение от Человек_Борща

А зачем? При установке значения, визуальный контрол сам перересуется.

Хрена. Возникшие проблемы описал выше. Начинает меняться жирность шрифта, расплываться буквы, появляться артефакты даже за пределами окна приложения

Сообщение от Человек_Борща

Все проще Об этой проблеме подумали и придумали двойную буфферизацию(свойство DoubleBuffered).

Аналогично хрена. Буферизацию включил самой первой. До лампочки. индя слишком быстро выдаёт данные, и стандартные ухищрения не помогают лэйблу. Application.Processmesages так же до лампочки. А вообще в процитированном сообщении речь шла не о мерцании, как в отключенной буферизации, а об быстрой смене значений (до 50 значений в секунду), которые при такой частой смене перестают нести полезную информацию. В общем нужно добавлять искусственную инерцию.

[STRELOK-2007]

Сообщение от doktor255

В виду того, что топикстартер оказался жмотом, выкладываю решение на халяву так сказать. А чтоб не скучно было изучать, в архиве только pas.

Тебе лиж-бы впарить какой то говнокод новичкам, барыга. Помощничек.

[STRELOK-2007]

По теме, используй Synapse и событие onStatus

Больше чем подробно, описано здесь:
http://www.webdelphi.ru/2011/07/bibl...-pas/#onstatus

А скорость, время...
Ну можно засечь начальную дату и время, ввести переменную сколько скачалось (хотя она и так будет, чтобы отображать прогресс).
Дальше:
сколько скачено[в байтах] / (Дата конца - дата начала)[в секундах]

и будет тебе значение сколько байт/сек. Перевести в кб, мб, гб - ноу проблем.

[Человек_Борща]

В общем нужно добавлять искусственную инерцию.

Проще проверять не изменилось ли значение.

На Synapse в THTTPSendEx есть и размер и скорость и время.

[doktor255]

Сообщение от STRELOK-2007

Тебе лиж-бы впарить какой то говнокод новичкам, барыга. Помощничек.

Переход на личности запрещён. На запреты класть? Продолжай в том же духе.

Сообщение от Человек_Борща

Проще проверять не изменилось ли значение.

Значение изменилость +100500 раз за секунду. Толку от такой проверки?

[Человек_Борща]

Толку от такой проверки?

Своевременное обновление значения.
Задержка пусть даже с пингом в 4 мс уже не потребудет перерисовки руками.

Тебе лиж-бы впарить какой то говнокод новичкам, барыга. Помощничек.

Там рабочий код и отнюдь не индусский, писался на коленке. Яуказал на фееричную переключалку комнтролов ради лулзов, не более. У всех бывает, не для себя же писал(автор кода).

Вам сказали как сделать, вам повторили ПО полностью, вам даже исходник скинули "за так", а вам все не то. Вывод - проблемы нет, вам просто лень поднять ж*** и что-то сделать.

[doktor255]

Сообщение от Человек_Борща

Своевременное обновление значения.
Задержка пусть даже с пингом в 4 мс уже не потребудет перерисовки руками.

Боюсь пинг тут не при чём. Допустим скорость загрузки 10 мегабит (1 мегабайт). Индя может выдать до пары тысяч значений за секунду. Естественно такой поток данных нельзя отправлять непосредственно в label. Насколько я понимаю, грамотнее отправлять значение в глобальный Integer, а в каком нибудь таймере уже с нормальной скоростью брать промежуточные значение Integer, ну и дальше работать с ним. В общем как-то так...

Сообщение от Человек_Борща

Вам сказали как сделать, вам повторили ПО полностью, вам даже исходник скинули "за так", а вам все не то

Чуть чуть перепутал. Не он просил примеры. Просто не удовлетворён от того, что я его послал за то, что он попытался поймать меня на слабо в теме по выдиранию/замене иконок. Но не суть. Я не обижаюсь. Сам не ангел.