Funktion erstellen um sich ständig wiederholende LatexCodeZeilen zu Vermeiden

[loro]

Hallo zusammen,
ich habe folgendes "Problem" in mein Dokument kommen doch einige Bilder rein. Die ich wie folgt einbinde.

\begin{figure}[htb]
 \begin{center}%
  \sbox\bildbox{\includegraphics[width=\ScaleIfNeeded]{PFAD_ZUM_BILD}}
  \settowidth\bildboxbreite{\usebox\bildbox}
  \addtolength\bildboxbreite{\zusatzbreite}
  \color{\boxcolor}
  \shadowbox{%
   \begin{minipage}{\bildboxbreite}%
    \usebox\bildbox
    \caption{BILD_UNTERSCHRIFT}
    \label{pic:REFERENZ}%		
   \end{minipage}}
 \end{center}%
\end{figure}

Das Funktioniert auch ganz gut. Nun frage ich mich wie ich mir das ständige Copy&Paste ersparen kann? Ich dachte da an eine "Funktion", der die drei Parameter BILD_PFAD, BILD_UNTERSCHRIFT und REFERENZ mit geben werden? Wie müsste das den gemacht werden, ich bin ein totaler Latex Neuling.

Vielen Dank schon mal im Voraus

[esdd]

Hallo,

aus dem Codeschnipsel ist nicht ersichtlich, welche Pakete geladen werden müssen und wie der Befehl \ScaleIfNeeded definiert ist. Mache bitte immer ein vollständiges Minimalbeispiel wie bei deiner Frage unter http://www.mrunix.de/forums/showthread.php?t=68898

Folgendes funktioniert bei mir (basiert auf dem Beispiel im angegebenen Link):

\documentclass{scrbook}

\usepackage[ngerman]{babel}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}

\usepackage{graphicx}
\usepackage{xcolor}
\usepackage{fancybox}
\usepackage[font=scriptsize,labelfont=bf, justification=raggedright, singlelinecheck=false]{caption}

\newsavebox\bildbox
\newlength\bildboxbreite
\newcommand\zusatzbreite{0.5cm}
\renewcaptionname{ngerman}{\figurename}{Abb.:}
\definecolor{light-gray}{rgb}{0.7, 0.7, 0.7}

% Folgende Zeilen sollte ein zu großes Bild 
% entsprechend passend skallieren so das es auf die Seite Passt 
\makeatletter
\def\ScaleIfNeeded{%
  \ifdim\Gin@nat@width>\dimexpr\linewidth-\zusatzbreite-\shadowsize-2\fboxsep-0.5pt\relax
    \dimexpr\linewidth-\zusatzbreite-\shadowsize-2\fboxsep-0.5pt\relax
  \else
    \Gin@nat@width
  \fi
}

\newcommand\Bild[3]{%
  \sbox\bildbox{\includegraphics[width=\ScaleIfNeeded]{#1}}%
  \settowidth\bildboxbreite{\usebox\bildbox}%
  \addtolength\bildboxbreite{\zusatzbreite}%
  \color{light-gray}%
  \shadowbox{%
    \begin{minipage}{\bildboxbreite}%
      \centering\usebox\bildbox%
      \caption{#2}%
      \label{pic:#3}%
    \end{minipage}%
  }%
}

\begin{document}

\begin{figure}[htb]
  \begin{center}%
    \Bild{Bilddatei}{Bildtext}{Bildlabel}
  \end{center}%
\end{figure}

\end{document}

Gruß
Elke

[Schweinebacke]

Ersetze:

\begin{figure}[htb]
  \begin{center}%
    \Bild{Bilddatei}{Bildtext}{Bildlabel}
  \end{center}%
\end{figure}

durch:

\begin{figure}% das optionale Argument braucht man nur im Ausnahmefall.
        % Für den Regelfall siehe Dante-FAQ.
  \centering% Die center-Umgebung fügt zusätzlichen vertikalen Abstand ein,
        % den man in Gleitumgebungen normalerweise nicht haben will.
        % Siehe dazu auch l2tabu
    \Bild{Bilddatei}{Bildtext}{Bildlabel}
\end{figure}

[mechanicus]

Hi,
Bezugnehmend auf die Zeile:

\renewcaptionname{ngerman}{\figurename}{Abb.:}}

möchte ich noch folgende Hinweise geben.

Der Separator ist bei einer KOMA-Klasse

\documentclass{scrbook}

im Makro \captionformat hinterlegt.

Durch das Laden des Paketes caption:

\usepackage[font=scriptsize,labelfont=bf, justification=raggedright, singlelinecheck=false]{caption}
}

ist das Trennzeichen ebenfalls definierbar über die Option labelsep.

Gruß
Marco

[esdd]

Hallo,

\centering lässt sich dann noch in den Befehl einbauen.

@Marco: Danke fürs Finden des mitgeschleppten Tippfehlers. Der Doppelpunkt hinter Abb. musste einfach nur gelöscht werden, da ja nicht Abb.: 0.1: da stehen soll.

\documentclass[captions=nooneline]{scrbook}

\usepackage[ngerman]{babel}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}

\usepackage{graphicx,blindtext}
\usepackage{xcolor}
\usepackage{fancybox}

\renewcaptionname{ngerman}{\figurename}{Abb.}
\addtokomafont{captionlabel}{\scriptsize\bfseries}
\addtokomafont{caption}{\scriptsize}


\newsavebox\bildbox
\newlength\bildboxbreite
\newcommand\zusatzbreite{0.5cm}

\definecolor{light-gray}{rgb}{0.7, 0.7, 0.7}

% Folgende Zeilen sollte ein zu großes Bild 
% entsprechend passend skalieren, das es auf die Seite passt 
\makeatletter
\def\ScaleIfNeeded{%
  \ifdim\Gin@nat@width>\dimexpr\linewidth-\zusatzbreite-\shadowsize-2\fboxsep-0.5pt\relax
    \dimexpr\linewidth-\zusatzbreite-\shadowsize-2\fboxsep-0.5pt\relax
  \else
    \Gin@nat@width
  \fi
}

\newcommand\Bild[3]{%
  \centering
  \sbox\bildbox{\includegraphics[width=\ScaleIfNeeded]{#1}}%
  \settowidth\bildboxbreite{\usebox\bildbox}%
  \addtolength\bildboxbreite{\zusatzbreite}%
  \color{light-gray}%
  \shadowbox{%
    \begin{minipage}{\bildboxbreite}%
      \centering\usebox\bildbox%
      \caption{#2}%
      \label{pic:#3}%
    \end{minipage}%
  }%
}

\begin{document}
\begin{figure}
    \Bild{Bilddatei}{Bildtext}{Bildlabel}
\end{figure}
\end{document}

Gruß
Elke

[loro]

Vielen Dank, das hat super geklappt und das mit dem Minibeispiel hatte ich vergessen,
ich gelobe Besserung.
Noch mal vielen Dank euch dreien.