<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="2026.1.6" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Maximized="False" PreviewOptions.Zoom="1" PrintOptions.Printer="Vorgabe" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39414,0369373843" ReportOptions.Description.Text="" ReportOptions.LastChange="46324,7531973611" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  form,anzahl: integer;&#13;&#10;  b,h,karoan:real;&#13;&#10;  Masse,Ueberschrift,GebDatdrucken: string;&#13;&#10;  StandardFontSizes: TStringList;&#13;&#10;&#13;&#10;procedure DialogPage1OnActivate(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  a,i,merk: integer;&#13;&#10;begin&#13;&#10;&#13;&#10;  form:=0;&#13;&#10;  karoan:=210;&#13;&#10;  DatLeer.visible:=false;&#13;&#10;  DatAkt.visible:=true;&#13;&#10;  page1.Orientation:=poPortrait;&#13;&#10;  page1.RightMargin:=1*fr01in;&#13;&#10;  page1.BottomMargin:=1*fr01in;&#13;&#10;  Page1.LeftMargin:=2*fr01in;&#13;&#10;  Page1.TopMargin:=1*fr01in;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure Page1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  i,j,l,n:integer;&#13;&#10;&#13;&#10;  Karo: TfrxShapeView;&#13;&#10;  Karog: TfrxShapeView;&#13;&#10;  Karof: TfrxShapeView;&#13;&#10;  Linie: TfrxLineView;&#13;&#10;  Linief: TfrxLineView;&#13;&#10;  Liniet: TfrxLineView;&#13;&#10;&#13;&#10;begin&#13;&#10;// verfügbare Spalten berechnen&#13;&#10;  if form=1 then&#13;&#10;  begin&#13;&#10;   l:=round((297-karoan/fr01cm-Page1.LeftMargin-page1.RightMargin));&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;   l:=round((210-karoan/fr01cm-Page1.LeftMargin-page1.RightMargin));&#13;&#10;  end;&#13;&#10;&#13;&#10;  // Feldgröße anpassen&#13;&#10;  Memo3.height:=h*fr01cm;&#13;&#10;  Memo4.height:=h*fr01cm;&#13;&#10;  GebDatMemo.height:=h*fr01cm;&#13;&#10;  MasterData.height:=h*fr01cm;&#13;&#10;&#13;&#10;&#13;&#10;  // Schrift verkleinern&#13;&#10;  if h&#60;0.4 then&#13;&#10;  begin&#13;&#10;    Memo3.Font.Size:=round(h*fr01cm/1.6);&#13;&#10;    Memo4.Font.Size:=round(h*fr01cm/1.6);&#13;&#10;  end;&#13;&#10;&#13;&#10;  //  HINWEIS: Die Font-Sizes können vom Benutzer eingestellt werden!&#13;&#10;  //           Diese Benutzereinstellungen werden aber erst hier im Page1OnBeforePrint-Ereignis ausgewertet (und event. verändert)!&#13;&#10;  //           Deshalb die Standard-Font-Sizes der dynamisch anzupassenden Felder auch erst hier abspeichern!&#13;&#10;&#13;&#10;  if StandardFontSizes = nil then&#13;&#10;    StandardFontSizes := TStringList.Create&#13;&#10;  else&#13;&#10;    StandardFontSizes.Clear;&#13;&#10;&#13;&#10;  // Hier JEDES Feld eintragen, das dynamisch angepasst werden soll:&#13;&#10;  StandardFontSizes.Values[&#39;Memo3&#39;] := IntToStr(Memo3.Font.Size);&#13;&#10;  StandardFontSizes.Values[&#39;Memo4&#39;] := IntToStr(Memo4.Font.Size);&#13;&#10;  StandardFontSizes.Values[&#39;GebDatMemo&#39;] := IntToStr(GebDatMemo.Font.Size);&#13;&#10;&#13;&#10;  // Linien zeichnen&#13;&#10;  // Linie im MasterData&#13;&#10;    Linie:=TfrxLineView.Create(MasterData);&#13;&#10;    Linie.width:=l*fr01cm;&#13;&#10;    Linie.Height:=0;&#13;&#10;    Linie.Left:=karoan;&#13;&#10;    Linie.Top:=h*fr01cm;&#13;&#10;&#13;&#10;    Liniet:=TfrxLineView.Create(MasterData);&#13;&#10;    Liniet.Top:=0;&#13;&#10;    Liniet.Height:=0;&#13;&#10;    Liniet.Height:=h*fr01cm;&#13;&#10;    Liniet.left:=karoan+b*i*fr01cm;&#13;&#10;&#13;&#10;&#13;&#10;    // Trennlinien im Gruppenkopf&#13;&#10;    Liniet:=TfrxLineView.Create(PageHeader1);&#13;&#10;    Liniet.Top:=PageHeader1.Height;&#13;&#10;    Liniet.Height:=0;&#13;&#10;    Liniet.Left:=karoan;&#13;&#10;    Liniet.width:=l*fr01cm;&#13;&#10;&#13;&#10;    Liniet:=TfrxLineView.Create(PageHeader1);&#13;&#10;    Liniet.Top:=PageHeader1.Height-h*fr01cm;&#13;&#10;    Liniet.Width:=0;&#13;&#10;    Liniet.Height:=h*fr01cm;&#13;&#10;    Liniet.left:=karoan+b*i*fr01cm;&#13;&#10;&#13;&#10;    for j:=1 to 2 do&#13;&#10;    begin&#13;&#10;      // zwei Leerzeile im Footer&#13;&#10;      Linief:=TfrxLineView.Create(GroupFooter1);&#13;&#10;      Linief.width:=karoan+l*fr01cm;&#13;&#10;      Linief.Height:=0;&#13;&#10;      Linief.Left:=0;&#13;&#10;      Linief.Top:=j*h*fr01cm;&#13;&#10;      // Linien im Footer&#13;&#10;      Liniet:=TfrxLineView.Create(GroupFooter1);&#13;&#10;      Liniet.Top:=0;//PageHeader1.Height-h*fr01cm;&#13;&#10;      if j=1&#13;&#10;        then Liniet.Top:=0*fr01cm&#13;&#10;        else Liniet.Top:=h*fr01cm;&#13;&#10;&#13;&#10;      Liniet.Width:=0;&#13;&#10;      Liniet.Height:=h*fr01cm;&#13;&#10;      Liniet.left:=karoan+b*i*fr01cm;&#13;&#10;    end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure Button1OnEnter(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  h:=strtoFloat(ComboBox1.Text);&#13;&#10;  Memo3.Font.Size:=strtoint(FontGr.Text);&#13;&#10;  Memo4.Font.Size:=strtoint(FontGr.Text);&#13;&#10;  GebDatMemo.Font.Size:=strtoint(FontGr.Text);&#13;&#10;  GroupFooter1.Height:=(2*h)*fr01cm;&#13;&#10;&#13;&#10;  if mKuerzel.checked then&#13;&#10;  begin&#13;&#10;    Memo3.visible:=true;&#13;&#10;    karoan:=252;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo3.visible:=false;&#13;&#10;    karoan:=210;&#13;&#10;  end;&#13;&#10;&#13;&#10;&#13;&#10;  if GebDatdr.checked then&#13;&#10;  begin&#13;&#10;    Karoan:=Karoan+70;&#13;&#10;    GebDatMemo.visible:=true;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    if mKuerzel.checked then&#13;&#10;       karoan:=252&#13;&#10;    else&#13;&#10;       karoan:=210;&#13;&#10;    GebDatMemo.visible:=false;&#13;&#10;  end;&#13;&#10;&#13;&#10;  //showmessage(q1.sql.text);&#13;&#10;  Button1.ModalResult:=mrOk;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure RadioButton1OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if RadioButton1.Checked then&#13;&#10;    begin&#13;&#10;    page1.Orientation:=poPortrait;&#13;&#10;    Page1.LeftMargin:=2*fr01in;&#13;&#10;    Page1.TopMargin:=1*fr01in;&#13;&#10;    form:=0;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure RadioButton2OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if RadioButton2.Checked then&#13;&#10;  begin&#13;&#10;    page1.Orientation:=poLandscape;&#13;&#10;    page1.LeftMargin:=1*fr01in;&#13;&#10;    page1.TopMargin:=2*fr01in;&#13;&#10;    form:=1;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure GebDatOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if GebDatdr.checked then&#13;&#10;  begin&#13;&#10;    Karoan:=Karoan+70;&#13;&#10;    GebDatMemo.visible:=true;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    GebDatMemo.visible:=false;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10; procedure weiterOnClick(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  order,ohne,mit: string;&#13;&#10;&#13;&#10;const&#13;&#10;  SQLSTMT = &#39;SELECT * FROM lehrer l inner join person p on l.Id=p.Id where p.Deleted=0 &#39;;&#13;&#10;&#13;&#10;begin&#13;&#10;  if CheckBox1.checked=false then ohne:=&#39; and AbgeordnetAn=&#34;&#34;&#39;;&#13;&#10;  if CheckBox2.checked=false then ohne:=ohne+&#39; and Abgang is null&#39;;&#13;&#10;  if CheckBox3.checked=false then ohne:=ohne+&#39; and ZZBeurlaubt=0&#39;;&#13;&#10;  if CheckBox4.checked=true then&#13;&#10;  begin&#13;&#10;       mit:=&#39; and Lehrkraft=1&#39;;&#13;&#10;       Ueberschrift:=&#39;Lehrerinnen und Lehrer&#39;;&#13;&#10;       if Checkbox5.checked=true then&#13;&#10;       begin&#13;&#10;         mit:=&#39;&#39;;&#13;&#10;         Ueberschrift:=&#39;Lehrerinnen und Lehrer sowie Mitarbeiterinnen und Mitarbeiter&#39;;&#13;&#10;       end;&#13;&#10;  end;&#13;&#10;  if (CheckBox4.checked=false) and (Checkbox5.checked=true) then&#13;&#10;  begin&#13;&#10;    mit:=&#39; and Lehrkraft=0&#39;;&#13;&#10;    Ueberschrift:=&#39;Mitarbeiterinnen und Mitarbeiter&#39;;&#13;&#10;  end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;//######################################  sort  #############################################&#13;&#10;  if namvor.checked then&#13;&#10;       order := &#39;Nachname,Rufname&#39;;&#13;&#10;  if geschlecht.checked then&#13;&#10;  begin&#13;&#10;       order := &#39;Geschlecht desc,Nachname,Rufname&#39;;&#13;&#10;       trdruck.checked:=true;&#13;&#10;  end;&#13;&#10;  if kuerzel.checked then&#13;&#10;  begin&#13;&#10;       order := &#39;Kuerzel&#39;;&#13;&#10;       mKuerzel.checked:=true;&#13;&#10;  end;&#13;&#10;  if gebdat.checked then&#13;&#10;  begin&#13;&#10;       order := &#39;substr(Geburtsdatum,6,5)&#39;;&#13;&#10;       GebDatdr.checked:=true;&#13;&#10;  end;&#13;&#10;  if alter.checked then&#13;&#10;  begin&#13;&#10;       order := &#39;Geburtsdatum&#39;;&#13;&#10;       GebDatdr.checked:=true;&#13;&#10;  end;&#13;&#10;  if trdruck.checked then&#13;&#10;  begin&#13;&#10;    GroupHeader1.Visible:= true;&#13;&#10;    //Footer1.visible:=false;&#13;&#10;  end;&#13;&#10;&#13;&#10;  q1.SQL.Text := SQLSTMT + ohne+mit+&#39; order by &#39;+order;&#13;&#10;  //showmessage(q1.SQL.Text);&#13;&#10;&#13;&#10;  sort.ModalResult := mrOk;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure geschlechtOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if geschlecht.checked then&#13;&#10;  begin&#13;&#10;    trdruck.enabled:=true;&#13;&#10;    trdruck.checked:=true;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure namvorOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  trdruck.enabled:=false;&#13;&#10;  trdruck.checked:=false;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure kuerzelOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  trdruck.enabled:=false;&#13;&#10;  trdruck.checked:=false;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure alterOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  trdruck.enabled:=false;&#13;&#10;  trdruck.checked:=false;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure trdruckOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if trdruck.checked then&#13;&#10;  begin&#13;&#10;    GroupHeader1.visible:=true;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    GroupHeader1.visible:=false;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure mKuerzelOnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if trdruck.checked then&#13;&#10;  begin&#13;&#10;    GroupHeader1.visible:=true;&#13;&#10;    GroupFooter1.visible:=true;&#13;&#10;    ReportSummary1.Visible:=false;&#13;&#10;    Memo3.visible:=false;&#13;&#10;    karoan:=210;&#13;&#10;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    GroupHeader1.visible:=false;&#13;&#10;    GroupFooter1.visible:=false;&#13;&#10;    ReportSummary1.Visible:=true;&#13;&#10;    Memo3.visible:=true;&#13;&#10;    karoan:=252;&#13;&#10;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;// Hilfsprozedur: Passt die Schriftgröße eines beliebigen Memos dynamisch an&#13;&#10;procedure AutoScaleMemoFont(M: TfrxMemoView; StandardSize: Integer);&#13;&#10;const&#13;&#10;  MindestGroesse = 6;&#13;&#10;  SicherheitsAbstand = 0; //2;&#13;&#10;var&#13;&#10;  OriginalText: String;&#13;&#10;  Wort: String;&#13;&#10;  I: Integer;&#13;&#10;  MaxWortBreite: Extended;&#13;&#10;  VerfuegbareBreite: Extended;&#13;&#10;&#13;&#10;  function IstTrennzeichen(C: Char): Boolean;&#13;&#10;  begin&#13;&#10;    //    Result := CharInSet(C, [&#39; &#39;, #9, #10, #13]);&#13;&#10;    Result := (C = &#39; &#39;) or&#13;&#10;              (C = #9) or&#13;&#10;              (C = #10) or&#13;&#10;              (C = #13);&#13;&#10;  end;&#13;&#10;&#13;&#10;  function ErmittleMaxWortBreite: Extended;&#13;&#10;  var&#13;&#10;    J: Integer;&#13;&#10;    S: String;&#13;&#10;  begin&#13;&#10;    Result := 0;&#13;&#10;    J := 1;&#13;&#10;&#13;&#10;    while J &#60;= Length(OriginalText) do&#13;&#10;    begin&#13;&#10;      // Leerzeichen überspringen&#13;&#10;      while (J &#60;= Length(OriginalText)) and&#13;&#10;            IstTrennzeichen(OriginalText[J]) do&#13;&#10;        Inc(J);&#13;&#10;&#13;&#10;      S := &#39;&#39;;&#13;&#10;&#13;&#10;      // Nächstes vollständiges Wort ermitteln&#13;&#10;      while (J &#60;= Length(OriginalText)) and&#13;&#10;            not IstTrennzeichen(OriginalText[J]) do&#13;&#10;      begin&#13;&#10;        S := S + OriginalText[J];&#13;&#10;        Inc(J);&#13;&#10;      end;&#13;&#10;&#13;&#10;      if S &#60;&#62; &#39;&#39; then&#13;&#10;      begin&#13;&#10;        // Wortbreite mit FastReport berechnen&#13;&#10;        M.Text := S;&#13;&#10;&#13;&#10;        if M.CalcWidth &#62; Result then&#13;&#10;          Result := M.CalcWidth;&#13;&#10;      end;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;&#13;&#10;begin&#13;&#10;  if M = nil then&#13;&#10;    Exit;&#13;&#10;&#13;&#10;  // Ursprünglichen Text sichern&#13;&#10;  OriginalText := M.Text;&#13;&#10;&#13;&#10;  try&#13;&#10;    // Ausgangswerte zurücksetzen&#13;&#10;    M.Font.Size := StandardSize;&#13;&#10;    M.GapY := 1;&#13;&#10;    M.Valign := vaCenter;&#13;&#10;    M.WordWrap := True;&#13;&#10;&#13;&#10;    // Verfügbare Breite ohne Innenabstände&#13;&#10;    VerfuegbareBreite :=  M.Width - { 2 * M.GapX -} SicherheitsAbstand;&#13;&#10;&#13;&#10;    if VerfuegbareBreite &#60;= 0 then&#13;&#10;      Exit;&#13;&#10;&#13;&#10;    // 1. Schriftgröße anhand der Wortbreiten anpassen&#13;&#10;    repeat&#13;&#10;      MaxWortBreite := ErmittleMaxWortBreite;&#13;&#10;&#13;&#10;      if MaxWortBreite &#60;= VerfuegbareBreite then&#13;&#10;        Break;&#13;&#10;&#13;&#10;      if M.Font.Size &#60;= MindestGroesse then&#13;&#10;        Break;&#13;&#10;&#13;&#10;      M.Font.Size := M.Font.Size - 1;&#13;&#10;&#13;&#10;    until False;&#13;&#10;&#13;&#10;    // Originaltext wiederherstellen&#13;&#10;    M.Text := OriginalText;&#13;&#10;&#13;&#10;    // 2. Schriftgröße anhand der Gesamthöhe anpassen&#13;&#10;    while (M.CalcHeight &#62; M.Height) and&#13;&#10;          (M.Font.Size &#62; MindestGroesse) do&#13;&#10;      M.Font.Size := M.Font.Size - 1;&#13;&#10;&#13;&#10;  finally&#13;&#10;    // Originaltext auf jeden Fall wiederherstellen&#13;&#10;    M.Text := OriginalText;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  HINWEIS: Die Font-Sizes können vom Benutzer eingestellt werden!&#13;&#10;//           Diese Benutzereinstellungen werden aber erst im Page1OnBeforePrint-Ereignis ausgewertet!&#13;&#10;//           Deshalb die Standard-Font-Sizes der dynamisch anzupassenden Felder auch erst dort abspeichern!&#13;&#10;&#13;&#10;//  if StandardFontSizes = nil then&#13;&#10;//    StandardFontSizes := TStringList.Create&#13;&#10;//  else&#13;&#10;//    StandardFontSizes.Clear;&#13;&#10;//&#13;&#10;//  // Hier JEDES Feld eintragen, das dynamisch angepasst werden soll:&#13;&#10;//  StandardFontSizes.Values[&#39;Memo4&#39;] := IntToStr(Memo4.Font.Size);&#13;&#10;//  StandardFontSizes.Values[&#39;GebDatMemo&#39;] := IntToStr(GebDatMemo.Font.Size);&#13;&#10;end;&#13;&#10;&#13;&#10;// Zentraler Event-Handler für alle betroffenen Textfelder&#13;&#10;procedure DynamicFontOnAfterData(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  M: TfrxMemoView;&#13;&#10;  StdSize: Integer;&#13;&#10;  ValStr: String;&#13;&#10;begin&#13;&#10;  M := TfrxMemoView(Sender);&#13;&#10;  ValStr := StandardFontSizes.Values[M.Name];&#13;&#10;&#13;&#10;  // Hier können Besonderheiten bei einzelnen Feldern eingetragen werden ...&#13;&#10;  // ....&#13;&#10;&#13;&#10;  // Prüfen, ob für das Feld eine Schriftgröße hinterlegt wurde, sonst Fallback auf 10&#13;&#10;  if ValStr &#60;&#62; &#39;&#39; then&#13;&#10;    StdSize := StrToInt(ValStr)&#13;&#10;  else&#13;&#10;    StdSize := 10;&#13;&#10;&#13;&#10;  AutoScaleMemoFont(M, StdSize);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end." StoreInDFM="False" OnStartReport="frxReportOnStartReport">
  <Datasets>
    <item DataSet="anz" DataSetName="anz"/>
    <item DataSet="q1" DataSetName="q1"/>
    <item DataSet="sh" DataSetName="sh"/>
  </Datasets>
  <TfrxDataPage Name="Data" HGuides.Text="" VGuides.Text="" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxMYDACQuery Name="anz" UserName="anz" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="192" Top="112" IgnoreDupParams="False" SQL.Text="" LocalMasterDetail="False"/>
    <TfrxMYDACQuery Name="q1" UserName="q1" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="100" Top="112" IgnoreDupParams="False" SQL.Text="####&#13;&#10;#### wird zur Laufzeit veraendert&#13;&#10;####          &#13;&#10;  &#13;&#10;SELECT * FROM lehrer l inner join person p on l.Id=p.Id where p.Deleted=0     " SQLSchema="eAGLdkksSXRKLE6N5eUKDvSxtbAwMzEzMDE35OWKDklMykktBkqk2KYk5mUW6xiagpCRgQGQMgAqcC/KTAFKG9hq6UAUpOgY6hiAIVDWJzMvG6QbADC4GbU=" LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="Id"/>
        <item FieldName="ArbZeitKontoPlus"/>
        <item FieldName="FachId1"/>
        <item FieldName="FachId2"/>
        <item FieldName="FachId3"/>
        <item FieldName="StdAndereSchule"/>
        <item FieldName="Neuaufnahme" FieldType="fftBoolean"/>
        <item FieldName="Kuerzel" FieldType="fftString" Size="32"/>
        <item FieldName="LehramtId"/>
        <item FieldName="StdUnterrichtHier"/>
        <item FieldName="ArbZeitKontoMinus"/>
        <item FieldName="Mehrunterricht"/>
        <item FieldName="AbgeordnetAn" FieldType="fftString" Size="256"/>
        <item FieldName="Grund" FieldType="fftString" Size="256"/>
        <item FieldName="DienstbezeichnungId"/>
        <item FieldName="Zugang" FieldType="fftDateTime"/>
        <item FieldName="Abgang" FieldType="fftDateTime"/>
        <item FieldName="Regelstunden"/>
        <item FieldName="ZZBeurlaubt" FieldType="fftBoolean"/>
        <item FieldName="Ermaessigung"/>
        <item FieldName="Personalnummer" FieldType="fftString" Size="60"/>
        <item FieldName="Probezeit" FieldType="fftBoolean"/>
        <item FieldName="Beamter" FieldType="fftBoolean"/>
        <item FieldName="Lehrkraft" FieldType="fftBoolean"/>
        <item FieldName="Funktion" FieldType="fftString" Size="255"/>
        <item FieldName="Bemerkung" FieldType="fftString" Size="255"/>
        <item FieldName="Schulnetz" FieldType="fftBoolean"/>
        <item FieldName="Lehrerfunktion"/>
        <item FieldName="Passwort" FieldType="fftString" Size="255"/>
        <item FieldName="Id_1"/>
        <item FieldName="Deleted" FieldType="fftBoolean"/>
        <item FieldName="UpdateCount"/>
        <item FieldName="Rufname" FieldType="fftString" Size="256"/>
        <item FieldName="Vornamen" FieldType="fftString" Size="256"/>
        <item FieldName="Nachname" FieldType="fftString" Size="256"/>
        <item FieldName="Titel" FieldType="fftString" Size="64"/>
        <item FieldName="AkadTitel" FieldType="fftString" Size="64"/>
        <item FieldName="Geburtsdatum" FieldType="fftDateTime"/>
        <item FieldName="Geschlecht" FieldType="fftString"/>
        <item FieldName="IdentNummer" FieldType="fftString" Size="64"/>
        <item FieldName="Namenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="KonfessionId"/>
        <item FieldName="Geburtsort" FieldType="fftString" Size="256"/>
        <item FieldName="StaatsangehoerigkeitId"/>
        <item FieldName="lastmodified" FieldType="fftDateTime"/>
        <item FieldName="guid" FieldType="fftString" Size="36"/>
        <item FieldName="SanisSync"/>
        <item FieldName="Staatsangehoerigkeit2Id"/>
      </FieldDefs>
    </TfrxMYDACQuery>
    <TfrxMYDACQuery Name="sh" UserName="sh" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="288" Top="112" IgnoreDupParams="False" SQL.Text="select * from schule s                                                      " LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="Id"/>
        <item FieldName="UpdateCount"/>
        <item FieldName="Name" FieldType="fftString" Size="256"/>
        <item FieldName="IdentNummer" FieldType="fftString" Size="64"/>
        <item FieldName="Land" FieldType="fftString" Size="64"/>
        <item FieldName="Adresse" FieldType="fftString" Size="64"/>
        <item FieldName="PLZ"/>
        <item FieldName="Ort" FieldType="fftString" Size="64"/>
        <item FieldName="Telefon" FieldType="fftString" Size="64"/>
        <item FieldName="Fax" FieldType="fftString" Size="64"/>
        <item FieldName="EMail" FieldType="fftString" Size="64"/>
        <item FieldName="Homepage" FieldType="fftString" Size="64"/>
        <item FieldName="Bank" FieldType="fftString" Size="64"/>
        <item FieldName="Logo"/>
        <item FieldName="AnzahlStandorte"/>
        <item FieldName="SchulleiterID"/>
        <item FieldName="Schultraeger" FieldType="fftString" Size="255"/>
        <item FieldName="StandardLehrmittelausleiheID"/>
        <item FieldName="Dienststelle" FieldType="fftString" Size="255"/>
        <item FieldName="DienststelleMail" FieldType="fftString" Size="255"/>
      </FieldDefs>
    </TfrxMYDACQuery>
  </TfrxDataPage>
  <TfrxReportPage Name="Page1" HGuides.Text="" VGuides.Text="" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" Frame.Typ="0" MirrorMode="0" OnBeforePrint="Page1OnBeforePrint">
    <TfrxPageFooter Name="PageFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="22,67718" Left="0" Top="362,83488" Width="718,1107">
      <TfrxMemoView Name="Memo1" Align="baRight" AllowVectorExport="True" Left="566,929517773438" Top="3,77953" Width="151,1812" Height="18,89765" Editable="3" Frame.Typ="0" HAlign="haRight" Text="Karos; [Page#]/[TotalPages#]"/>
      <TfrxMemoView Name="Memo33" AllowVectorExport="True" Left="0" Top="3,77953" Width="517,79561" Height="18,89765" Editable="3" StretchMode="smActualHeight" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[IIF(AktuellerFilter&#60;&#62;&#39;&#39;,&#39;Filter: &#39;+AktuellerFilter,&#39;&#39;)"/>
    </TfrxPageFooter>
    <TfrxMasterData Name="MasterData" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="30,23624" Left="0" Top="166,29932" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="q1" DataSetName="q1" RowCount="0">
      <TfrxMemoView Name="Memo4" Align="baLeft" AllowVectorExport="True" Left="42" Top="0" Width="210" Height="30,23622047" Editable="3" OnAfterData="DynamicFontOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="12" GapX="4" GapY="0" ParentFont="False" VAlign="vaCenter" Text="[q1.&#34;Nachname&#34;], [q1.&#34;Rufname&#34;][IIF(&#60;q1.&#34;Namenszusatz&#34;&#62;&#60;&#62;&#39;&#39;,&#39; &#39;+&#60;q1.&#34;Namenszusatz&#34;&#62;,&#39;&#39;)] ([q1.&#34;Geschlecht&#34;])"/>
      <TfrxMemoView Name="Memo3" AllowVectorExport="True" Left="0" Top="0" Width="42" Height="30,23622047" Editable="3" Visible="False" OnAfterData="DynamicFontOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="14" GapX="4" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[q1.&#34;Kuerzel&#34;]"/>
      <TfrxMemoView Name="GebDatMemo" Align="baLeft" AllowVectorExport="True" Left="252" Top="0" Width="77,55906" Height="30,23622047" Editable="3" Visible="False" OnAfterData="DynamicFontOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="12" ParentFont="False" VAlign="vaCenter" Text="[q1.&#34;Geburtsdatum&#34;]"/>
    </TfrxMasterData>
    <TfrxPageHeader Name="PageHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="64,2519685" Left="0" Top="18,89765" Width="718,1107">
      <TfrxMemoView Name="Memo2" AllowVectorExport="True" Left="0" Top="2,3" Width="302,3624" Height="20,78740157" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[sh.&#34;Name&#34;]"/>
      <TfrxMemoView Name="DatLeer" Align="baRight" AllowVectorExport="True" Left="506,457037773438" Top="2,3" Width="170,07885" Height="22,67718" Editable="3" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="Datum:"/>
      <TfrxMemoView Name="DatAkt" Align="baRight" AllowVectorExport="True" Left="676,535887773438" Top="2,3" Width="41,57483" Height="18,89765" Editable="3" Visible="False" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Date]"/>
      <TfrxMemoView Name="Memo5" Align="baBottom" AllowVectorExport="True" Left="0" Top="48,2519683837891" Width="220" Height="16" Editable="3" StretchMode="smActualHeight" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[Ueberschrift]"/>
    </TfrxPageHeader>
    <TfrxReportSummary Name="ReportSummary1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="30,23624" Left="0" Top="309,92146" Width="718,1107">
      <TfrxMemoView Name="Memo8" AllowVectorExport="True" Left="0" Top="9,45671" Width="173,85838" Height="15,11812" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" VAlign="vaBottom" Text="Frauen: [SUM(IIF(&#60;q1.&#34;Geschlecht&#34;&#62;=&#39;w&#39;,1,0),)] / Männer: [SUM(IIF(&#60;q1.&#34;Geschlecht&#34;&#62;=&#39;m&#39;,1,0),)]"/>
    </TfrxReportSummary>
    <TfrxGroupHeader Name="GroupHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="0" Left="0" Top="143,62214" Visible="False" Width="718,1107" KeepWithData="False" Condition="q1.&#34;Geschlecht&#34;" StartNewPage="True"/>
    <TfrxGroupFooter Name="GroupFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="30,23622047" Left="0" Top="219,21274" Visible="False" Width="718,1107" KeepWithData="False">
      <TfrxMemoView Name="MaeJunG" AllowVectorExport="True" Left="0" Top="10" Width="173,85838" Height="15,11812" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" VAlign="vaBottom" Text="Frauen: [SUM(IIF(&#60;q1.&#34;Geschlecht&#34;&#62;=&#39;w&#39;,1,0),)] / Männer: [SUM(IIF(&#60;q1.&#34;Geschlecht&#34;&#62;=&#39;m&#39;,1,0),)]"/>
    </TfrxGroupFooter>
  </TfrxReportPage>
  <TfrxDialogPage Name="sort" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" HGuides.Text="" VGuides.Text="" BorderStyle="bsToolWindow" Caption="Optionen - Personen" DoubleBuffered="False" Height="416" ClientHeight="377" Left="679" Top="275" Width="562" Scaled="True" ClientWidth="546">
    <TfrxGroupBoxControl Name="GroupBox5" Left="11" Top="14" Width="269" Height="157" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" ParentFont="False" ShowHint="True" Caption="Sortieroptionen" Color="-16777201">
      <TfrxRadioButtonControl Name="namvor" Left="4" Top="24" Width="205" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Nachname, Rufname" Checked="True" Color="-16777201" OnClick="namvorOnClick"/>
      <TfrxRadioButtonControl Name="geschlecht" Left="4" Top="49" Width="205" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Geschlecht, Nachname, Rufname" TabStop="False" Color="-16777201" OnClick="geschlechtOnClick"/>
      <TfrxRadioButtonControl Name="kuerzel" Left="4" Top="74" Width="205" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Kürzel" TabStop="False" Color="-16777201" OnClick="kuerzelOnClick"/>
      <TfrxRadioButtonControl Name="GebDat" Left="4" Top="99" Width="205" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Geburtstag" TabStop="False" Color="-16777201" OnClick="gebdatOnClick"/>
      <TfrxRadioButtonControl Name="alter" Left="4" Top="124" Width="205" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Geburtsdatum" TabStop="False" Color="-16777201" OnClick="alterOnClick"/>
    </TfrxGroupBoxControl>
    <TfrxGroupBoxControl Name="GroupBox6" Left="303" Top="14" Width="229" Height="313" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" ParentFont="False" ShowHint="True" Caption="Ausdrucke mit den" Color="-16777201">
      <TfrxCheckBoxControl Name="CheckBox1" Left="8" Top="199" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Abgeordneten" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox2" Left="8" Top="224" Width="113" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Ausgeschiedenen" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox3" Left="8" Top="249" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Beurlaubten" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox4" Left="8" Top="24" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Lehrerkräften" Checked="True" State="cbChecked" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox5" Left="8" Top="49" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Mitarbeitern" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox6" Left="8" Top="99" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Verbeamteten" Checked="True" State="cbChecked" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox7" Left="8" Top="124" Width="97" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="in Probezeit" Checked="True" State="cbChecked" Color="-16777201"/>
      <TfrxCheckBoxControl Name="CheckBox8" Left="8" Top="149" Width="137" Height="17" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Neu Aufgenommenen" Checked="True" State="cbChecked" Color="-16777201"/>
    </TfrxGroupBoxControl>
    <TfrxButtonControl Name="weiter" Left="459" Top="341" Width="75" Height="25" ShowHint="True" Caption="weiter" ModalResult="1" OnClick="weiterOnClick"/>
  </TfrxDialogPage>
  <TfrxDialogPage Name="DialogPage2" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HGuides.Text="" VGuides.Text="" BorderStyle="bsSizeToolWin" Caption="Optionen - Layout" DoubleBuffered="False" Height="399" ClientHeight="360" Left="597" Top="188" Width="329" Scaled="True" ClientWidth="313" OnActivate="DialogPage1OnActivate">
    <TfrxGroupBoxControl Name="GroupBox1" Left="28" Top="16" Width="257" Height="41" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" ShowHint="True" Caption="Seitenformat" Color="-16777201">
      <TfrxRadioButtonControl Name="RadioButton1" Left="4" Top="16" Width="77" Height="17" ShowHint="True" Caption="Hochformat" Checked="True" Color="-16777201" OnClick="RadioButton1OnClick"/>
      <TfrxRadioButtonControl Name="RadioButton2" Left="156" Top="20" Width="81" Height="17" ShowHint="True" Caption="Querformat" TabStop="False" Color="-16777201" OnClick="RadioButton2OnClick"/>
    </TfrxGroupBoxControl>
    <TfrxButtonControl Name="Button1" Left="208" Top="325" Width="75" Height="25" ShowHint="True" Caption="weiter" OnEnter="Button1OnEnter"/>
    <TfrxGroupBoxControl Name="GroupBox2" Left="28" Top="79" Width="257" Height="53" ShowHint="True" Caption="Zeilenabstand in mm " Color="-16777201">
      <TfrxLabelControl Name="Label1" Left="8" Top="25" Width="29" Height="13" ShowHint="True" Caption="Höhe:" Color="-16777201"/>
      <TfrxComboBoxControl Name="ComboBox1" Left="44" Top="21" Width="65" Height="21" ShowHint="True" Color="-16777211" Items.Text="3&#13;&#10;4&#13;&#10;5&#13;&#10;6&#13;&#10;7&#13;&#10;8&#13;&#10;9&#13;&#10;10&#13;&#10;11&#13;&#10;12&#13;&#10;13&#13;&#10;14&#13;&#10;15" Text="8" ItemIndex="5"/>
    </TfrxGroupBoxControl>
    <TfrxGroupBoxControl Name="GroupBox3" Left="28" Top="223" Width="257" Height="77" ShowHint="True" Caption="Ausgabe" Color="-16777201">
      <TfrxCheckBoxControl Name="trdruck" Left="8" Top="20" Width="137" Height="17" Enabled="False" ShowHint="True" Caption="Geschlechter getrennen" Color="-16777201" OnClick="GrTrenOnClick"/>
      <TfrxCheckBoxControl Name="mKuerzel" Left="156" Top="20" Width="97" Height="17" ShowHint="True" Caption="mit Kürzel" Color="-16777201" OnClick="mKuerzelOnClick"/>
      <TfrxCheckBoxControl Name="aktDat" Left="8" Top="45" Width="121" Height="25" ShowHint="True" Caption="mit aktuellem Datum" Checked="True" State="cbChecked" Color="-16777201" OnClick="aktDatOnClick"/>
      <TfrxCheckBoxControl Name="GebDatdr" Left="156" Top="45" Width="97" Height="25" ShowHint="True" Caption="mit Geb-Datum" Color="-16777201" OnClick="GebDatOnClick"/>
    </TfrxGroupBoxControl>
    <TfrxGroupBoxControl Name="GroupBox4" Left="28" Top="147" Width="253" Height="57" ShowHint="True" Caption="Schriftgröße in pt" Color="-16777201">
      <TfrxLabelControl Name="Label3" Left="8" Top="28" Width="36" Height="13" ShowHint="True" Caption="Größe: " Color="-16777201"/>
      <TfrxComboBoxControl Name="Fontgr" Left="56" Top="24" Width="53" Height="21" ShowHint="True" Color="-16777211" Items.Text="5&#13;&#10;6&#13;&#10;7&#13;&#10;8&#13;&#10;9&#13;&#10;10&#13;&#10;11&#13;&#10;12&#13;&#10;13&#13;&#10;14" Text="10" ItemIndex="5"/>
    </TfrxGroupBoxControl>
  </TfrxDialogPage>
</TfrxReport>
