Eure besten Quellcode Kommentare...

[Chrissi91]

Meine besten Kommentare sind immer die aus dem Info GK gewesen. Da kann man sich nicht wirklich konzentrieren, nicht mal um Kommentare zu schreiben (wenn jemand an der Leinwand im Unterricht CS spielt und der Lehrer zuguckt). Naja damals war das toll mit 5 Leuten im Kurs.

Wir hatten im Schnitt 1x in der Woche. Wenn es dann hieß PCs ausmachen und ich saß an einem Problem, habe ich über die Problem-Prozedur geschrieben:

//WICHTIG!!!!! UNBEDINGT MACHEN! 1 Woche später: WTF?



Sowas passiert mir andauernd, dass ich vergesse hinzuschreiben, wo ich einen Fehler habe. Denn meistens dauert es dann wieder ne Weile, bis ich weiß, was nicht funktioniert hat.

[FAlter]

Hi,

gerade mal nen Code durchgesehen:

Delphi-Quellcode:

//alter Code:
    try
      //Hmm wie sonst an den string kommen außer über noch schlimmere umwege?
      RaiseLastOSError;
    except
      on E: Exception do
        ShowMessage('Das Installationsprogramm konnte nicht gestartet werden!'#13
          + E.Message);
    end;


//neuer Code:
    ShowMessage('Das Installationsprogramm konnte nicht gestartet werden!'#13 +
      SysErrorMessage(GetLastError));

Man beachte das Kommentar im alten Code - und dazu die Lösung im neuen Code.

Wer Hintergrundinfos will: Es handelt sich um den Rückgabewert von CreateProcess, welcher false ist. Was genau schief lief, soll dem User angezeigt werden. Dazu muss man irgendwie an die Fehlermeldung kommen, die Delphi in der Exception anzeigt. Ein Glück, dass es Shift+Klick gibt.

Mfg
FAlter

[arbu man]

Code:

  # Profile display not done jet, but guests must not know that
  O::Error('Profil is private', 'Error');

[Balu der Bär]

Zitat von arbu man:

Code:

  # Profile display not done jet, but guests must not know that
  O::Error('Profil is private', 'Error');

Jet? Etwa ein Düsen-Jet?

[mkinzler]

J oder Y, was ist da schon der Unterschied

[mr_emre_d]

Code:

...  // thie makes it exiting -- in other words: unstable !!!!!

wtf ...

[Luckie]

Gerade in alten Sourcen von mir gefunden:

Delphi-Quellcode:

// unter Win 98 bin ich schon am Ziel;
  // also nur ein bisschen "so tun als ob ...", um
  // die Programmstruktur nicht ändern zu müssen
  // :o)

[MaBuSE]

Aus einem bekannten OpenSource Programm.

Delphi-Quellcode:

...
        if Fix<>Nil then
          Exit {Paranoic - can't happen, but i trust no one};
...

[Teekeks]

jetz mal von mir aus meinem aktuellen projekt:

Delphi-Quellcode:

 begin
   //Daten einlesen
     //hab grad keine lust...
     //hier mach ich spaeter weiter
   //\Daten Einlesen
   //Mitteilung schreiben
   EreignissM.Lines.Add('Buch erfolgreich eingetragen!');
   //\Mitteilung schreiben
   //ursprung herstellen + Hilfe Laden

[Relicted]

Ok zwar kein kommentar... aber das sollte man auch unkommentiert drin lassen...

Delphi-Quellcode:

    if id = 28751 then
      id := 28751;