Приложение не отвечает. Закрыть?

[Steepe_Hare]

На Android-е мое приложение иногда делает определенную вычислительную работу и в этот момент не реагирует на нажатия. Application.ProcessMessages не помогает. Потом появляется это сообщение ("Приложение не отвечает. Закрыть?") Если подождать пока отработает, то всё возвращается в норму.

Слышал, что нужно вычисления выносить в поток TThread.

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

[Steepe_Hare]

10 минут назад, GASCHE сказал:

Все зависит от того что вы понимаете под словом работает, а так да работает никто и не спорит.

под работает я понимаю, что программа дожидается пяти нажатий кнопки, затем продолжает нижеследующий код. под Андроидом просто зависает и не реагирует на нажатия кнопки

[GASCHE]

1 час назад, Steepe_Hare сказал:

под работает я понимаю, что программа дожидается пяти нажатий кнопки

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

Изменено 1 декабря, 2016 пользователем GASCHE

[krapotkin]

вы не поверите, этот цикл УЖЕ встроен в программу (см. Application.Run) , и повторять его не надо.

и вам уже написали 2.5 раза, как нужно делать. Под windows, android, и вообще любую платформу

[Steepe_Hare]

6 часов назад, krapotkin сказал:

вы не поверите, этот цикл УЖЕ встроен в программу (см. Application.Run) , и повторять его не надо.

и вам уже написали 2.5 раза, как нужно делать. Под windows, android, и вообще любую платформу

Хорошо, посмотрите этот пример. Под Андроидом кнопка Stop не нажимается, а под Виндами она срабатывает и можно всё остановить.

Дайте, пожалуйста, пример для Андроида, который бы работал, как задумывается! (остановить итерацию) Спасибо!

Proj2.zip

[krapotkin]

вы вообще не читаете? этот пример от первого не отличается ничем.

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

while not terminated do begin processMessages  end;

и все события, которые возникают в программе и системе, обрабатываются именно там.

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

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

[GASCHE]

9 часов назад, Steepe_Hare сказал:

который бы работал, как задумывается!

Да чтоб понять как вы задумали надо обращаться к Кашпировскому.  Запускайте цикл

while not Cancelled do begin
   Inc(I);
end;

в потоке думаю это решит вашу проблему.
  

 

 

[krapotkin]

не надо ничего в потоке, который так же сожрет весь проц

[kami]

Да простят (или не простят) меня модераторы за ссылку на сторонний ресурс, но вот достаточно фундаментальный труд, который разжевывает всё по полочкам и не потерял ни грана актуальности с момента написания. Доступен даже (особенно) для тех, кто про потоки не слышал или "я знаю, что есть такое слово"

Изучать до просветления. И после прочтения - не стараться использовать потоки где попало. Ну, это придет с опытом.

Изменено 2 декабря, 2016 пользователем kami

[Pax Beach]

Блин, да сделайте уже парню готовый пример, и давайте закроем эту ветку , а то вы его, чувствую, скоро четвертуете )

[krapotkin]

я сделал в самом начале, какой еще пример?

[Rusland]

45 минут назад, Pax Beach сказал:

Блин, да сделайте уже парню готовый пример, и давайте закроем эту ветку , а то вы его, чувствую, скоро четвертуете )

Как-то так наверно.

 

[kami]

1 час назад, Pax Beach сказал:

Блин, да сделайте уже парню готовый пример,

да, давайте раздавать всем рыбу вместо удочек.

[Pax Beach]

19 минут назад, kami сказал:

да, давайте раздавать всем рыбу вместо удочек.

А неделю всерьез обсуждать простейший вопрос — нормально? )