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

    +102.5

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    procedure TFrmCashBook.ButtonGroupDeleteClick(Sender: TObject);
    var
      CmpField : String;
      CmpOperator : String;
      StringToCmp : String;
      DeletedCount : Integer;
    begin
      if MessageDLG('Âû óâåðåíû?', mtConfirmation,
        [mbYes,mbNo],0) <> mrYes then Exit;
    
      CmpField := GroupDeleteSelectFieldComboBox.Text;
      CmpOperator := GroupDeleteSelectComparisonOperatorComboBox.Text;
      // âîçìîæíûå îïåðàòîðû '=', '>', '>=', '<', '<='
    
      StringToCmp := GroupDeleteEdit.Text;
    
      DeletedCount := 0;
      with DM.TblCashBook do begin
        First();
        while not EOF do begin
          if ( (CmpOperator = '=' ) and
               (FieldByName(CmpField).AsString = StringToCmp ) ) or
             ( (CmpOperator = '>' ) and
               (FieldByName(CmpField).AsString > StringToCmp) ) or
             ( (CmpOperator = '>=') and
               (FieldByName(CmpField).AsString >= StringToCmp) ) or
             ( (CmpOperator = '<' ) and
               (FieldByName(CmpField).AsString < StringToCmp) ) or
             ( (CmpOperator = '<=') and
               (FieldByName(CmpField).AsString <= StringToCmp) ) then
          begin
            Delete();
            DeletedCount := DeletedCount + 1;
          end
          else //åñëè çàïèñü óäàëåíà, next() íå íóæåí
            Next();
        end;
      end; //with
      ShowMessage('Óäàëåíî çàïèñåé: ' + inttostr(DeletedCount));
    end;

    GovnocoderJr, 16 Января 2010

    Комментарии (11)
  2. Ruby / Говнокод #2422

    −130.2

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    class FinancialEventObserver < ActiveRecord::Observer
      observe Payment, Invoice
      def before_save(model)
        event = nil        
        if model.class == Payment
          if model.new_record?        
            event = FinancialEvent.new(:event => FinancialEvent::Event::PAYMENT_INVOICE,
            :arguments => {:client_name => model.invoice.client.short_name, :invoice_number => model.invoice.invoice_number},
              :company_id=>model.invoice.client.company.id)
          end
        elsif model.class == Invoice
          i = Invoice.find_by_id model.id      
          if model.new_record? or i.status != model.status        
            if model.status == Invoice::Status::ESTIMATE
              event = FinancialEvent.new(:event => FinancialEvent::Event::ESTIMATE_SEND,
            :arguments => {:client_name => model.client.short_name, :invoice_number => model.invoice_number},
                :company_id=>model.client.company.id)
            elsif model.status == Invoice::Status::APPROVED
              event = FinancialEvent.new(:event => FinancialEvent::Event::ESTIMATE_APPROVED,
            :arguments => {:client_name => model.client.short_name, :invoice_number => model.invoice_number},
                :company_id=>model.client.company.id)
            elsif model.status == Invoice::Status::REJECTED
              event = FinancialEvent.new(:event => FinancialEvent::Event::ESTIMATE_REJECTED,
            :arguments => {:client_name => model.client.short_name, :invoice_number => model.invoice_number},
                :company_id=>model.client.company.id)
            elsif model.status == Invoice::Status::SEND
              event = FinancialEvent.new(:event => FinancialEvent::Event::INVOICE_SEND,
            :arguments => {:client_name => model.client.short_name, :invoice_number => model.invoice_number},
                :company_id=>model.client.company.id)            
            end
          elsif !model.new_record? and i.state != model.state
            if model.state == Invoice::State::DELETED
              event = FinancialEvent.new(:event => FinancialEvent::Event::INVOICE_DELETED,
            :arguments => {:invoice_number => model.invoice_number},
                :company_id=>model.client.company.id)
            end
          end    
        end
        event.eventable = model.requester unless event.blank? 
        event.save unless event.blank?
        
      end
      def before_destroy(model)
        if model.class == Payment
          event = FinancialEvent.new(:event => FinancialEvent::Event::PAYMENT_DELETED,
            :arguments => {:invoice_number => model.invoice.invoice_number},
          :company_id=>model.invoice.client.company.id)
          event.eventable = model.requester
          event.save
        end    
      end
    end

    о боже, зачем я открыл этот файл?

    rakoth3d, 16 Января 2010

    Комментарии (5)
  3. Си / Говнокод #2421

    +144.9

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    char str[n]="Programmirivanie eto horoshiy predmet";
         for(i=0; i<n; i++)
         {
              printf("%c", str[i]);
         }
         printf("\n");

    Без комментариев ))

    Grockles, 15 Января 2010

    Комментарии (18)
  4. PHP / Говнокод #2420

    +162

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    <?
    $str = ""; 
    $amp="";
    foreach ($p as $i=>$v)
    {
             $str .= $amp."$i=$v";
             $amp = "&";
    }
    ?>

    xXx_totalwar, 15 Января 2010

    Комментарии (16)
  5. C++ / Говнокод #2419

    +66.6

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    //Дефайн в некотором хэдере
    #define _TAPI(b) do {BOOL _b = (BOOL)(b); if (!b) throw(system_exception(GetLastError())); } while (false);
    //...
    // И далее такое:
    //...
    _TAPI (::CreateProcess(0, (LPWSTR)m_process.c_str(), 0, 
    				0, FALSE, CREATE_SUSPENDED, 0, 0, &si, &pi));

    Мой говнокод, хотя скорее опечатка =), я с такими явлениями уже не раз сталкивался, но все равно в течение получаса не мог понять, почему у меня по два процесса запускается =)))

    ISith, 15 Января 2010

    Комментарии (33)
  6. Perl / Говнокод #2418

    −109.5

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    sub title {
        my ($str, $len) = @_;
    
        while (1) {
            last if substr($str, $len, 1) eq ' ';
            ++$len;
        }
    
        return substr($str, 0, $len) . "...";
    }

    аналог Index.

    klem4, 15 Января 2010

    Комментарии (5)
  7. JavaScript / Говнокод #2417

    +159.6

    1. 1
    document.getElementById('myID').disabled = document.getElementById('myCheckbox').checked == false ? true : false;

    Это замечательно, тащем-та! =) Досталось в наследство от команды аутсорсеров. =)

    Red Son, 15 Января 2010

    Комментарии (4)
  8. Ruby / Говнокод #2416

    −131.4

    1. 1
    some_variable = (some_condition && some_other_condition) ? true : false

    Иногда встречаю ГК подобный этому но реализованный в виде case..when. Еще более впечатляет :)

    shine, 15 Января 2010

    Комментарии (13)
  9. JavaScript / Говнокод #2415

    +143.5

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    if (data.success) {
         document.location = "/contests/" + $('#contest_id').val() + '/' + $('#composition_type').val() + '/page/1';
    }else {
         document.location = "/contests/" + $('#contest_id').val() + '/' + $('#composition_type').val() + '/page/1';
    }

    Stinkie, 15 Января 2010

    Комментарии (4)
  10. C# / Говнокод #2414

    +144.2

    1. 1
    if ( strlen(f.ToString()) < 5 )

    Проверку булевской переменной.

    Говногость, 14 Января 2010

    Комментарии (9)