AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein XML XML DOC - Dokumentationen erstellen ?
Thema durchsuchen
Ansicht
Themen-Optionen

XML DOC - Dokumentationen erstellen ?

Ein Thema von paule32.jk · begonnen am 9. Aug 2024 · letzter Beitrag vom 14. Aug 2024
Antwort Antwort
Benutzerbild von paule32.jk
paule32.jk

Registriert seit: 24. Sep 2022
Ort: Planet Erde
356 Beiträge
 
Delphi 11 Alexandria
 
#1

XML DOC - Dokumentationen erstellen ?

  Alt 9. Aug 2024, 15:52
Hallo,
DCE 12 kann ja doc XML Dateien anlegen...

- kann man die dann zur Dokumentation verwenden - mit eigenen Style ?
- wie bekommt man aus den XML Daten eine HTML Datei ?
- ist die dann für CHM Projekte nutzbar ?
Frag doch einfach
Alles was nicht programmiert werden kann, wird gelötet
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#2

AW: XML DOC - Dokumentationen erstellen ?

  Alt 9. Aug 2024, 18:49
Prinzipiell können andere Projekte diese "standardisierte XML" nutzen, um daraus eine Hilfe zu generieren, ohne selbst den eigentlichen Quellcode parsen und danach durchsuchen zu müssen (im Delphi sieht das ja bissl anders aus, als z.B. in den Dateien des C++Builder).
$2B or not $2B
  Mit Zitat antworten Zitat
Benutzerbild von paule32.jk
paule32.jk

Registriert seit: 24. Sep 2022
Ort: Planet Erde
356 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: XML DOC - Dokumentationen erstellen ?

  Alt 14. Aug 2024, 16:00
Mein Ziel ist es, mehrmals verwendeten XSLT Code aus einer Datei auszulagern,
um die Regeln in einer anderen Datei verwenden zu können.

Ich habe zwei Dateien, und bekomme bei der zweiten einen Fehler, wenn ich xsltproc drüber jage:
Code:
E:\Projekte\AthensProjekte\1\xml>xsltproc fpcqt.xslt QCharClass.xml
compilation error: file fpcqt.xslt line 5 element import
xsltParseStylesheetTop: ignoring misplaced import element
fpcqt_config.xsl:
Code:
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" encoding="UTF-8" />

<!-- Definiere Sprachvariablen -->
<xsl:variable name="lang" select="'de'"/>
<xsl:variable name="theme" select="'dark'"/>

<xsl:variable name="namespace_text_en">Namespace</xsl:variable>
<xsl:variable name="namespace_text_de">Namensraum</xsl:variable>

<xsl:variable name="contains_text_en">Contains</xsl:variable>
<xsl:variable name="contains_text_de">Enthält</xsl:variable>

<xsl:variable name="remarks_text_en">Remarks</xsl:variable>
<xsl:variable name="remarks_text_de">Bemerkungen</xsl:variable>

</xsl:stylesheet>

fpcqt.xslt:
Code:
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" encoding="UTF-8" />
   
<xsl:import href="fpcqt_config.xsl"/>  <!-- das ist zeile 5 -->
<!--xsl:import href="fpcqt_html_header.xls"/-->
   
<!-- Template für Hauptseite -->
<xsl:template match="/">
<html>
    <!--xsl:call-template name="html-header"/-->
    <body>
        <xsl:apply-templates select="namespace" />
    </body>
</html>
</xsl:template>
   
<xsl:template match="namespace">
<html>
    <head>
        <title>
        <xsl:choose>
            <xsl:when test="$lang = 'en'">
                Delphi Documentation for Project: <xsl:value-of select="@name"/>
            </xsl:when>
            <xsl:otherwise>
                Delphi Dokumentation für Projekt: <xsl:value-of select="@name"/>
            </xsl:otherwise>
        </xsl:choose>
        </title>
        <!-- Einbinden der CSS-Datei -->
        <xsl:choose>
            <xsl:when test="$theme = 'light'">
                <link rel="stylesheet" type="text/css" href="style_light.css" />
            </xsl:when>
            <xsl:when test="$theme = 'dark'">
                <link rel="stylesheet" type="text/css" href="style_dark.css" />
            </xsl:when>
        </xsl:choose>
    </head>
    <body>
        <h1>
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    Delphi Documentation for Project: <xsl:value-of select="@name"/>
                </xsl:when>
                <xsl:otherwise>
                    Delphi Dokumentation für Projekt: <xsl:value-of select="@name"/>
                </xsl:otherwise>
            </xsl:choose>
        </h1>
       
        <div class="namespace">
            <h2>
                <xsl:choose>
                    <xsl:when test="$lang = 'en'">
                        <xsl:value-of select="$namespace_text_en"/>: <xsl:value-of select="@name"/>
                    </xsl:when>
                    <xsl:otherwise>
                        <xsl:value-of select="$namespace_text_de"/>: <xsl:value-of select="@name"/>
                    </xsl:otherwise>
                </xsl:choose>
            </h2>
            <div class="platform">Platform: <xsl:value-of select="@platform"/></div>
           
            <xsl:apply-templates select="enum" />
            <xsl:apply-templates select="class" />
        </div>
    </body>
