===== CSerie.GetRennErgebnisseEinzel ===== AddOn-Befehl zum Einsatz bei einem Serienrennen. \\ ==== Syntax ==== ^ Befehl | CSerie.**GetRennErgebnisseEinzel**( Renntag:String; Durchgang,RennIndex:Integer; Gruppe,Team,Fahrer,Fahrzeug,Spur,Runden,Teilstrecke,Fahrzeit,SchnellsteRz, Punkte:String ) | ^ Funktion | Sofern vorhanden, stellt dieser Befehl die Ergebnisse aller bisher gefahrenen Einzelrennen des aktiven Durchgangs zur Verfügung | ^ Typ | Boolean | ^ ab | **//3.0.8 build 363//** | \\ ===== Codebeispiel ===== \\ Veranschaulicht die Verwendung der neuen AddOn-Befehle zum Abfragen von Daten aus dem Serienrennen für Einzelrennen und aufsummierte Ergebnisse. \\ const CRLF = Chr(13) + Chr(10); var i : Integer; msg : String; Renntag : String; Durchgang : Integer; RennIndex : Integer; RennNummer : String; Gruppe : String; Team : String; Fahrer : String; Fahrzeug : String; Spur : String; Runden : String; Teilstrecke : String; Fahrzeit : String; SchnellsteRz : String; Punkte : String; Res : Boolean; RennNr : Integer; begin // Variablen initialisieren Renntag := CSerie.AktuellerRenntag; Durchgang := CSerie.AktuellerDurchgang; RennIndex := 0; Res := True; msg := ''; // Es gibt Ergebnisse für Einzelrennen while (Res) do begin // Wenn Ergebnisse vorhanden, wird Res wahr Res := CSerie.GetRennErgebnisseEinzel(Renntag, Durchgang, RennIndex, RennNummer, Gruppe, Team, Fahrer, Fahrzeug, Spur, Runden, Teilstrecke, Fahrzeit, SchnellsteRz, Punkte); // Es gibt Einzelrennen mit Ergebnissen if Res then begin // noch kein Einzelrennen verfahren if RennNummer = '1' then begin // CSV Export - Einzelrennen Daten in Datei schreiben msg := msg + 'Renntag: ' + Renntag + ', Durchgang : ' + IntToStr(Durchgang) + ', Index: ' + IntToStr(RennIndex) + ', Rennen Nr: ' + RennNummer + CRLF + 'Gruppe: ' + Gruppe + ', Team: ' + Team + CRLF + 'Fahrer: ' + Fahrer + ', Fahrzeug: ' + Fahrzeug + CRLF + 'Spur: ' + Spur + ', Runden: ' + Runden + ', Teilstrecke: ' + Teilstrecke + ', Zeit: ' + Fahrzeit + CRLF + 'Schnellste Zeit: ' + SchnellsteRz + ', Punkte: ' + Punkte + CRLF + '------------' + CRLF; end; // END if - RennNummer // Nächstes Einzelrennen laden Inc(RennIndex); end // END if - Res = true else begin // Fehler aufgetreten ? if RennNummer = '-1' then begin // Fehlertext im Fahrer Cockpit.WriteLog := 'Fehler aufgetreten: ' + Fahrer; end; // END if - RennNummer -1 end; // END if - Res = false end; // END while - Res = true // Meldung anzeigen cpShowMessage(msg); end. \\ Immer wenn dieser Code ausgeführt wird und neue Einzelrennen gefahren wurden, wird die angezeigte Meldung umfangreicher. Die Meldung selbst sollte der Ansicht "RennErgebnisse anzeigen" im Serienrennen entsprechen. \\ \\ {{ :cockpit-xp:addon:befehlsreferenz:cserie-getrennergebnisseeinzel-sr-explorer.png?nolink&640 |}} {{ :cockpit-xp:addon:befehlsreferenz:cserie-getrennergebniseeinzel-addon-meldung-rennen-1.png?nolink |}} \\ === Hinweise === Seit der **Vorabversion 3.1.1 build 390** arbeiten die Befehle korrekt. Wer Wert darauf legt, sollte entsprechend seine Cockpit-XP Installation aktualisieren. Entsprechend befinden sich Fahrer- und Teamname in den richtigen Feldern und auch die Zeit steht jetzt nicht mehr unter Teilstrecke sondern im Feld Fahrzeit. Bitte vergesst nicht, euren AddOn-Code entsprechend auf Stand zu bringen. \\ ---- [[cockpit-xp:start|Start]] - [[cockpit-xp:faq|FAQ]] - [[cockpit-xp:glossar|Glossar]] - [[cockpit-xp:sitemap|Sitemap]] - [[cockpit-xp:impressum|Impressum]]