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

    +94

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    if MessageDlg('Удалить проводку №'+srcTransact.DataSet.FieldByName('Trans_ID').AsString+' и ее спецификацию?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
  begin
    CMD.SQL.Add('EXEC dbo.asp_DelTransact '+srcTransact.DataSet.FieldByName('Trans_ID').AsString );
    CMD.Execute;
    _refresh(srcTransact.DataSet);
  end;
end;

    Из реального проекта (учётная система).
    При определённых условиях можно удалить не только то что пользователь собирался удалить :).
    Да и вообще, сам код - говно.

    Запостил: Fes, 30 Июля 2010

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

    • ava Lure Of Chaos 30.07.2010 19:20 # −1

      жаль что ПРИ ОПРЕДЕЛЕННЫХ УСЛОВИЯХ нельзя удалить так вообще этот код ))
      Ответить

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