Search results

  1. Pommity

    [Delphi]SkyBattle

    2 Unit#0: В этом приложении заметны тормоза, когда игрок стреляет и идёт одновременно. Видно, что выполнение алгоритма в цикле занимает больше времени, чем выделено для одного прохода цикла. Если бы эффекты при стрельбе и при ходьбе были посложнее, программа зависала бы полностью.
  2. Pommity

    [Delphi]SkyBattle

    2 Hedgehog: Я могу выполнять сначала проигрывание анимации, тогда зависнет форма и всё, что на ней. Я могу сначала выполнять остальные процедуры, тогда зависнет анимация. Я могу попеременно переключаться между тем и другим, тогда игра не получится, будут сплошные глюки. Мне нужно, чтобы...
  3. Pommity

    [Delphi]SkyBattle

    2 Hedgehog: Я могу выполнять сначала проигрывание анимации, тогда зависнет форма и всё, что на ней. Я могу сначала выполнять остальные процедуры, тогда зависнет анимация. Я могу попеременно переключаться между тем и другим, тогда игра не получится, будут сплошные глюки. Мне нужно, чтобы...
  4. Pommity

    [Delphi]SkyBattle

    2 Unit#0: И как же ими воспользоваться?
  5. Pommity

    [Delphi]SkyBattle

    2 Unit#0: А тут и нечему зависать. У тебя же нет там больше ничего, кроме анимации. 1452255583 2 DarkEssence: Всё у меня успевает. У меня не работает форма и другие процедуры, пока выполняется анимация. Но с самой анимацией как раз всё в порядке, она работает норм.
  6. Pommity

    [Delphi]SkyBattle

    2 DarkEssence: Это можно сделать без применения потоков? Не люблю подобные советы.
  7. Pommity

    [Delphi]SkyBattle

    2 qpAHToMAS: Я говорил не про "внутри".
  8. Pommity

    [Delphi]SkyBattle

    2 qpAHToMAS: Во-первых, Delphi не может адекватно отследить такие короткие промежутки времени(мне надо около 1 мс). Во-вторых, если во время этой паузы будет выполняться другая процедура, то кадр не сменится, пока процедура не завершится.
  9. Pommity

    [Delphi]SkyBattle

    2 Unit#0: То есть, мне надо сделать цикл настолько быстрым, что я анимацию не увижу вообще, так? 1452247644 2 Unit#0: Зависнет, так зависнет. Давай распоточим, а там посмотрим.
  10. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Ох, жесть )))) Наверное потому не виснет, что ЦИКЛ БЫСТРО ЗАВЕРШАЕТСЯ. Или для понимания этого много ума надо? Ты сообщения мои внимательно читаешь? пока выполняется цикл
  11. Pommity

    [Delphi]SkyBattle

    У нормальных людей пока выполняется цикл, программа отвечает? Или начинает отвечать лишь после завершения цикла?
  12. Pommity

    [Delphi]SkyBattle

    2 DarkEssence: Есть предложение рисовать не циклом? А как?
  13. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Цикл длится ровно столько, сколько длится анимация, логично? 1452245610 2 DarkEssence: Именно так!
  14. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Возможно, только непонятно, как это проверить. Если задержка длится пол-секунды, как ты её отследишь?
  15. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Зачем?
  16. Pommity

    [Delphi]SkyBattle

    2 Unit#0: От мощности машины это не зависит. На мощной машине цикл просто быстрее закончится. Но всё равно пока будет обсчитывать, будет висеть. Я тебе могу дать программу, которая вообще пустая, и она на твоём НЕкалькуляторе будет висеть минут 5
  17. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Без разницы, откуда. В любой программе, с любым кодом пока цикл выполняется, программа висит.
  18. Pommity

    [Delphi]SkyBattle

    2 Unit#0: procedure TForm1.Kill(A: TImage); var x:integer; begin for x:=1 to 50 do begin end; end; Цикл, который не выполняет ничего. Программа не отвечает, пока цикл не окончится.
  19. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Я могу и его удалить, если он тебе мешает
  20. Pommity

    [Delphi]SkyBattle

    2 Unit#0: Посмотри на последний вариант кода. Где ты видишь пиксели и файлы?