MINERVA-Thiel: Veraltetes -Tag durch ersetzt (gleiche Darstellung) [Volltext ersetzt]

2026-09-28T19:46:26Z

Veraltetes <source>-Tag durch <syntaxhighlight> ersetzt (gleiche Darstellung) [Volltext ersetzt]

← Nächstältere Version		Version vom 28. September 2026, 20:46 Uhr
Zeile 20:		Zeile 20:
	Variablen des Typs ''double'' enthalten Dezimalzahlen. Hier ist zu beachten, dass das Trennzeichen bei der Angabe von Dezimalstellen immer ein Punkt ist.<br />		Variablen des Typs ''double'' enthalten Dezimalzahlen. Hier ist zu beachten, dass das Trennzeichen bei der Angabe von Dezimalstellen immer ein Punkt ist.<br />
	Beispiel:		Beispiel:
	<~~source~~ lang=delphi>		<syntaxhighlight lang=delphi>
	Preis := 10.95;		Preis := 10.95;
	</~~source~~>		</syntaxhighlight>

	==boolean==		==boolean==
Zeile 29:		Zeile 29:
	<br />		<br />
	Vorbelegung:		Vorbelegung:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	lVerglichen = false;		lVerglichen = false;
	lA_ist_kleiner_B = false;		lA_ist_kleiner_B = false;
	</~~source~~><br />		</syntaxhighlight><br />

	Abfrage:		Abfrage:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	if (not lVerglichen) then begin		if (not lVerglichen) then begin
	lA_ist_kleiner_B := A < B;		lA_ist_kleiner_B := A < B;
	lVerglichen := true;		lVerglichen := true;
	end;		end;
	</~~source~~>		</syntaxhighlight>

	{{Achtung\|Boolshe Variablen, welche von OBS an den Scripter über die Parameter als variante übergeben werden, werden als Zahlen interpretiert!<br/>		{{Achtung\|Boolshe Variablen, welche von OBS an den Scripter über die Parameter als variante übergeben werden, werden als Zahlen interpretiert!<br/>
	Dies führt dazu, dass diese boolsche Variablen nicht mit einem "not" negiert werden können.<br/>		Dies führt dazu, dass diese boolsche Variablen nicht mit einem "not" negiert werden können.<br/>
	<~~source~~ lang=delphi>		<syntaxhighlight lang=delphi>
	if (not lVariable) then begin //Falsch		if (not lVariable) then begin //Falsch

	if (lVariable = False) then begin //Richtig		if (lVariable = False) then begin //Richtig
	</~~source~~>}}		</syntaxhighlight>}}

	=Konstanten=		=Konstanten=
Zeile 55:		Zeile 55:
	In Makros lassen sich eigene Konstanten definieren. Das kann wie folgt aussehen:		In Makros lassen sich eigene Konstanten definieren. Das kann wie folgt aussehen:

	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	const		const
	GRUSS = 'Mit freundlichen Grüßen';		GRUSS = 'Mit freundlichen Grüßen';
