Delphi Code --> LaTeX konvertieren

[StefanDP]

Hi.

Ich schreibe gerade eine Dokumentation und muss meinen Delphi Code im Text einfügen. Die Dokumentation schreib ich mit TeXnicCenter (LaTeX). Wie bekomm möglichst einfach meinen Delphi-Code (mit Syntax-Highliting) in das LaTeX-Dokument? Hab nach langem Suchen noch kein Tool gefunden oder eine Möglichkeit das zu tun.

mfg
Stefan Mönch

[Bart82]

Hatte mal das gleiche Problem mit Word.
Hab da dann ein Freeware/Shareware-Editor gefunden, aus dem man das ganze per Copy&Paste machen kann.

google mal nach "Super! CODENote"

[weltaran]

Hi!

Das Paket listings ist ab sofort dein Freund.

Latex-Paket listings.sty

Einbinden:

Code:

% einstellen von Programiersprache, Format, ...
\lstset{language=Pascal, basicstyle=\small\ttfamily, numbers=left,
  numberstyle=\tiny, stepnumber=5, firstnumber=0}

% Datei "listing.pas" einbinden
\lstinputlisting[caption=Mein Delphi-Code}, label=lst:delphi-code]{listing.pas}

Eine Unmenge anderer Sprachen ist vordefiniert. Go Wild.


Diplomarbeit? :coder2:

Ciao

weltaran

[Jelly]

Hallo Stefan,

^vor einigen Monaten hatte ich genau das gleiche Problem, und was sehr feines für Latex gefunden. Ich kuck heute mal später, oder morgen, da ich das gerade nicht auf dem Laptop drauf habe.

[Jelly]

OK, hatte den Post von welteran jetzt übersehen, aber genau das Package wollt ich auch vorschlagen. Hier ein Beispiel:

Code:

\documentclass[11pt,a4paper,dvips,oneside]{book}
\usepackage{geometry}
\usepackage{color}
\usepackage{alltt}
\usepackage{courier}
\usepackage{graphicx}
\usepackage[ansinew,latin1]{inputenc}
\usepackage{german}
\usepackage{framed}
\usepackage{amsmath,amssymb,amstext}
\usepackage[hang,scriptsize,bf]{caption}
\usepackage{subfigure}
\usepackage{pifont}


\usepackage{listings}
\lstset{   language=Delphi,
           numbers=left,
           numberstyle=\tiny,
           stepnumber=1,
           numbersep=9pt,
           % backgroundcolor=\color{listingbackground},
           basicstyle=\scriptsize,
           captionpos=b,
           breaklines=true,
           breakindent=20pt,
           texcl=true,
           % mathescape=true,
           escapechar=•,   % ASCI Char #263 (als ALT+263 auf dem Numpad eingeben)
           xleftmargin=0pt,
           % escapebegin=$,
           % escapeend=$,
           extendedchars=true,
           float=false,
           frame=none,
           rulesepcolor=\color{black},
           rulesep=2pt,
           framesep=3pt,
           framexleftmargin=3pt,
           framexrightmargin=3pt,
           columns=[c]fixed,
           basewidth={0.6em,0.45em},
           fontadjust=false
        }

\begin{document}
\begin{lstlisting}[language=Delphi,caption={[Main]Main},label={qc_main}]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Label1: TLabel;
    txtb: TEdit;
    Label2: TLabel;
    txtc: TEdit;
    Button1: TButton;
    lbla: TLabel;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation
uses math ;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
 a, b, c : double ;
begin
     b := StrToFloat(txtb.text) ;
     c := StrToFloat(txtc.text) ;

     { •$a=\sqrt{b^2+c^2}$• }
     a := sqrt(Power(b,2)+Power(c,2)) ;
     lbla.caption := Format ('a= %.2f',[a]) ;
end;

end.

\end{lstlisting}
\end{document}

und das Ergebnis als PDF.

Eins möchte ich noch ergänzen... Es besteht die Möglichkeit über Escapecodes, echten Latex Code im Listing unterzubringen. Somit hast du die Möglichkeit, schön formatierte Formeln in deinen Ausdruck mit reinzupacken. Und damits beim Kompilieren nicht stört, packst du den Latex Code einfach als Delphikommentar unter... Klappt echt prima, wie du im PDF siehst (Zeile 39).

Viel Spass.

[alzaimar]

:love: Ob uns nicht allen ein wenig LaTeX gut täte? :mrgreen:

[Jelly]

Zitat:

Zitat von alzaimar

:love: Ob uns nicht allen ein wenig LaTeX gut täte? :mrgreen:

Wie ist das zu verstehen.
Die meisten schrecken vor LaTeX zurück :roll:

[StefanDP]

Danke euch allen :) Ihr habt mir echt geholfen.
Danke Jelly und danke Weltaran!

@Weltran: Ne, keine Diplomarbeit, sondern Informatikwettbewerb :)

mfg
Stefan

[StefanDP]

Eine Frage hab ich noch:

Wie bekomm ich das ganze jetzt noch farbig hin!? "color" Package hab ich geladen, aber trotzdem bleibt alles öde schwarz/weiß.

Hab es so wie es Weltran beschrieben hat eingebunden.

[Olli]

Ehrlich gesagt würde mich eine farbige Variante für die Weiterverarbeitung in PDFs auch interessieren ...

[omata]

Hallo Olli,

entferne mal das divps aus der \documentclass-Zeile.
Dann klappt das auch mit der Farbe.

Und dann kann in lstset über backgroundcolor=\color{red} die Hintergrundfarbe gesetzt werden oder man definiert sich eine eigene Farbe...

Code:

\definecolor{lightgray}{rgb}{.9,.9,.9}

\lstset{ language=Delphi,
         backgroundcolor=\color{lightgray}
         :
       }

MfG
Thorsten

[Olli]

Ich danke dir. Darf ich dich bei LaTeX-Fragen auch notfalls mal per PM "belästigen"? Ich schreibe nämlich gerade mal wieder an einem Tutorial, wo ich ab und an eventuell mal einen Tip brauche. Aus deinen anderen Beiträgen zum Thema LaTeX entnehme ich, daß du dort wohl um einiges erfahrener bist als ich. Ich mache es zwar schon eine Weile, aber auf der anderen Seite nur ab und zu für spezifische Anwendungen.

[omata]

Hallo Olli,

kannst mich gerne fragen.

MfG
Thorsten

[benwen]

Hallo!

Ich muss das Thema noch einmal aufwärmen...
Ich schreibe grad eine Dokumentation mit Lyx und hab genau das Package 'Listings' eingebunden. Funktioniert auch super, nur würde ich gern ein Verzeichnis der Listings erstellten (sozusagen ein List of Listings). Kann mir da jemand auf die Sprünge helfen, wie man so etwas programmiert? Oder gibts das schon irgendwo?

Danke!

Grüße
benwen

[omata]

Hallo benwen,

schau dir doch mal \lstlistoflistings an.

Gruss
Thorsten

[benwen]

Hallo!

danke für die Antwort, habs probiert, allerdings kommt folgende Fehlermeldung:
"Undefined control sequence. \lstlistoflistings"

Was tun? Package Listing ist doch eingebunden.

Gruß benwen

[omata]

Hallo benwen,

ich habe keine Ahnung warum das bei dir nicht geht. Ich hatte das ausprobiert und das klappte wunderbar.
Schau doch noch mal hier, vielleicht hilft das ja weiter.

Gruss
Thorsten