Wie setze ich den Absendername als ,,Titel" in der Kopfzeile
Hallo,
ich hätte gerne den Absendername als Titel in der Kopfzeile (auf Höhe bündig zum Logo, aber links oben und nicht rechts unten, siehe händig eingefügter Text). Die Lösung von Saputello aufgreifend anbei noch ein Bild um das Problem anschaulich zu machen (leider habe Logo). Ich binde meine Vorlage ein, leider weiß ich gegenwärtig kein Bildbearbeitungsprogramm, um die unnötige Weißfläche auszuschneiden. Ich werde es asap austauschen)
nicht, wie ich hier zur Übersicht den Inhalt der Vorlage in meine Briefdatei einfüge, bitte verzeiht.
\RequirePackage{filecontents}
\begin{filecontents}{Tischa.lco}
% Hier die persönlichen Einstellungen, die sich jeder Anwender unter eigenem
% Dateinamen anpassen sollte.
\LoadLetterOption{TischaLayout}
\setkomavar{fromlogo}{\includegraphics[height=2cm]{example-image}}
\setkomavar{fromname}{Tischa}
\setkomavar{fromaddress}{xxxx Hamburg\\
Kieler Straße 44}
\setkomavar{place}{Hamburg}
\setkomavar{subject}{Text \documentclass[10pt]{unihamburg}
%\name{Tischa}
%\function{Alleskoenner}
%\signature{Name}
\shortsender{Name}
\shortaddress{xxxx Hamburg}
\apstreet{Kieler Straße\,44}
%\altstreetstyle
\subject{Text \glqq Titel\grqq~ ~ }
\setkomavar{fromphone}{0228~00\,00\,00\,00}
\setkomavar{frommobilephone}{0176~00\,00\,00\,00}
\setkomavar{fromemail}{Name@uni-hamburg.de}
\end{filecontents}
\begin{filecontents}{TischaLayout.lco}
% Nach dem Vorbild von asymTypB.lco aus dem Anhang des KOMA-Script-Buches.
% Es wird empfohlen, die Erklärungen aus dem KOMA-Script-Buch
% http://www.komascript.de/komascriptbuch zu lesen. Ohne diese dürfte
% vieles schwer zu verstehen sein.
\LoadLetterOption{DINmtext}%
\if@atdocument
\scr@ifundefinedorrelax{tabularx}{%
\GenericError{(TischaLayout)\@spaces\@spaces\@spaces}{%
LCO TischaLayout Error: Package `tabularx' needed%
}{%
See the LCO documentation for explanation.%
}{%
LCO file `TischaLayout' has been loaded after `\string\begin{document}'
and therefore\MessageBreak
cannot load package `tabularx' by itself.\MessageBreak
You should either load `TischaLayout' before `\string\begin{document}'
or add\MessageBreak
`\string\usepackage{tabularx}' to your preamble.%
}%
}{}%
\else
\RequirePackage{tabularx}
\fi
\setlength{\oddsidemargin}{\useplength{toaddrhpos}}%
\addtolength{\oddsidemargin}{-1in}%
\AfterCalculatingTypearea{%
\setlength{\oddsidemargin}{\useplength{toaddrhpos}}%
\addtolength{\oddsidemargin}{-1in}%
}%
\activateareas
\@setplength{firstheadvpos}{7.5mm}
\@setplength{firstheadwidth}{\paperwidth}%
\@setplength{firstfootvpos}{\paperheight}%
\@addtoplength[-]{firstfootvpos}{\useplength{toaddrvpos}}%
\@addtoplength{refvpos}{-1.5\baselineskip}%
\newkomavar{company}%
\newkomavar{akadTitelv}
\newkomavar{akadTiteln}
\@newplength{infocolwidth}%
\ifdim \textwidth<0.666\paperwidth
\@setplength{infocolwidth}{.22222\paperwidth}%
\else
\@setplength{infocolwidth}{0.1667\paperwidth}%
\fi
\setkomavar{firsthead}{%
\fontsize{8}{9}\sffamily
\hspace*{\fill}%
\begin{picture}(0,0)%
\put(0,0){\parbox[t]{\useplength{infocolwidth}}{%
\raggedright
\begingroup
\fontsize{24pt}{24pt}\selectfont
\vskip\z@
\makebox[0pt][r]{\textbf{\usekomavar{fromname}}\quad}%
% Zwei Alternativen:
% a) Name unten am Bild ausgerichtet:
\usekomavar{fromlogo}\par% \par ist hier sehr wichtig!
% b) Name oben am Bild ausgerichtet:
%\raisebox{\dimexpr\ht\strutbox-\height}{\usekomavar{fromlogo}}\par
\endgroup
%\apname{Ansprechpartner: \linebreak J\"org Mitarbeiter}
\aptown{Hamburg}
\appostalcode{xxxxx}
\aptel{00\,00\,00\,00}
\aphandy{00\,00\,00\,00}
%\apfax{2222}
\apemail{Name@uni-hamburg.de}
%\apwwwuni{www.adresse.uni-hamburg.de}
%\division{Institut f\"ur Hier und da}
\subdivision{\textbf{Name}}
%\secretariat{}
\sectel{1111}
%\apsign{ABCD/1234}
\showbank
\libertine
\begin{document}
\smallskip
%\phone{(0228) 24\,00\,92\,07}
\begin{letter}{
\begin{tabularx}{\useplength{infocolwidth}}
{@{}l@{}>{\raggedright}X@{}}
\usekomavar*{fromaddress}
& \raggedright\usekomavar{fromaddress}
\tabularnewline
\ifkomavarempty{fromphone}{}{%
\usekomavar*{fromphone} & \usekomavar{fromphone}\tabularnewline
}%
\ifkomavarempty{frommobilephone}{}{%
\usekomavar*{frommobilephone} & \usekomavar{frommobilephone}%
\tabularnewline
}%
\ifkomavarempty{fromemail}{}{%
\usekomavar*{fromemail} & \usekomavar{fromemail}\tabularnewline
}%
\end{tabularx}
}%
}%
\put(0,0){\parbox[t]{\useplength{infocolwidth}}{%
\vskip \useplength{refvpos}
\raggedright
\usekomavar{place}\usekomavar{placeseparator}%
\usekomavar{date}
}%
}%
\end{picture}%
\hspace*{\useplength{infocolwidth}}%
}%
\KOMAoptions{refline=nodate,backaddress=plain}
\let\raggedsignature\raggedright
\end{filecontents}
\documentclass[10pt,symbolicnames]{scrlttr2}
\usepackage{ifluatex,ifxetex}
\ifluatex\else\ifxetex\else
\usepackage{selinput}
\SelectInputMappings{
adieresis={ä},
germandbls={ß},
}
\usepackage[T1]{fontenc}
\fi\fi
\usepackage{libertine}
\usepackage{graphicx}
\usepackage{ifsym}
\LoadLetterOption{Tischa}
\setkomavar*{fromaddress}{\textifsymbol{18}}
\textbf{Stadt}}
\usepackage{mwe}% Zu Demozwecken
\begin{document}
\begin{letter}{Du\\Da\\Irgendwo\\Genau\\~\\~\\}
%\opening{Sehr geehrte Damen und Herren,}
%\opening{Sehr geehrte Frau ,}
\opening{Sehr geehrter Herr ,}
\blindtext \blindtext
\closing{Mit vorzüglicher Hochachtung}
\end{letter}
\end{document}
![alt text][1]
[1]: http://texwelt.de/wissen/upfiles/test_3.jpgKlasse:
\NeedsTeXFormat{LaTeX2e}
\ProvidesClass{unihamburg}
\RequirePackage{ifthen}
\RequirePackage[usenames,dvipsnames]{xcolor}
\definecolor{unihamburg}{RGB}{0,66,144}
\definecolor{text1}{HTML}{2b2b2b}
\definecolor{shade}{HTML}{F5DD9D}
\definecolor{headings}{HTML}{701112}
\RequirePackage{graphicx}
\RequirePackage{blindtext}
\RequirePackage{marvosym}
\RequirePackage{ifsym}
\RequirePackage{mdframed}
\mdfdefinestyle{zitat}{
hidealllines=true,leftline=true,linewidth=2pt,
leftmargin=1.5em,innerleftmargin=1.5em,rightmargin=1.5em,
innerrightmargin=0pt,innerbottommargin=0pt, innertopmargin=0pt, linecolor=unihamburg}
\usepackage{pdfpages}
\RequirePackage{graphicx}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[oldstyle,sflining]{libertine}
\newboolean{@german} \setboolean{@german}{false}
\DeclareOption{ngerman}{\setboolean{@german}{true}}
\DeclareOption{english}{\setboolean{@german}{false}}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{letter}}
\ExecuteOptions{ngerman} \ProcessOptions
\LoadClass[a4paper]{letter}
\newcommand{\lettergerman}{}
\newcommand{\letterenglish}{}
\ifthenelse{\boolean{@german}}
{\RequirePackage{ngerman}\lettergerman}{\letterenglish}
% Seitenaufteilung
\setlength{\hoffset}{-1in} % Horizontaler Offset des Druckertreibers kompensiert
\setlength{\voffset}{-1in} % Vertikaler Offset des Druckertreibers kompensiert
\setlength{\marginparwidth}{40mm} % Breite der Randboxen
\setlength{\oddsidemargin}{20mm} % Linker Rand (ungerade Seiten)
\setlength{\evensidemargin}{20mm} % Linker Rand (gerade Seiten)
\setlength{\headsep}{0mm} % Abstand von der Kopfzeile zum Text
\setlength{\topmargin}{10mm} % Oberer Rand
\newdimen\logoheight \setlength{\logoheight}{22mm} % Höhe des graphischen Logos
\newdimen\divisionheight \setlength{\divisionheight}{0pt} % Höher der drei Zeilen für die Übergeordnete Funktionseinheit
\newdimen\subdivisionheight \setlength{\subdivisionheight}{\divisionheight} % Höher der drei Zeilen für die Übergeordnete Funktionseinheit
\newdimen\vheaderskip \setlength{\vheaderskip}{2mm} % vertikaler Abstand der Blöcke im Header
\newdimen\headerskip \setlength{\headerskip}{\vheaderskip} % horizontaler Abstand der Blöcke im Header
\addtolength{\headerskip}{2mm}
\newdimen\addressskip \setlength{\addressskip}{6mm} % Erhöhung der Adresse über die Absenderinformationen
\newdimen\addressheight \setlength{\addressheight}{31mm}
\newdimen\subjectheight \setlength{\subjectheight}{20mm}
\newdimen\addresswidth \setlength{\addresswidth}{78mm}
\newdimen\fromwidth \setlength{\fromwidth}{58mm}
\newdimen\bottommargin \setlength{\bottommargin}{10mm} % Unterer Rand
\setlength{\textwidth}{4mm} % Textbreite -- 4mm als fudge-factor nötig.
\addtolength{\textwidth}{\addresswidth}
\addtolength{\textwidth}{\fromwidth}
\setlength{\headheight}{0mm} % Höhe der Kopfzeile bis unter die Kurzanschrift
\addtolength{\headheight}{\logoheight}
\addtolength{\headheight}{\divisionheight}
\addtolength{\headheight}{2\vheaderskip}
\addtolength{\headheight}{9.5pt} % Höhe einer Zeile in 8.00pt, entspricht der Funktion oder Name Zeile, auf die die Kurzadresse ausgerichtet ist
\addtolength{\headheight}{\addressskip}
\setlength{\fboxsep}{0pt} % Fboxen zum debuggen ohne Rand
\setlength{\textheight}{0mm} % Texthöhe
\addtolength{\textheight}{296mm}
\addtolength{\textheight}{-\topmargin}
\addtolength{\textheight}{-\headheight}
\addtolength{\textheight}{-\headsep}
\addtolength{\textheight}{-\bottommargin}
\newdimen\senderboxheight \setlength{\senderboxheight}{296mm} % Höhe der Randspalte mit den Absenderinformationen
\addtolength{\senderboxheight}{-\topmargin}
\addtolength{\senderboxheight}{-\logoheight}
\addtolength{\senderboxheight}{-2\divisionheight}
\addtolength{\senderboxheight}{-3\vheaderskip}
\addtolength{\senderboxheight}{-\bottommargin}
\addtolength{\senderboxheight}{-13.5pt} % Mir ist nicht wirklich klar, warum das hierhin gehört
% Dummyvariablen
\newdimen\tmplength
% Löschung nicht benötigter Definitionen
\let\name\@undefined
\let\fromname\@undefined
\let\address\@undefined
\let\fromaddress\@undefined
\let\location\@undefined
\let\fromlocation\@undefined
\let\telephone\@undefined
\let\telephonenum\@undefined
\let\fromsig\@undefined
% Definitionen und Variablen
\newcommand{\cdaddress}{
%\includegraphics[width=20mm,height=20mm]{/home/tischa/Dokumente/Korrespondenz/Vorlage/Logo/QR.png}
}
\newcommand{\fromsig}{}
\def\signature#1{\renewcommand{\fromsig}{#1}}
\newcommand{\@shortstreet}{Adresse Straße 11}
\newcommand{\@shortsender}{\hspace{3em}}
\def\shortsender#1{\renewcommand{\@shortsender}{#1}}
\newcommand{\@shortaddress}{XXXX\,Hamburg} % Die Voreinstellung sollte übernommen werden.
\def\shortaddress#1{\renewcommand{\@shortaddress}{#1}}
\newcommand{\@name}{} % Name (in Fettschrift)
\newboolean{@nameset}
\setboolean{@nameset}{false}
\def\name#1{
\renewcommand{\@name}{#1}
\setboolean{@nameset}{true}
}
\newcommand{\noname}{
\setboolean{@nameset}{false}
}
\newcommand{\@function}{} % Name und/oder Funktion
\def\function#1{\renewcommand{\@function}{#1}}
\newcommand{\@subject}{}
\def\subject#1{\renewcommand{\@subject}{#1}}
% Kommandos für den rechten Rand
\newcommand{\ap@name}{} % Name des Ansprechpartners
\newboolean{ap@nameset}
\setboolean{ap@nameset}{false}
\def\apname#1{
\renewcommand{\ap@name}{#1}
\setboolean{ap@nameset}{true}
}
\newcommand{\ap@postalcode}{} % Postleitzahl
\def\appostalcode#1{\renewcommand{\ap@postalcode}{#1}}
\newcommand{\ap@town}{Hamburg} % Ort
\def\aptown#1{\renewcommand{\ap@town}{#1}}
\newcommand{\ap@street}{Adress Straße\,11} % Strasse
\newboolean{@altstreetstyle}\setboolean{@altstreetstyle}{false} % Verwende den Postanschrift/Dienstgebäude-Stil
\def\altstreetstyle{\setboolean{@altstreetstyle}{true}}
\def\apstreet#1{\renewcommand{\ap@street}{#1}}
\newcommand{\ap@tel}{} % Telefonnummer
\newcommand{\ap@telprefix}{(0228)\,}
\newcommand{\aptel}[2][(0228)\,]{
\renewcommand{\ap@telprefix}{#1}
\renewcommand{\ap@tel}{#2}
}
\newcommand{\ap@handy}{} % Telefonnummer
\newcommand{\ap@handyprefix}{(0176)\,}
\newcommand{\aphandy}[2][(0228)\,]{
\renewcommand{\ap@handy}{#1}
\renewcommand{\ap@handy}{#2}
}
%\newcommand{\ap@fax}{} % Faxnummer
%\newcommand{\ap@faxprefix}{(0228)\,}
%\newcommand{\apfax}[2][(0228)\,]{
% \renewcommand{\ap@faxprefix}{#1}
%\renewcommand{\ap@fax}{#2}
%}
\newcommand{\ap@email}{}
\def\apemail#1{\renewcommand{\ap@email}{#1}}
\newcommand{\ap@wwwuni}{}
\def\apwwwuni#1{\renewcommand{\ap@wwwuni}{#1}}
\newcommand{\@division}{}
\def\division#1{\renewcommand{\@division}{#1}}
\newcommand{\@subdivision}{}
\def\subdivision#1{\renewcommand{\@subdivision}{#1}}
\newcommand{\@secretariat}{}
\def\secretariat#1{\renewcommand{\@secretariat}{#1}}
\newcommand{\@sectel}{} % Telefonnummer Sekretariat
\newcommand{\@sectelprefix}{(0228)\,}
\newcommand{\sectel}[2][(0228)\,]{
\renewcommand{\@sectelprefix}{#1}
\renewcommand{\@sectel}{#2}
}
\newcommand{\@apsign}{}
\def\apsign#1{\renewcommand{\@apsign}{#1}}
\newcommand{\@bank}{
Bank
}
\newboolean{@showbank}\setboolean{@showbank}{false} % Normalerweise wollen wir die Bankverbindung nicht haben
\def\nobank{\setboolean{@showbank}{false}}
\def\showbank{\setboolean{@showbank}{true}}
\newcommand{\bank}[2][true]{
\setboolean{@showbank}{#1}
\renewcommand{\@bank}{#2}
}
\newcommand{\righttext}{
\ifthenelse{\boolean{ap@nameset}}
{\ap@name \\}
{}
\ifthenelse{\boolean{@altstreetstyle}}
{}
{\textifsymbol{18} \ap@street\\
\ap@postalcode{}\,\ap@town\\}
\Telefon~\ap@telprefix \ap@tel\\
\Mobilefone~\ap@handyprefix \ap@handy\\
%Fax: \ap@faxprefix \ap@fax\\
\ifthenelse{\equal{\@secretariat}{}}
{}
{Sekretariat: \@secretariat\\
Tel.: \@sectelprefix \@sectel \\}
\Email~\ap@email\\
\ifthenelse{\boolean{@altstreetstyle}}
{Postanschrift: \mbox{\ap@postalcode{} \ap@town}\\
Dienstgeb\"aude: \mbox{\ap@street}\\}
{}
\ifthenelse{\equal{\ap@wwwuni}{}}
{}
{\ap@wwwuni\\}
\\
\ifthenelse{\equal{\@apsign}{}}
{}
{Aktenchen: \@apsign\\
\\}
%\\\\\\\\\\
\vspace{18.5mm}
{\flushleft
\ap@town{},% \linebreak[1]
\,\@date\\
}
\ifthenelse{\boolean{@showbank}}
{\vfill
\begin{minipage}[t]{\marginparwidth}
\@bank
\end{minipage}}
{}
}
% Zeichensatzauswahl
\renewcommand{\familydefault}{\sfdefault}
% Redefinition des Kopfes
\def\ps@firstpage{\def\@oddhead{%
\begin{tabular}[b]{@{}p{\addresswidth}@{}@{\extracolsep{\headerskip}}p{\fromwidth}@{}@{}p{\marginparwidth}@{\extracolsep{0pt}}}
%\hline
%\fbox{MxM}
&
% Gibt es eine weniger verbose Möglichkeit Längen zu addieren?
\setlength{\tmplength}{\logoheight}
\addtolength{\tmplength}{\vheaderskip}
\parbox[][\tmplength][t]{\fromwidth}{{\begin{flushright} \cdaddress \end{flushright}}}
&
%\fbox{MxM}
\setlength{\tmplength}{\logoheight}
\addtolength{\tmplength}{\vheaderskip}
\parbox[][\tmplength][t]{\marginparwidth}{{\begin{flushleft} \includegraphics[height=25mm]{/home/tischa/Dokumente/Vorlagen/Logo/qrcodeprivate.png} \end{flushleft}}}
\\
%\hline
&
\setlength{\tmplength}{\divisionheight}
\addtolength{\tmplength}{\vheaderskip}
\begin{minipage}[t][\tmplength][t]{\fromwidth}
\begin{flushright}
\footnotesize
\end{flushright}
\end{minipage}
&
\begin{minipage}[t][][t]{\marginparwidth}
\begin{flushleft}
\footnotesize
\@division
\end{flushleft}
\end{minipage}
\\
%\hline
\begin{minipage}[t][2ex][t]{\addresswidth}
\makebox[-3pt][r]{ % -3pt sind reine Empirik
\parbox[t]{8mm}{ % ebenso Empirik; 9.5mm wären zu erwarten gewesen
\mbox{} \\
\setlength{\unitlength}{1mm}
\begin{picture}(1,97)
\multiput(0,0)(0,46){3}{ % 46 ist Empirik
\textcolor{unihamburg}{\rule{1mm}{1mm}}
}
\end{picture}
}
}
\begin{minipage}[t][][t]{\addresswidth}
\begin{flushleft}
\scriptsize
\@shortsender{}\,$\cdot$\,\@shortstreet\,$\cdot$\,\@shortaddress
\end{flushleft}
\end{minipage}
\end{minipage}
&
\setlength{\tmplength}{\subdivisionheight}
\addtolength{\tmplength}{\vheaderskip}
\begin{minipage}[t][\tmplength][t]{\fromwidth}
\begin{flushright}
\footnotesize
\ifthenelse{\boolean{@nameset}}
{\textbf{\@name} \\}
{}
\@function
\end{flushright}
\end{minipage}
&
\begin{minipage}[t][][t]{\marginparwidth}
\begin{flushleft}
\footnotesize
\@subdivision
\end{flushleft}
\end{minipage}
\\
%\hline
&
&
\parbox[t][\senderboxheight][t]{\marginparwidth}{{\footnotesize \righttext}}
\\
%\hline
\end{tabular}
}
\def\@oddfoot{}%
\def\@evenhead{}%
\def\@evenfoot{}%
}
\def\ps@headings{\def\@evenhead{%
\begin{tabular}[b]{@{}p{\addresswidth}@{}@{\extracolsep{\headerskip}}p{\fromwidth}@{}@{}p{\marginparwidth}@{\extracolsep{0pt}}}
%\hline
%\fbox{MxM}
&
% Gibt es eine weniger verbose Möglichkeit Längen zu addieren?
\setlength{\tmplength}{\logoheight}
\addtolength{\tmplength}{\vheaderskip}
\parbox[][\tmplength][t]{\fromwidth}{{\begin{flushright} \cdaddress \end{flushright}}}
&
%\fbox{MxM}
\\
%\hline
&
\setlength{\tmplength}{\divisionheight}
\addtolength{\tmplength}{\vheaderskip}
\begin{minipage}[t][\tmplength][t]{\fromwidth}
\begin{flushright}
\footnotesize
\end{flushright}
\end{minipage}
&
\\
%\hline
\parbox[][2cm][t]{0pt}{}
&
\\
\end{tabular}
}%
\def\@oddfoot{}%
\def\@oddhead{\@evenhead}%
\def\@evenfoot{\@oddfoot}%
}
\ps@headings
% Opening
\def\opening#1{
\thispagestyle{firstpage}
% \vspace*{3ex}
\parbox[][\addressheight][t]{\addresswidth}{\toname \\ \toaddress}\\%
\parbox[][\subjectheight][b]{\textwidth}{
\textbf{\@subject}\\%
\vspace*{1ex}%
}\\%
#1\par\nobreak
\vspace{2\parskip}
}
% Closing
\def\closing#1{
\par\nobreak\vspace{\parskip}
\setlength{\tmplength}{\parskip}
%\includegraphics[height=2.0em]{Unterschrift.pdf}
\begin{minipage}[]{\textwidth}
#1\\\par\nobreak
\vspace*{1\tmplength}
\includegraphics[height=3.5em]{Unterschrift.pdf}
\end{minipage}
\fromsig
\vfill
}
