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

    +1000

    1. 1
    2. 2
    3. 3
    4. 4
    procedure PP.Execute;
begin inherited;
(Sender as TIndusImage).KOT;
end;

    В Delphi XE, не знаю с какой версии начиная (в XE7 и XE8 точно) крупные проблемы с TGifImage, а если точнее - если быстро и много их менять, то рано или поздно вываливается тупо всё вместе с интерфейсом (100% где-то в потоках налажали), причем если быстро менять BMP, то всё ОК.

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

    Писал особо не заботясь ни о чем, а потом заметил вот таких индусских котов.

    Запостил: KOTOM, 03 Августа 2015

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

    • ava guest 04.08.2015 12:46 # 0

      Что, Delphi еще жив? На нем еще кто-то пишет?
      Ответить

      • ava kegdan 04.08.2015 14:27 # +1

        >> На нем еще кто-то пишет?

        >> KOT
        Ответить

        • ava bormand 04.08.2015 14:40 # +3

          На нем ёще кот-то пишет.
          Ответить

          • ava kegdan 04.08.2015 15:35 # 0

            на диалекте "Коталь"
            Ответить

            • ava KOTOM 04.08.2015 21:36 # 0

              Лол. На нём пишут те, кому лень думать, почему всё написано правильно, но ничего не работает (Пишут для себя естественно).
              Ответить

              • ava 3_14dar 05.08.2015 09:31 # 0

                Зачем писать на языке с динамической типизацией чтобы потом нихера не работало?
                Ответить

                • ava bormand 05.08.2015 09:36 # +2

                  Динамическая типизация в паскале? Это что-то новенькое...
                  Ответить

                  • ava kegdan 05.08.2015 10:02 # +2

                    В делфи вроде был какой то динамический тип данных
                    Ответить

                  • ava inkanus-gray 05.08.2015 10:36 # 0

                    В Object Pascal (Delphi) действительно есть тип Variant, в котором можно хранить значение почти любого типа. Реализован он как запись с двумя полями:
                    1. Первое поле — дескриптор. В нём хранится числовое значение, указывающее на тип значения второго поля.
                    2. Второе поле — вариантное (в терминах языка Си — union).

                    Но, увы, автоматического преобразования типов, как в PHP, нет. Нужно явно вызывать функции преобразования.

                    Очень мало библиотечных функций принимают на вход Variant.

                    И вообще его почти не используют. Разве что для того, чтобы написать самодельный аналог функции printf для доказательства, что «всё можно сделать своими руками». Троллейбус из буханки, короче.
                    Ответить

                    • ava roman-kashitsyn 05.08.2015 10:44 # 0

                      > В нём хранится числовое значение, указывающее на тип значения второго поля

                      Я правильно понимаю, что так можно закодировать лишь заранее известное подмножество типов? Подход не расширяемый?
                      Ну т.е. понятно, что туда можно впихнуть какой-нибудь Object, но как потом понять, какой был первоначальный тип? instanceof?
                      Ответить

                    • ava bormand 05.08.2015 10:45 # +2

                      > В Object Pascal (Delphi) действительно есть тип Variant
                      А в c++ есть boost::any, в котором можно хранить значение любого типа, который можно копировать. И что теперь...
                      Ответить

                      • ava kegdan 05.08.2015 10:50 # +2

                        Может пидар кроме variant ничего в делфи и не видел.
                        Хотя скорее всего он ничего в делфи не видел
                        Ответить

                      • ava roman-kashitsyn 05.08.2015 10:52 # 0

                        boost::any - шняга. boost::variant - няшка.
                        Я его иногда использую для message-passing style.
                        Ответить

                        • ava bormand 05.08.2015 10:56 # 0

                          Но ведь в boost::variant можно упихать не все типы, а только перечисленные. Динамическая типизация не получится.
                          Ответить

                          • ava kegdan 05.08.2015 10:58 # 0

                            Инта уже недостаточно?
                            Ответить

                            • ava bormand 05.08.2015 10:59 # +1

                              > инта
                              Его уже давно недостаточно... В него, к примеру, даже указатель или размер блока памяти кастануть нельзя. А указатель на член - и подавно.
                              Ответить

                    • ava 3.14159265 25.11.2015 21:59 # 0

                      >Троллейбус из буханки, короче.
                      Это уже не модно
                      https://images.encyclopediadramatica.se/thumb/4/48/Potatotron2000.jpg/800px-Potatotron2000.jpg
                      Ответить

                  • ava 3_14dar 05.08.2015 10:49 # 0

                    Со статической конечно же, еще и строгой.
                    Ответить

    • ava doctor_stertor 27.08.2017 00:02 # 0

      Вызывать CoInitialize() автор, конечно не пробовал..
      Зачем, если можно обвинить приписать свою глупость и лень - разработчикам.
      Слово inherited тоже лишнее. Execute - виртуальный метод.
      Ответить

      • ava bormand 29.08.2017 05:06 # 0

        > CoInitialize
        В делфи гифки через COM объект реализованы?
        Ответить

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