</html>
</xsl:template>

<xsl:template match="unit">
    <h2><xsl:value-of select="@name" /></h2>
    <xsl:apply-templates/>
</xsl:template>

<xsl:template match="description">
    <p><xsl:value-of select="."/></p>
</xsl:template>

   
<!-- Template für Contains -->
<xsl:template match="contains">
    <div class="contains">
        <xsl:choose>
            <xsl:when test="$lang = 'en'">
                <xsl:value-of select="$contains_text_en"/>: <xsl:value-of select="@name"/>.pas
            </xsl:when>
            <xsl:otherwise>
                <xsl:value-of select="$contains_text_de"/>: <xsl:value-of select="@name"/>.pas
            </xsl:otherwise>
        </xsl:choose>
    </div>
</xsl:template>
   
<!-- Template für Enum -->
<xsl:template match="enum">
    <xsl:choose>
        <xsl:when test="$lang = 'en'">
            <h2>enum: <xsl:value-of select="@name"/></h2>
        </xsl:when>
        <xsl:otherwise>
            <h2>Aufzählung: <xsl:value-of select="@name"/></h2>
        </xsl:otherwise>
    </xsl:choose>
    <xsl:if test="devnotes/enum">
        <p>
        <div class="devnotes">
            <strong>Hinweise:</strong><br/>
            <xsl:value-of select="devnotes/enum"/>
        </div>
        </p>
    </xsl:if>
    <table>
        <tr>
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    <th>Constant</th>
                    <th>Value</th>
                </xsl:when>
                <xsl:otherwise>
                    <th>Konstante</th>
                    <th>Wert</th>
                </xsl:otherwise>
            </xsl:choose>
        </tr>
        <xsl:for-each select="element">
        <tr>
            <td class="name-cell"><xsl:value-of select="@name"/></td>
            <td class="value-cell"><xsl:value-of select="@value"/></td>
        </tr>
        </xsl:for-each>
    </table>
