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

    −12

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    function THiPathCDRData.ToSQL: string;
    begin
      Result := 'Call ImportCall("' + FormatDateTime('YYYY-MM-DD hh:mm:ss', self.CallDate) +
        '", ' + #39 + stringreplace(self.InternalCallNumber, ' ', '', [rfReplaceAll]) + #39 + ', ' + #39 +
        stringreplace(self.ExternalCallNumber, ' ', '', [rfReplaceAll]) + #39 + ', ' +
        IntToStr(self.duration) + ', ' + #39 + GetEnumName(TypeInfo(TCallDirection),
        integer(self.CallDirection)) + #39 + ', ' + IntToStr(trunk) + ');';
    end;

    Писал, и ощущал запах.

    Запостил: Cynicrus, 01 Марта 2017

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

    • @<EXCEPTION_BAD_PTR>
      Сходу въебал плюс. В этом коде "прекрасно" всё.
      Ответить
    • 2107
      В делфи все еще нет нормальных эскейпов
      Ответить
      • В 2107 много чего нет. Вы бы ещё Копейку вспомнили.
        Ответить
      • А разве делфи не выродился в язык для обучения программированию без использования в реальных задачах?
        Ответить
        • лет 15 уже как
          Ответить
        • На дельфях слишком много софта написали в свое время, чтобы его можно было закопать
          Ответить
          • Можно пример пожалоуста?
            Ответить
            • http://delphi.wikia.com/wiki/Good_Quality_Applications_Built_With_Delphi

              например:
              Total Commander
              FL Studio
              KMPlayer
              Ответить
              • Тотал годный, правда
                не знал что он на дельфях
                Ответить
                • Он ещё и на вторых. Гислер собирает все 32-битные версии только ими, потому что так бинарник меньше.
                  Ответить
                  • Что-то мне подсказывает, что это не лучший путь. Бинарник распухает не из-за компилятора, а из-за библиотеки. Можно изобрести свой аналог VCL (были же проекты KOL, ACL) и собирать компилятором любой версии. В новых и кодогенератор по идее должен быть получше, и языковых возможностей побольше.
                    Ответить
                    • RTL тоже переизобретать? Он ведь тоже размер бинарника добавляет. Ну а языковые возможности я думаю ему даром не нужны, у него там отборная магия указателей с которой даже на fpc не компилится.
                      Ответить
                      • @отборная магия указателей
                        Ну, к магии-то Амаяку явно не привыкать...
                        Тов. Амаяк, Гисслер не на Ваши ли фокусы насмотрелся?
                        Ответить
            • вот ещё пример: http://u.to/P_DGDw
              Ответить
              • стертор, иди в жопу со своим поносным говносайтом
                я туда зашел и там мне сразу реклама в рыло, я даже не успел увидеть какой ты там хеллоу ворлд на дельфи написал

                зы:
                >>Мы ручаемся за безопасность наших программ и заявляем, чт
                "Мы" это ты мама?
                Ответить
                • Установи https://adblockplus.org и забудь о рекламе.
                  Ответить
                  • ты лучше захосьтся на нормальном месте

                    блин, за 10 баксов в год можно нормальный хостинг сделать
                    Ответить
                    • Зачем хоститься себе в убыток?
                      Ответить
                      • а зачем ты в Интернете сидишь себе в убыток?
                        Ответить
                      • Поддерживаю.
                        Ответить
                      • И то верно. Ведь есть бесплатные хостинги без назойливой рекламы. На 000webhost и 0fees даже php и mysql прикручены.
                        Ответить
    • Да, несимпатично.

      Во-первых, можно сэкономить на плюсиках, вспомнив, что коды с решёткой можно лепить вплотную друг к другу и к константам. Т. е. вместо
      #39 + ', ' + #39
      можно написать
      #39', '#39

      Во-вторых, #39 - это же #$27, т. е. код апострофа. Так? Апостроф можно вставлять в строку, только его нужно удваивать. Приведённый фрагмент можно записать так:
      ''','''
      Страшновато, а что поделать.

      Наконец, есть же функция Format как раз для сборки таких строк. Да, будет работать медленнее, чем тупая склейка строк, но по сравнению с затратами на sql-запрос это мелочи.
      Ответить
      • Тов. Амаяк, покажите фокус!..
        Ответить
        • Показал: http://govnokod.ru/22446#comment373385
          Ответить
          • Аплодисменты. Ловкость рук и никакого обмана.
            Ответить
            • Ловко поработал руками в твоем анусе, проверь.
              Ответить
              • Ты бы лучше головой поработал, чем руки марать.
                Ответить
                • Он футболист?
                  Ответить
                  • Инканус, ты очень неуклюжий мистификатор... Тебя уже разоблачали, причем не раз, а ты всё дурку валяешь.
                    Ответить

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