Found this little gem among the 500 stand alone functions in a unit called AMSMasterDataUnit.pas:

-
Found this little gem among the 500 stand alone functions in a unit called AMSMasterDataUnit.pas:

function FindDatabaseAbuser: TStringList;

How cool is that?

Comments

  1. Nick HodgesJune 27, 2013 at 1:49 PM

    And oh, it has the following line of code in it:

    Sleep(10000);

    Lovely.

    ReplyDelete
  2. Nicholas RingJune 27, 2013 at 2:11 PM

    What? No Application.ProcessMessages? Novice!! :-D

    ReplyDelete
  3. Bill MeyerJune 27, 2013 at 2:15 PM

    Man, you're getting fussy! :) Must be getting old....

    ReplyDelete
  4. Anthony FrazierJune 27, 2013 at 2:32 PM

    LOL. That's awesome!

    ReplyDelete
  5. Heinz ToskanoJune 27, 2013 at 5:45 PM

    What, no FreeAndNil(something)??? :-)

    ReplyDelete
  6. Anthony FrazierJune 27, 2013 at 5:48 PM

    While I've never done anything quite like that, I have made disruptive code changes simply to see who would complain so I could... instruct them. With a clue by four.

    ReplyDelete
  7. Arioch TheJune 27, 2013 at 6:44 PM

    for O in FindDatabaseAbusers.Objects do FreeAndNil(O)

    ReplyDelete
  8. Moz LeJune 27, 2013 at 7:51 PM

    Hehe. I'm reminded of a user validation library I wrote for our web cowboy. After it was all tested and working he decided he needed a way to bypass it... so I gave him "ExecuteThisCommandAsAdminRegardlessOfWhatPermissionsTheUserActuallyHasAndIgnoreTheImplicationsOfLettingRandomUsersBypassSecurity()" (or something similar). My boss listened to his complaint, looked at the code, and said "that name is good".

    ReplyDelete
  9. Frédéric HannesJune 28, 2013 at 1:16 AM

    Nick Hodges Where do you keep finding this stuff xD

    ReplyDelete
  10. Anthony FrazierJune 28, 2013 at 2:38 AM

    Any sufficiently large and mature codebase will be full of WTFs implemented by inexperienced or poor coders.

    ReplyDelete
  11. Uwe RaabeJune 28, 2013 at 3:19 AM

    Anthony Frazier Any sufficiently old codebase will contain such WTFs written by yourself.

    ReplyDelete
  12. Kenneth CochranJune 28, 2013 at 4:48 AM

    Uwe Raabe that were probably written as bandaids over additional WTFs.

    ReplyDelete
  13. Frédéric HannesJune 28, 2013 at 4:53 AM

    Uwe Raabe Indeed, a lot of my old cold sends shivers down my spine

    ReplyDelete
  14. Leonardo HerreraJanuary 5, 2015 at 8:22 AM

    I keep cursing my younger-by-six-months self. He was stupid and inexperienced. Been doing that for twenty years.

    ReplyDelete

Post a Comment