Eure besten Quellcode Kommentare...

[X-odus]

goto ist ja verschriehen, also :
asm JMP START end; //no goto XP

[Tumm]

Auch nich schlecht :

Delphi-Quellcode:

try
[...]
except
//shit happens
end;

[Spiderpig_GER_15]

Delphi-Quellcode:

//OMG!!! 
//Und das soll funktionieren???

und hier noch einer aus dem Code eines Freundes:

Delphi-Quellcode:

//Uhjujui, da hat sich aber jemande
//selbst übertroffen :)

[Luckie]

Vom Kollegen:

Code:

// PDF download
// Download start event
public function onDownloadStart(evt:Event):void
{
  var fr: FileReference = evt.currentTarget as FileReference;
  try
  {
    fileRefModel.name = fr.name;
    fileRefModel.size = fr.size;
    textDownload.visible = true;
  }
  catch (err:*) {
    // uh oh, an error of sorts.
  }
}

[Phoenix]

Gerade drüber gestolpert:

Delphi-Quellcode:

// Robert Lemke: Was bin ich ?
m_IsSmallController := false;

[Apollonius]

Gerade eben habe ich das geschrieben, ohne jedoch sofort an diesen Thread zu denken:

Delphi-Quellcode:

asm
//...
@@NegativeArraySize:
mov [0], 0 //uh, maybe there is a better way to throw an
           //exception
//...
@@ArrayIndexOutOfBounds:
mov [0], 0 //still a strange way to notify of an error
end;

[haentschman]

// (funktioniert) ZQueryFilter.SQL.Add('and BEZEICHNUNG in (select BEZEICHNUNG from WARTUNGP where TATIGKEIT = :Tatigkeit and STATUS = 3 and NUMMER = :Nummer) '); ...eben gefunden ! Ich frage mich nur, warum ich das auskommentiert habe wenns funktioniert Es gibt Sachen, die muß man nicht verstehen...

[Phoenix]

Zwar kein Kommentar, aber trotzdem genial (gerade in einem Stückchen VB gefunden):

Code:

If count > 0 Then
    Set pEntry = pEntries(0)
    MsgBox pEntry.DN
Else
    MsgBox "Njet gfundovski"
End If

[blackdrake]

Delphi-Quellcode:

// Hat der Dabbes das Passwort vergessen?
if ($passwort == '')
{
  echo ...;
}

[axellang]

Hallo,

gut das ich mich an diesen Thread erinnert habe...

Hier ein wirklich weitsichtiger Kommentar aus der Unit XSBuiltIns (Borland SOAP Support):

Delphi-Quellcode:

TXSBaseDate = class
  private
    { place holder for future work supporting years with greater than 4 digits }
    FAdditionalYearDigits: Word;

Wer will da noch behaupten das Delphi tot ist?


Axel