IntToStr kann auch int64-Variablen in Zeichenfolgen konvertieren. Dazu ist keine besondere Funktion erforderlich.

Sehr oft trifft man in AddOns in Cockpit-XP auf Packagevariablen, deren Namensteil aus einem Text und der Slot/SlotID zusammengesetzt ist. Das macht man üblicherweise, wenn man pro Slot/SlotID eine separate Variable anlegen will.

var
  Slot : Integer;
  Platz : Integer;
begin
  
  Slot := Cockpit.Slot;
  Cockpit.Slot := Slot;
  
  if Cockpit.Position = 3 then
  begin
    cpSetIntegerVar('Platzierung'+IntToStr(Cockpit.SlotID), Cockpit.Position);
    Platz := cpGetIntegerVar('Platzierung'+IntToStr(SlotID));
    cpSpeech(Cockpit.FahrerNameSprechen + ' liegt auf Rang ' + IntToStr(Platz) + '.');
  end;
  
end.

Dieser Code prüft für den Auslöser, ob er sich auf Position 3 befindet.
Trifft das zu, schreibt das AddOn diesen Wert als Ganzzahl (Integer) in eine Package-Variable.
Anschließend kommt dieses Ergebnis als Ansage aus den Lautsprechern.

Zum einen enthält der Name der Package-Variablen einen Bezug zur ID des auslösenden Fahrers/Fahrzeugs. So kann die Position gezielt für diesen Teilnehmer gespeichert werden. Da der Variablenname eine Zeichenfolge ist, konvertiert man mit IntToStr() die Ganzzahl in einen Text und kann dann den Namen der Package-Variable zusammensetzen.

Zum anderen nimmt die Sprachausgabe nur Zeichenfolgen entgegen. Deshalb muss der Zahlenwert der Package-Variable vorher in einen Text umgewandelt werden. Dies geschieht erneut mit IntToStr().

Es soll nicht verschwiegen werden, dass bei dem intensiven Gebrauch von Package-Variablen, sehr lange Codezeilen entstehen können.

Start - FAQ - Glossar - Sitemap - Impressum