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

    +103.8

    1. 1
    2. 2
    3. 3
    4. 4
    TblCashBook.First();
    while not TblCashBook.Eof do begin
      if not (TblCashBook.FieldByName('Date').AsDateTime <=
          ReportDate) then Continue;

    Запостил: GovnocoderJr, 19 Января 2010

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

    • ava klem4 19.01.2010 19:50 # 0

      очередная лабораторка ? помню в бытность универа нас порой именно так писать заставляли(хоть и смысла в этом нет), а уже только потом с применением фильтрации, уж не помню как оно в делфе будет. Так что не гк. -1.
      Ответить

      • ava guest 19.01.2010 20:34 # +5

        не говнокод потому что заставили говнокодить?
        какая разница по своему желанию или же нет - это все внешние факторы, мало к делу относящиеся

        да и вообще нахуй таких преподов
        Ответить

        • ava cfdev 18.05.2010 19:48 # +1

          > да и вообще нахуй таких преподов

          говнокодеры преподают - ужос
          Ответить

      • ava gEKA6PbCKuu_nemyx 22.12.2021 12:23 # 0

        Ты давно универ окончил?
        Ответить

    • ava guest 19.01.2010 21:14 # −1

      И в чем именно говнокод? Я так тоже любой код могу запостить и сказать говнокод...
      Ответить

    • ava guest 21.01.2010 14:18 # −2

      А где в цикле TblCashBook.Next()
      Ответить

    • ava guest 03.02.2010 15:47 # +1

      для тормозов - при первом попавшимся условии "not TblCashBook.FieldByName('Date').AsDateTi me <= ReportDate) происходит зацикливание
      Ответить

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