===== CSerie.AktuellerDurchgang =====

Liefert die Nummer des aktuellen Durchgangs an dem gewählten Renntag. \\
 
==== Syntax ====

^ Befehl | CSerie.AktuellerDurchgang |
^ Funktion | Liefert die Nummer des aktuellen Durchgangs an dem aktuell eingestellten Renntag |
^ Typ | Integer |
^ ab  | **//3.0.0 build 301//**  |


\\

===== Codebeispiel =====
\\
 Gibt beim Start einer Session in einem Serienrennen diverse Informationen zur Anzahl der Rennen, der Nummer des aktuellen Rennens, etc. als Meldung aus. \\

<Code:pascal linenums:1>var
  message : String;
  laufAktuell : Integer;
  anzahlRennen : Integer;
  anzahlGefahren : Integer;
  anzahlOffen : Integer;
  anzahlFahrer : Integer;
  aktuellerDurchgang : Integer;
  aktuellerRenntag : String;

begin

  // Session ist gestartet worden
  if Cockpit.Parameter = 0 then
  begin
  
    // Nummer des aktuellen Einzelrennens anzeigen
    laufAktuell := CSerie.AktuellesRennen;
    message := message + 'Momentan läuft Rennen ' + IntToStr(laufAktuell) + '.';
    message := message + Chr(13) + Chr(10); 
    
    // Anzahl der Einzelrennen im Durchgang
    anzahlRennen := CSerie.AnzahlRennen;
    message := message + 'Anzahl Rennen:  ' + IntToStr(anzahlRennen);
    message := message + Chr(13) + Chr(10); 
    
    // Wie viele Einzelrennen sind gefahren?
    anzahlGefahren := CSerie.AnzahlRennenGefahren;
    message := message + 'Rennen gefahren: ' + IntToStr(anzahlGefahren);
    message := message + Chr(13) + Chr(10);
    
    // Sind noch Läufe zu absolvieren offen?
    anzahlOffen := anzahlRennen - anzahlGefahren;
    
    // Meldung abhängig von der Anzahl offener Einzelrennen
    if anzahlOffen = 0 then
      message := message + 'Noch zu fahren: ' + IntToStr(anzahlOffen)
    else
      message := message + 'Alle Einzelrennen gefahren.';

    // Absatz einfügen
    message := message + Chr(13) + Chr(10);

    // Wie viele Fahrer gibt es in diesem Durchgang?
    anzahlFahrer := CSerie.AnzahlFahrer;
    message := message + 'Anzahl Fahrer: ' + IntToStr(anzahlFahrer);
    message := message + Chr(13) + Chr(10);
    
    // Wie lautet die Nummer des aktuellen Durchgangs?
    aktuellerDurchgang := CSerie.AktuellerDurchgang;
    message := message + 'Durchgang Nr.: ' + IntToStr(aktuellerDurchgang);
    message := message + Chr(13) + Chr(10);
    
    // Datum des Renntags?
    aktuellerRenntag := CSerie.AktuellerRenntag;
    message := message + 'Renntag: ' + aktuellerRenntag;
    message := message + Chr(13) + Chr(10);

    // Meldung anzeigen
    cpShowMessage(message);

  end;
    
end.</Code> 
\\

 Dieses Beispiel zeigt die folgende Meldung an, wenn in einem Serienrennen eine Session gestartet wird. Wichtig: Die Meldung, dass alle Rennen gefahren sind, wird nie angezeigt. Der Fall tritt so nie ein und dient nur der Veranschaulichung der Möglichkeiten. \\

{{ :cockpit-xp:addon:befehlsreferenz:cserie-variablen-zum-serienrennen-2.png?nolink |}}

\\
 Hier noch das zugehörige Bild aus dem Serienrennenexplorer \\

{{ :cockpit-xp:addon:befehlsreferenz:cserie-serienrennen-zur-variablenanzeige.png?nolink&640 |}}

\\ 

----


[[cockpit-xp:start|Start]] - [[cockpit-xp:faq|FAQ]] - [[cockpit-xp:glossar|Glossar]] - [[cockpit-xp:sitemap|Sitemap]] - [[cockpit-xp:impressum|Impressum]]