Inhaltsverzeichnis
Event ChangeScreen
Einleitung
Dieses Ereignis wird ausgelöst, wenn nach einer Session ein anderer Rennbildschirm erscheint. Also nach einem Training mit eigenem Rennbildschirm startet man ein Rennen und verwendet dazu eine andere Anzeige.
Syntax
| Parameter | Beschreibung |
|---|---|
| 0 | … |
| 1 | Rückgabewert, wenn man das Race Control Center (RC-Center) aufgerufen hat und das Dialogfenster wieder schließt. |
| 2 | Rückgabewert, wenn der Wechsel-Button gedrückt und eine Änderung der Fahrer / Fahrzeuge per Klick auf die Schaltfläche Übernehmen übernommen wird, die durch den vorherigen Klick auf den Wechsel-Button ausgelöst wurde. |
Die Parameter sind ab Cockpit-XP Version 3.4 build 504 verfügbar
Codebeispiel 1
{ Pascal Script Engine }
{ Event: ChangeScreen }
{ Parameter: keine }
var
slot : Integer;
begin
// Bildschirmvariable TankInhalt für jeden Slot auf 100% setzen
for slot := 1 to cpCountOfSlots do
begin
cpSetRBSIntegerVar('TankInhalt', slot, 100);
end;
end.
Codebeispiel 2
{ Pascal Script Engine }
{ Event: ChangeScreen }
{ Parameter: keine }
begin
case Cockpit.Parameter of
1 : cpShowMessage('Event ChangeScreen, Parameter = ' +
IntToStr(Cockpit.Parameter) + #13 + #10 +
'Schließen des RC-Centers');
2 : cpShowMessage('Event ChangeScreen, Parameter = ' +
IntToStr(Cockpit.Parameter) + #13 + #10 +
'Übernahme nach Wechsel-Button');
else
cpShowMessage('Event ChangeScreen ausgelöst. Parameter ist : ' +
IntToStr(Cockpit.Parameter) + #13 + #10 +
'Irgendwas halt!');
end;
end.
Hinweise
Wichtig ist nur zu wissen, dass dieses Event IMMER bei Wechsel eines Rennbildschirms ausgelöst wird. Es funktioniert also auch anders herum, z.B. wenn nach einem Rennen wieder ein Training gestartet wird.
Das Event wird auch bereits direkt nach Start, also beim 1.ten Öffnen vom Trainings-RBS ausgeführt.