Zeile 61:		Zeile 61:
	'Sie mehr über die ergonomische Einrichtung von Arbeitsplätzen. Für aktuelle Informationen '+		'Sie mehr über die ergonomische Einrichtung von Arbeitsplätzen. Für aktuelle Informationen '+
	'oder Aktionen könne Sie sich auf unserer Homepage für den Newsletter eintragen.';		'oder Aktionen könne Sie sich auf unserer Homepage für den Newsletter eintragen.';
	</~~source~~ >		</syntaxhighlight>

	Eine Übersicht der Konstanten die vom OBS für Makros mitgeliefert werden finden Sie [[OBS/Makros#.C3.9Cbersicht_Konstanten\|hier]].		Eine Übersicht der Konstanten die vom OBS für Makros mitgeliefert werden finden Sie [[OBS/Makros#.C3.9Cbersicht_Konstanten\|hier]].
Zeile 69:		Zeile 69:
	<br />		<br />
	Beispiel Prozedur:		Beispiel Prozedur:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	procedure Name(cParameter1: string; nParameter2: integer);		procedure Name(cParameter1: string; nParameter2: integer);
	</~~source~~>		</syntaxhighlight>

	Beispiel Funktion:		Beispiel Funktion:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	function Name(cParameter1: string; nParameter2: integer): boolean;		function Name(cParameter1: string; nParameter2: integer): boolean;
	</~~source~~>		</syntaxhighlight>

	=Bedingte Anweisungen=		=Bedingte Anweisungen=
Zeile 82:		Zeile 82:

	==if==		==if==
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	if (Bedingung) then begin		if (Bedingung) then begin
	Befehl1;		Befehl1;
Zeile 88:		Zeile 88:
	//...		//...
	end;		end;
	</~~source~~>		</syntaxhighlight>

	Es ist auch möglich mehrere Bedingungen zu definieren. Dabei lässt sich bestimmen, ob nur eine, alle oder ein Teil der Bedingung zutreffen muss, um den Teil des Makros auszuführen. Das kann hilfreich sein, wenn in mehreren Fällen das gleiche passieren soll.<br />		Es ist auch möglich mehrere Bedingungen zu definieren. Dabei lässt sich bestimmen, ob nur eine, alle oder ein Teil der Bedingung zutreffen muss, um den Teil des Makros auszuführen. Das kann hilfreich sein, wenn in mehreren Fällen das gleiche passieren soll.<br />
	Alle Bedingungen sollen zutreffen:		Alle Bedingungen sollen zutreffen:

	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	if (Bedingung1 and Bedingung2) then begin		if (Bedingung1 and Bedingung2) then begin
	//code		//code
	end;		end;
	</~~source~~>		</syntaxhighlight>

	Nur eine Bedingung muss zutreffen:		Nur eine Bedingung muss zutreffen:

	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	if (Bedingung1 or Bedingung2) then begin		if (Bedingung1 or Bedingung2) then begin
	//code		//code
	end;		end;
	</~~source~~>		</syntaxhighlight>

	Nur Bedingung 1 oder Bedingung 2 und 3 (hier sind die Klammern wichtig!):		Nur Bedingung 1 oder Bedingung 2 und 3 (hier sind die Klammern wichtig!):

	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	if (Bedingung1 or (Bedingung2 and Bedingung 3)) then begin		if (Bedingung1 or (Bedingung2 and Bedingung 3)) then begin
	//code		//code
	end;		end;
	</~~source~~>		</syntaxhighlight>
	==case==		==case==
	Die ''case''-Anweisung prüft den Wert einer Variablen ab und und führt dann den - sofern vorhanden - dazu passenden Fall aus. Dies funktioniert jedoch nur mit einem ordinalen Typ (z. B. Ganzzahl oder einzelnes Zeichen).<br />		Die ''case''-Anweisung prüft den Wert einer Variablen ab und und führt dann den - sofern vorhanden - dazu passenden Fall aus. Dies funktioniert jedoch nur mit einem ordinalen Typ (z. B. Ganzzahl oder einzelnes Zeichen).<br />
	Struktur:		Struktur:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	case Wert of		case Wert of
	Fall1 : Anweisung;		Fall1 : Anweisung;
Zeile 128:		Zeile 128:
	Standard-Anweisung		Standard-Anweisung
	end;		end;
	</~~source~~>		</syntaxhighlight>

	Es können als Bedingung (Fall) auch mehrere Angaben mit Komma getrennt erfolgen oder Bereiche mit zwei Punkten angegeben werden.<br />		Es können als Bedingung (Fall) auch mehrere Angaben mit Komma getrennt erfolgen oder Bereiche mit zwei Punkten angegeben werden.<br />
	Beispiel:		Beispiel:
	<~~source~~ lang="Delphi">		<syntaxhighlight lang="Delphi">
	case nMonat of		case nMonat of
	1,3,5,7..8,10,12 : nTage := 31;		1,3,5,7..8,10,12 : nTage := 31;
Zeile 145:		Zeile 145:
	nTage := 30;		nTage := 30;
	end;		end;
	</~~source~~>		</syntaxhighlight>

	=Schleifen=		=Schleifen=

Rademacker am 4. Mai 2020 um 08:52 Uhr

2020-05-04T08:52:37Z

← Nächstältere Version		Version vom 4. Mai 2020, 09:52 Uhr
Zeile 6:		Zeile 6:
	==string==		==string==
	Variablen des Typs ''string'' enthalten Zeichenketten (Text) wie z. B. 'Max Mustermann' oder 'Musterweg 1a'.		Variablen des Typs ''string'' enthalten Zeichenketten (Text) wie z. B. 'Max Mustermann' oder 'Musterweg 1a'.

			==char==
			Varablen des Typs ''char'' enthalten ein einzelnes Zeichen (Text) wie z.B. 'A', 'z' oder '1'.
			{{Achtung\|Soll ein ''char'' als ''leer'' übergeben werden muss stattdessen ''#0'' benutzt werden:
			Methode('1');
			Methode(#0);
			}}

	==integer==		==integer==
Zeile 42:		Zeile 49:
	if (lVariable = False) then begin //Richtig		if (lVariable = False) then begin //Richtig
	</source>}}		</source>}}


	=Konstanten=		=Konstanten=

