−Inhaltsverzeichnis

Cockpit.Slot

Einleitung


Cockpit.Slot (Slot = Steckplatz) ist das zentrale Objekt in der AddOn-Programmierung.

Unter Steckplatz versteht Cockpit eine Zeile aus der Fahrer-/Fahrzeugliste im StartCenter. Die Reihenfogle ist fortlaufend und beginnt in der obersten Zeile mit dem Wert 1.

Die in der Zeile stehenden Informationen sind Unterelemente von Cockpit.Slot. Verdeutlich man sich diesen Umstand, wird auch klar, warum in vielen AddOn-Codezeilen dieses im Beispiel zu sehende Konstrukt zu finden ist.

Ohne die Abfrage von Cockpit.Slot und dem Einstellen als aktives Objekt, mit dem weitere Bearbeitung erfolgt, gibt es keinen Zugriff auf Cockpit.FahrerName, Cockpit.SlotID, etc.

Gerade in den Anfangszeiten, als die AddOn-Implementierung noch sehr frisch war, funktionierten viele AddOns nur, wenn die Regler-ID = Cockpit.Slot war. Erst als dieser Zusammenhang deutlich wurde, wurden die AddOns so umgeschrieben, dass sie auch mit ungleichen Paaren von Cockpit.Slot und Cockpit.SlotID funktionierten.

Syntax

Befehl Cockpit.Slot
Funktion Stellt den Zahlenwert für den Slot bereit, der ein Ereignis ausgelöst hat.
Typ Integer


Codebeispiel

  1. var
  2.   slot : Integer;
  3.   msg : String;
  4.   sFahrer : String;
  5.   sFahrzeug : String;
  6.   id : Integer;
  7.   tankstand : Extended;
  8.   
  9. begin
  10.  
  11.   // Variable initialisieren
  12.   msg := '';
  13.   
  14.   // Auslösenden Slot in Variable speichern
  15.   slot := Cockpit.Slot;
  16.   
  17.   // Jetzt diesen Slot für weitere Befehle einstellen
  18.   Cockpit.Slot := slot;
  19.   
  20.   // den Fahrernamen speichern
  21.   sFahrer := Cockpit.FahrerName;
  22.   
  23.   // Den Namen des Fahrzeugs speichern
  24.   sFahrzeug := Cockpit.FahrzeugName;
  25.   
  26.   // Spur (analog) oder Regler-ID (digital) speichern
  27.   id := Cockpit.SlotID;
  28.   
  29.   // Tankinhalt speichern
  30.   tankstand := Cockpit.TankStand; 
  31.  
  32.   // Meldung zusammenstellen
  33.   msg := msg + 'Slot (Zeile): ' + IntToStr(slot);
  34.   msg := msg + Chr(13) + Chr(10);
  35.   msg := msg + 'Fahrername: ' + sFahrer;
  36.   msg := msg + Chr(13) + Chr(10);
  37.   msg := msg + 'Fahrzeugname: ' + sFahrzeug;
  38.   msg := msg + Chr(13) + Chr(10);
  39.   msg := msg + 'Spur/Regler-ID: ' + IntToStr(id);
  40.   msg := msg + Chr(13) + Chr(10);
  41.   msg := msg + 'Tankinhalt: ' + FormatFloat('##0.0', tankstand) + '%';
  42.   msg := msg + Chr(13) + Chr(10);
  43.   
  44.   // Meldung anzeigen
  45.   cpShowMessage(msg);
  46.  
  47. end.


Dieser Code zeigt die folgende Meldung und enthält Unterelemente von Cockpit.Slot. Es gibt noch weitere, die allerdings nicht im StartCenter zu finden sind.

Im Bild sind Slotnummer und Regler-ID unterschiedlich konfiguriert.

Und hier ein Bild aus dem StartCenter passend zu dem oben gezeigten Ergebnis.


Start - FAQ - Glossar - Sitemap - Impressum