cpStatusSubScreen

Einleitung


Jeder eingeblendete Subscreen wird mittels seines Handle repräsentiert.

Entsprechend lässt sich mit diesem Befehl abfragen, ob der Subscreen gerade aktiv (angezeigt) oder inaktiv (ausgeblendet) ist.

Syntax

Befehl cpStatusSubScreen(handle:Integer)
Funktion Gibt des Status eines Subscreens aus. 1 = aktiv, 0 = inaktiv
Typ Integer


Codebeispiel

var
  slot : Integer;
  msg : String;
  handle : Integer;
  nrMonitor : Integer;
  sNameSubScr : String;
  statusSubScr : Integer;
  
begin

  // Variablen initialisieren
  msg := '';
  nrMonitor := 1;
  sNameSubScr := 'Boxenstrafe.xml';
  
  // Monitor für Ausgabe einstellen. Hauptmonitor = 0
  cpSetMonitor(nrMonitor);
  
  // Subscreen anzeigen. Links 10 px, oben 10 px Abstand zum RBS 
  handle := cpShowSubScreen(10, 10, sNameSubScr); 
 
  // Status des SubScreens zeigen (1 = aktiv) 
  statusSubScr := cpStatusSubScreen(handle);
  
  // Meldung zusammenstellen
  msg := msg + 'Subscreen ' + sNameSubScr;
  msg := msg + ' auf Monitor (' + IntToStr(nrMonitor) + ') anzeigen';
  msg := msg + Chr(13) + Chr(10);
  msg := msg + 'Handle: ' + FormatFloat('#,##0', handle);
  msg := msg + Chr(13) + Chr(10);
  msg := msg + 'Status Subscreen: ' + FormatFloat('#,##0', statusSubScr);
  msg := msg + Chr(13) + Chr(10);
  
  // Subscreen schließen
  cpCloseSubScreen(handle);
  
  // Meldung anzeigen
  cpShowMessage(msg);

end.


Dieser Code enthält diverse Befehle aus dem cpScreen-Bereich und zeigt, dass der Subscreen mit dem angezeigten Handle derzeit aktiv = eingeblendet ist.


Start - FAQ - Glossar - Sitemap - Impressum

 
cockpit-xp/addon/befehlsreferenz/cpstatussubscreen.txt · Zuletzt geändert: 2020/11/28 12:15 (Externe Bearbeitung)