Jungmann: /* case */

2019-12-19T12:24:27Z

case

← Nächstältere Version		Version vom 19. Dezember 2019, 13:24 Uhr
Zeile 127:		Zeile 127:
	Beispiel:		Beispiel:
	<source lang="Delphi">		<source lang="Delphi">
	case ~~Monat~~ of		case nMonat of
	1,3,5,7..8,10,12 : ~~Tage~~ := 31;		1,3,5,7..8,10,12 : nTage := 31;
	2 : begin		2 : begin
	if IstSchaltjahr then begin		if IstSchaltjahr then begin
	~~Tage~~ := 29;		nTage := 29;
	end else begin		end else begin
	~~Tage~~ := 28;		nTage := 28;
	end;		end;
	end;		end;
	else		else
	~~Tage~~ := 30;		nTage := 30;
	end;		end;
	</source>		</source>

Jungmann: Achtung zu boolsche Variablen welche von OBS in den Scripter über Parameter als variant übergeben werden eingefügt

2019-12-19T12:23:05Z

Achtung zu boolsche Variablen welche von OBS in den Scripter über Parameter als variant übergeben werden eingefügt

Änderungen zeigen

Nimz am 8. April 2019 um 15:31 Uhr

2019-04-08T15:31:51Z

← Nächstältere Version		Version vom 8. April 2019, 16:31 Uhr
Zeile 1:		Zeile 1:
			{{Makros und Scripting}}
	Die Makros im OBS orientieren sich an der Syntax der Sprache [https://de.wikipedia.org/wiki/Pascal_%28Programmiersprache%29 Pascal].		Die Makros im OBS orientieren sich an der Syntax der Sprache [https://de.wikipedia.org/wiki/Pascal_%28Programmiersprache%29 Pascal].
	=Variablen-Typen=		=Variablen-Typen=

Nimz: Die Seite wurde neu angelegt: „Die Makros im OBS orientieren sich an der Syntax der Sprache [https://de.wikipedia.org/wiki/Pascal_%28Programmiersprache%29 Pascal]. =Variablen-Typen= ==string…“

2019-04-08T15:21:47Z

Die Seite wurde neu angelegt: „Die Makros im OBS orientieren sich an der Syntax der Sprache [https://de.wikipedia.org/wiki/Pascal_%28Programmiersprache%29 Pascal]. =Variablen-Typen= ==string…“

Änderungen zeigen

Böhrer: Die Seite wurde neu angelegt: „I'm Tammara and I live in Kropfling.
I'm interested in Arts, Baton twirling and Dutch art. I like travelling and reading fantasy.

Look at my site ho…“

2017-05-24T11:56:59Z

Die Seite wurde neu angelegt: „I'm Tammara and I live in Kropfling. I'm interested in Arts, Baton twirling and Dutch art. I like travelling and reading fantasy. Look at my site ho…“

Neue Seite

I'm Tammara and I live in Kropfling. I'm interested in Arts, Baton twirling and Dutch art. I like travelling and reading fantasy. Look at my site hot oil natural hair [[http://glengranttasting.com/ActivityFeed/MyProfile/tabid/61/UserId/37366/language/en-US/Default.aspx http://glengranttasting.com/]]

OBS/Makros und Scripting/Allgemeines/Syntax - Versionsgeschichte