Eingabeaufforderungsfunktionen

Diese Funktionen geben beim Ablauf des EbsScripts ein Fenster auf dem Bildschirm auf, das den Anwender zu einer Aktion auffordert.

Name	Zweck	Argumente	Rückgabewert	Beispiel
inputBox	schaltet ein Eingabefenster auf, in dem der Anwender einen Wert eintragen kann	1: STRING: Text, der bei der Aufforderung erscheint 2: INTEGER, REAL, CHAR, STRING: Variable, auf die der eingegebene Wert übernommen wird	-	inputBox ("Bitte geben Sie die gewünschte Leistung ein", rQGen);
messageBox	schaltet ein Benachrichtigungsfenster auf, das der Anwender mit "OK" quittieren muss	1: STRING: Text, der als Nachricht erscheint 2: messageBoxTypeEnum siehe Definition in der Interface Unit System und https://docs.microsoft.com/en-us/windows/desktop/api/winuser/nf-winuser-messagebox	type messageBoxResultEnum = ( IDOK = 1, IDCANCEL = 2, IDABORT = 3, IDRETRY = 4, IDIGNORE = 5, IDYES = 6, IDNO = 7, IDCLOSE = 8, IDHELP = 9, IDTRYAGAIN = 10, IDCONTINUE = 11);	messageBox ("Grenzwert überschritten");
wizardBox	schaltet das vom "EbsAssistenten" verwendete Eingabefenster auf, mit dem 7 Parameter an eine Schaltung übergeben werden können.	1: STRING: Beschreibung für den 1. Parameter 2: REAL: 1. Parameter 3: STRING: Beschreibung für den 2. Parameter 4: REAL: 2. Parameter 5: STRING: Beschreibung für den 3. Parameter 6: REAL: 3. Parameter 7: STRING: Beschreibung für den 4. Parameter 8: REAL: 4. Parameter 9: STRING: Beschreibung für den 5. Parameter 10: REAL: 5. Parameter 11: STRING: Beschreibung für den 6. Parameter 12: REAL: 6. Parameter 13: STRING: Beschreibung für den 7. Parameter 14: REAL: 7. Parameter	BOOLEAN: true, wenn der Anwender "Beenden" geklickt hat false, wenn der Anwender "Abbrechen" geklickt hat	var r1,r2,r3,r4,r5,r6,r7:real; bOk:boolean; begin r1:=DSP.MEASM; r2:=T2.MEASM; r3:=P2.MEASM; r4:=T1.MEASM; r5:=P1.MEASM; r6:=1000* (PKOND.MEASM + PAMB.MEASM); r7:=T17.MEASM; bOk:=wizardBox ("Live steam mass flow [kg/s]", r1, "Live steam temperature [°C]", r2, "Live steam pressure [bar]", r3, "Intermediate heating temperature [°C]", r4, "Intermediate heating pressure [bar]", r5, "Condenser pressure [mbar]", r6, "Cooling water temperature [°C]", r7 ); if (bOk) then begin DSP.MEASM:=r1; T2.MEASM:=r2; P2.MEASM:=r3; T1.MEASM:=r4; P1.MEASM:=r5; PKOND.MEASM:= 0.001*r6 - PAMB.MEASM; T17.MEASM:=r7; simulate; end; end.
yesNoBox	schaltet ein Entscheidungsfenster auf, in dem der Anwender wahlweise auf "Ja" oder "Nein" klicken kann	1: STRING: Text, der bei der Aufforderung erscheint	BOOLEAN: true, wenn der Anwender "Ja" geklickt hat false, wenn der Anwender "Nein" geklickt hat	bContinue:= yesNoBox ("Soll die Rechnung fortgesetzt werden?");
yesNoCancelBox	Release 11: schaltet ein Entscheidungsfenster auf, in dem der Anwender wahlweise auf "Ja"/ "Nein"/ "Abbrechen" klicken kann	1: STRING: Text, der bei der Aufforderung erscheint	INTEGER: 1, if the user clicked on "Yes" 0, if the user clicked on "No" -1, if the user clicked on "Cancel"	bContinue:= yesNoCancelBox ("Should the calculation be continued?");

Impressum Disclaimer