</xsl:template>

    <!-- Template für Class -->
    <xsl:template match="class">
        <xsl:choose>
            <xsl:when test="$lang = 'en'">
                <h2>Class: <xsl:value-of select="@name"/></h2>
            </xsl:when>
            <xsl:otherwise>
                <h2>Klasse: <xsl:value-of select="@name"/></h2>
            </xsl:otherwise>
        </xsl:choose>

        <!-- Klasse Zusammenfassung -->
        <xsl:if test="summary">
            <p class="summary"><xsl:value-of select="summary"/></p>
        </xsl:if>
       
        <!-- Tabelle für vererbte Klasse -->
        <xsl:if test="ancestor">
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    <h3>Inherited from</h3>
                </xsl:when>
                <xsl:otherwise>
                    <h3>Erbt von</h3>
                </xsl:otherwise>
            </xsl:choose>
            <table>
                <tr>
                    <xsl:choose>
                        <xsl:when test="$lang = 'en'">
                            <th>Ancestor Class</th>
                            <th>Namespace</th>
                        </xsl:when>
                        <xsl:otherwise>
                            <th>Vererbter-Klassen-Name</th>
                            <th>Namensraum</th>
                        </xsl:otherwise>
                    </xsl:choose>
                </tr>
                <tr>
                    <td>
                        <xsl:value-of select="ancestor/@name"/>
                    </td>
                    <td>
                        <xsl:value-of select="ancestor/@namespace"/>
                    </td>
                </tr>
            </table>
        </xsl:if>

        <!-- Tabelle für Konstruktoren 'Create' -->
        <xsl:if test="members/constructor">
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    <h3>Constructors</h3>
                </xsl:when>
                <xsl:otherwise>
                    <h3>Konstruktoren</h3>
                </xsl:otherwise>
            </xsl:choose>
            <table>
                <tr>
                    <xsl:choose>
                        <xsl:when test="$lang = 'en'">
                            <th>Constructor</th>
                            <th>Parameters</th>
                            <th>Summary</th>
                        </xsl:when>
                        <xsl:otherwise>
                            <th>Konstruktor</th>
                            <th>Parameter</th>
                            <th>Kurzbeschreibung</th>
                        </xsl:otherwise>
                    </xsl:choose>
                </tr>
                <xsl:for-each select="members/constructor">
                    <tr>
                        <td>Create</td>
                        <td>
                            <xsl:for-each select="parameters/parameter">
                                <xsl:value-of select="@name"/>: <xsl:value-of select="@type"/>
                                <xsl:if test="position() != last()">, </xsl:if>
                            </xsl:for-each>
                        </td>
                        <td>
                            <xsl:if test="devnotes/summary">
                                <xsl:value-of select="devnotes/summary"/>
                                <!-- Link zum Remarks-Anker -->
                                <xsl:if test="devnotes/remarks">
                                    <a class="more-link" href="#remarks-{@name}">Mehr...</a>
                                </xsl:if>
                            </xsl:if>
                        </td>
                    </tr>
                </xsl:for-each>
            </table>
        </xsl:if>
       
        <!-- Ausführliche Beschreibung für Konstruktoren unter der Tabelle anzeigen -->
        <xsl:for-each select="members/constructor">
            <div>
                <div class="constructor_div">
                    <div class="ctor_left">
                        <span style="color:white;font-wight:normal;">constructor</span>
                        <xsl:text>*</xsl:text>
                        <span style="color:orange;font-weight:bold;">Create</span>
                    </div>
                    <div class="ctor_right">
                        Pascal
                    </div>
                </div>
                <xsl:choose>
                    <!-- Prüfe, ob Parameter vorhanden sind -->
                    <xsl:when test="parameters/parameter">
                        <!-- Falls Parameter vorhanden sind, liste sie auf -->
                        <div class="ctor_container">
                        <xsl:for-each select="parameters/parameter">
                            <div class="param_div">
                                <li>
                                    <!-- Zeige die aktuelle Position an -->
                                    <xsl:text>Parameter </xsl:text><xsl:value-of select="position()"/>
                                    <xsl:text>****</xsl:text>
                                   
                                    <!-- Zeige den Namen und Typ des Parameters an -->
                                    <span class="parameter"><xsl:value-of select="@name"/></span>
                                    <xsl:text>****</xsl:text>
                                    <span class="parameter_name"><xsl:value-of select="@type"/></span>
                                   
                                    <xsl:if test="position() != last()">, <br/></xsl:if>
                                </li>
                            </div>
                        </xsl:for-each>
                        </div>
                    </xsl:when>
                    <!-- Falls keine Parameter vorhanden sind, zeige "no param" -->
                    <xsl:otherwise>
                        <div class="ctor_container">
                            <div class="param_div">no param</div>
                        </div>
                        <p> </p>
                    </xsl:otherwise>
                </xsl:choose>
            </div>
           
            <xsl:if test="devnotes/remarks">
                <a name="remarks-{@name}"></a>
                <p class="remarks">
                    <xsl:choose>
                        <xsl:when test="$lang = 'en'">
                            <strong>Remarks:</strong>
                        </xsl:when>
                        <xsl:otherwise>
                            <strong>Bemerkungen:</strong>
                        </xsl:otherwise>
                    </xsl:choose>
                    <br/>
                    <xsl:value-of select="devnotes/remarks"/>
                </p>
            </xsl:if>
        </xsl:for-each>
               
        <!-- Tabelle für Funktionen -->
        <xsl:if test="members/function">
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    <h3>Functions</h3>
                </xsl:when>
                <xsl:otherwise>
                    <h3>Funktionen</h3>
                </xsl:otherwise>
            </xsl:choose>
            <table>
                <tr>
                    <xsl:choose>
                        <xsl:when test="$lang = 'en'">
                            <th>Return Type</th>
                            <th>Function Name</th>
                            <th>Summary</th>
                        </xsl:when>
                        <xsl:otherwise>
                            <th>Rückgabetyp</th>
                            <th>Funktion-Name</th>
                            <th>Kurzbeschreibung</th>
                        </xsl:otherwise>
                    </xsl:choose>
                </tr>
                <!-- Durchlaufe jede Funktion -->
                <xsl:for-each select="members/function">
                    <tr>
                        <!-- Erste Zeile für Rückgabetyp, Funktionsname und Zusammenfassung -->
                        <td><xsl:value-of select="parameters/retval/@type"/></td>
                        <td><xsl:value-of select="@name"/></td>
                        <td>
                            <xsl:if test="devnotes/summary">
                                <xsl:value-of select="devnotes/summary"/>
                            </xsl:if>
                        </td>
                    </tr>
                    <tr>
                        <!-- Zweite Zeile für Parameter -->
                        <td colspan="3"> <!-- colspan="3" sorgt dafür, dass die Parameter
                        über die gesamte Breite der Tabelle angezeigt werden -->
                            <strong>
                                <xsl:choose>
                                    <xsl:when test="$lang = 'en'">Parameters:</xsl:when>
                                    <xsl:otherwise>Parameter:</xsl:otherwise>
                                </xsl:choose>
                            </strong>
                            <xsl:for-each select="parameters/parameter">
                                <xsl:value-of select="@name"/>: <xsl:value-of select="@type"/>
                                <xsl:if test="position() != last()">, </xsl:if>
                            </xsl:for-each>
                            <xsl:if test="not(parameters/parameter)">
                                <!-- Falls keine Parameter vorhanden sind -->
                                <xsl:choose>
                                    <xsl:when test="$lang = 'en'">no param</xsl:when>
                                    <xsl:otherwise>
                                        <xsl:text>****</xsl:text>
                                        <span class="no_params">keine</span>
                                    </xsl:otherwise>
                                </xsl:choose>
                            </xsl:if>
                        </td>
                    </tr>
                    <tr>
                        <!-- Zusätzliche Zeile nach den Parametern -->
                        <td colspan="3"> <!-- Hier kannst du zusätzlichen Inhalt einfügen -->
                            <xsl:choose>
                                <xsl:when test="$lang = 'en'">Additional Information or Notes</xsl:when>
                                <xsl:otherwise>
                                    <div class="addi_td">
                                        <xsl:text>****</xsl:text>
                                    </div>
                                </xsl:otherwise>
                            </xsl:choose>
                        </td>
                    </tr>
                </xsl:for-each>
            </table>
        </xsl:if>
       
        <!-- Tabelle für Prozeduren -->
        <xsl:if test="members/procedure">
        <xsl:choose>
            <xsl:when test="$lang = 'en'">
                <h3>Procedures</h3>
            </xsl:when>
            <xsl:otherwise>
                <h3>Prozeduren</h3>
            </xsl:otherwise>
        </xsl:choose>
        <table>
            <tr>
            <xsl:choose>
                <xsl:when test="$lang = 'en'">
                    <th>Procedure</th>
                    <th>Summary</th>
                    <th>Parameters</th>
                </xsl:when>
                <xsl:otherwise>
                    <th>Prozedur</th>
                    <th>Kurzbeschreibung</th>
                    <th>Parameter</th>
                </xsl:otherwise>
            </xsl:choose>
            </tr>
            <xsl:for-each select="members/procedure">
                <tr>
                    <td><xsl:value-of select="@name"/></td>
                    <td>
                        <xsl:if test="devnotes/summary">
                            <xsl:value-of select="devnotes/summary"/>
                        </xsl:if>
                    </td>
                    <td>
                        <xsl:for-each select="parameters/parameter">
                            <xsl:value-of select="@name"/>: <xsl:value-of select="@type"/>
                            <xsl:if test="position() != last()">, </xsl:if>
                        </xsl:for-each>
                    </td>
                </tr>
            </xsl:for-each>
        </table>
        </xsl:if>
    </xsl:template>
   
</xsl:stylesheet>
Frag doch einfach
Alles was nicht programmiert werden kann, wird gelötet

Geändert von paule32.jk (14. Aug 2024 um 16:05 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von paule32.jk
paule32.jk

Registriert seit: 24. Sep 2022
Ort: Planet Erde
356 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: XML DOC - Dokumentationen erstellen ?

  Alt 14. Aug 2024, 23:27
ok. es scheint nur mit <xsl:include ... zu funktionieren.

ich habe aber noch ein Problem, die Funktionen die in der Klasse QChar enthalten sind, in eine Ausgabedatei per Python Skript zu transpillen ...

kann da einer Bitte mal auf das Skript und im Verzeichnis schauen, warum die Funktionen nicht dokumentiert werden.
Die html Dateien sind immer nur rund 250 Bytes groß.

hier
Frag doch einfach
Alles was nicht programmiert werden kann, wird gelötet
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:56 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz