1. Pascal / Говнокод #27214

    −2

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    procedure ProgramRestart(Sender: TObject);
begin
   Application.Terminate;
   ShellExecute(0,'open',Application.ExeName,'','',SW_NORMAL); // ))
end;

    Неделю когда-то пытался понять почему этот код не работает: "Я же программу вырубил? - вырубил... Я же ее запускаю? - запускаю... А че она не запускается?)))..."

    Запостил: vovka3003, 13 Января 2021

    Комментарии (36) RSS

    • ava guest6 14.01.2021 00:15 # 0

      Какой багор )))
      Ответить

    • ava guest6 14.01.2021 00:17 # 0 

      exit(0);
puts("Ня, пока");
      Ответить

    • ava ASD_77 14.01.2021 13:21 # −1

      надо было резидент вешать на прерывание и ловить выход программы. по выходу запускать ее опять :)
      Ответить

      • ava vovka3003 14.01.2021 16:11 # 0

        Кстати да... Наверное так и сделаю. Я когда понял почему не работает мой говнокод сразу написал другой говнокод (поменял эти строки местами).
        Ответить

      • ava guest6 14.01.2021 16:14 # 0

        что за чушь? какой резидент? какое прерывание в защищенном режиме на винде?
        Ответить

        • ava ASD_77 14.01.2021 17:30 # 0

          ну разве не видно что это Pascal а знчит на дворе 1994 год эра развития Win 3.11 и ДОС программирования. так что все честно - нужно хватать прерывание :)
          Ответить

          • ava guest6 14.01.2021 18:46 # 0

            какой ShellExec там?
            Ответить

            • ava ASD_77 14.01.2021 19:50 # 0

              Ну я не знаю что в паскакале нативная имплементация может они WinExec вызывают :)
              Ответить

              • ava guest6 14.01.2021 19:57 # 0

                ShellExecute это виндовая функция уровня Shell API, примерно ее ты вызваеш, когда кликаеш на ерлык
                Ответить

    • ava guest6 14.01.2021 16:20 # +1

      сначала я убью себя, а потом её
      Ответить

      • ava vovka3003 14.01.2021 16:27 # 0

        :)) Да-да-да..! Именно!
        Ответить

      • ava Rooster 14.01.2021 16:39 # 0

        Он ходит, дышит, думает не так -Убей!
        И ты уверен в том, что это враг -Убей!
        Не думай ни о чем, ты будешь прав -Убей!
        Во имя счастья, правды и добра
        Убей их всех!

        Вот так!

        Он виноват хотя бы в том,
        Что в стороне стоит сейчас.
        Он плохо помнит наш закон;
        Тот, кто не с нами, - против нас.

        Наплюй на белый флаг,
        Трави их как собак,
        Отныне будет так.

        Убей!
        Убей их всех!
        Всех!
        Убей их всех!
        Начни с себя.
        Ответить

        • ava Steve_Brown 15.01.2021 13:54 # 0

          Внеси свой вклад
          в дело ЗЛА!

          Сожри своё лицо!
          Насри в дверной глазок!
          Убей
          всех своих друзей!
          Ответить

        • ava Madhouse_camomile 15.01.2021 22:06 # 0

          Симпатично, Черный обелиск.
          Ответить

    • ava vovka3003 14.01.2021 16:29 # 0

      Вообще задача была именно "грохнуть" текущий экземпляр (не "подождать корректного закрытия")... Посему наверное оставлю как есть (сначала ее, потом себя))
      Ответить

      • ava ASD_77 14.01.2021 19:51 # 0

        сначало роди клона а клон убьет тебя потом ее а потом опять одится :)
        Ответить

    • ava guest6 15.01.2021 17:55 # 0

      https://youtrack.jetbrains.com/issue/RIDER-56318
      Ответить

      • ava vovka3003 15.01.2021 20:51 # 0

        Памагите кенгуру... Кенгуру в своем кармане обнаружула дыру)
        Ответить

        • ava inkanus_gray 15.01.2021 22:11 # +2

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

          Выбор за тобой.
          Ответить

    • ava inkanus_gray 15.01.2021 22:07 # 0

      1. Для любителей повыёбываться. Перезапускайте себя с ключом "-restart", который отслеживайте в запускаемом экземпляре программы + создайте мьютекс, который будете проверять в запускаемом экземпляре, после чего завершитесь. Если программа обнаружит, что запускается с ключом "restart", она должна запуститься со скрытой формой и проверить наличие мьютекса (прога-родитель еще жива). Как только он исчезнет, форму показать.

      2. Создайте restart.exe и не выёбывайтесь.
      Ответить

    • ava betking1 19.07.2021 12:37 # 0

      а за запускаю другой exe, который закрывает все процессы моей программы, потом ее запускает и сам закрывается
      Ответить

      • ava CBuHOKYP 04.10.2021 00:32 # 0

        Хуйню ты делаешь. Не нужен секс, там где можно обойтись дрочкой.
        Ответить

      • ava KPblCA 13.01.2024 21:09 # 0

        ты тупой уебан и девственник
        Ответить

    Добавить комментарий