Menu

unit commenting works and works not?

2004-05-21
2012-07-18
  • Nobody/Anonymous

    Hi! First of all, great tool! I just have problems with commenting procedures, functions and parameters.
    one example i don't understand:

    why is this function commented correctly (in the resulting html-file)

    {*------------------------------------------------------------------------------
      Ein Zeitstempel wird ermittelt und als String zurckgeliefert. Datum und Zeit
      sind mit Semikolon getrennt. Die Laufende Nummer (dreistellig) wird dann
      erhht, wenn ein gleicher Zeitstempel zwei Mal vergeben werden wrde.
      Der Zeitstempel ist sekundengenau, werden innerhalb einer Sekunde mehrere
      Zeitstempel beantragt, wird die laufende Nummer erhht.

      @return String mit aktuellem Zeitstempel
    -------------------------------------------------------------------------------}
    function TIO.Zeitstempel_Ermitteln(): string;
    var f_datum, f_zeit, aktueller_zeitstempel: string;
        laufende_nummer_dreistellig: string;
    begin
    ...
    end;

    and this one is not? i can't see why, but the second one still has the usual error '#No TAG found in source code#' while the first one works?

    {*------------------------------------------------------------------------------
      Liest die angegebene Datei in eine Stringliste. Trennzeichen ist Semikolon.
      Der Zeilenumbruch in der Datei wird in der Liste durch einen 'CR'-Eintrag
      vermerkt. Somit kann man die ursprngliche Struktur wiederherstellen.

      @param I_Dateiname String der zu lesenden Datei
      @return Stringliste mit den Dateiinhalten
    -------------------------------------------------------------------------------}
    function TIO.Datei_lesen(I_Dateiname: string): TStringList;
    var Datei: Textfile;
        StringListe: TStringList;
        Zeile: string;
    begin
    ...
    end;

    this one is working again ?!

    {*------------------------------------------------------------------------------
      Hngt an eine Datei den Inhalt einer Stringliste an.

      @param I_Dateiname Dateiname der Datei, in die hinzugefgt werden soll
      @param I_Inhalt Der anzuhngende Inhalt
    -------------------------------------------------------------------------------}
    procedure TIO.Datei_Anhaengen(I_Dateiname: string; I_Inhalt: TStringList);
    var Datei: Textfile;
        i: integer;
        Zeile: string;
    begin
    ...
    end;

    hopefully someone can tell me what i'm doing wrong :/

     
    • Nobody/Anonymous

      what i forgot.
      the last procedure is shown in the html-file but the second parameter I_Inhalt is not commented while the first (I_Dateiname) is.

       
      • TridenT

        TridenT - 2004-05-21

        Can you send me the unit file and maybe a HTML output, so I will compare with what I get.
        I will first try to reproduce the problem.

        TridenT

         
    • Nobody/Anonymous

      Hi !
      I had the same problem. After adding an empty line between
      @param I_Inhalt ...
      and
      ---...---}
      it works. Maybe it helps you to find out the problem.

       
      • TridenT

        TridenT - 2004-05-25

        ok, I will try.
        Thanks for your help !

        TridenT

         
    • TridenT

      TridenT - 2004-05-27
       

Log in to post a comment.

Want the latest updates on software, tech news, and AI?
Get latest updates about software, tech news, and AI from SourceForge directly in your inbox once a month.