1. Список говнокодов пользователя labutinpa

    Всего: 4

  2. C++ / Говнокод #8666

    +161

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    AnsiString DateArray = "";
int DaysBetween = 0;
DaysBetween = DateTimePicker2->Date - DateTimePicker1->Date;
for (int i = 0; i <= DaysBetween; i++ )
{
 if (i != 0)
 DateArray = DateArray + " OR ";
 DateArray =  DateArray + " date_made = '"+DateToStr(DateTimePicker1->Date + i)+"'";
}

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

    labutinpa, 29 Ноября 2011

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

  3. SQL / Говнокод #8665

    −126

    1. 1
    2. 2
    3. 3
    AND (type = 2 OR type = 5 AND (type <> 3 OR type <> 20))

Очередной перл предшественника :)

    labutinpa, 29 Ноября 2011

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

  4. Pascal / Говнокод #4749

    +101

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    procedure TSomeForm.DBGridEhDrawColumnCell(SomeParams);
begin
  ShowRecordCount(GridDataSet);
end;
...
procedure ShowRecordCount(const FibDataSet: TpFibDataSet);
begin
  FormMain.StatusBar1.Panels[2].Text := 'записей='+ IntToStr(FibDataSet.VisibleRecordCount);
  FormMain.StatusBar1.Refresh;
end;

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

    labutinpa, 25 Ноября 2010

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

  5. C++ / Говнокод #1769

    +49.9

    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
    bool __fastcall TForm1::ImportFile(AnsiString FName, int Direction)
{
bool StatusUpload;
StatusUpload = true;

TStringList *Inside;
Inside = new TStringList;
Inside->LoadFromFile(FName);
if (Direction == 1)
{
  // ...
  date_made = StrToSqlDate(Inside->Strings[1]);
  ops = Inside->Strings[0];

  Inside->Delete(0);
  Inside->Delete(0);
  Inside->Delete(0);

  int Iterations = (Inside->Count/5);
  for (int i=0; i<Iterations; i++)
  {
    AnsiString A, B, C, D, E;
    A = Inside->Strings[0].Trim();
    B = Inside->Strings[1].Trim();
    C = Inside->Strings[2].Trim();
    D = Inside->Strings[3].Trim();
    E = Inside->Strings[4].Trim();
    for (int j=0; j<5;j++)
       Inside->Delete(0);

    if (A == "1.1.2")
      E='1';

    if (A == "4.13" || A == "4.13" || A == "4.13")
	  E='20';
    C = RemoveZPT(C);
	ADOQuery1->SQL->Text = "INSERT INTO dnevnik_inside (row_id, ops, date_made, code, sign, val, val_init, direction, type) VALUES ("
      + row_id + ", '" + ops + "', '" + date_made + "', '" + A + "', '"
      + B + "', " + C + ", " + C + ", '" + D +"', '"+E+"')";
    ADOQuery1->ExecSQL();
  }
  Trans->CommitRetaining();
}

    Собсно, название функции говорит само за себя :)
    П.С. Коллега, не обижайся!

    labutinpa, 05 Сентября 2009

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