OBS/System/OBS Anleitung Customize Edit - Versionsgeschichte

Nimz: Weiterleitung nach OBS/Makros und Scripting/Anwendungsbereiche/Customize erstellt

2019-04-09T11:48:57Z

Weiterleitung nach OBS/Makros und Scripting/Anwendungsbereiche/Customize erstellt

Mueller: /* Listen Formulare */

2016-09-07T11:29:24Z

Listen Formulare

← Nächstältere Version		Version vom 7. September 2016, 12:29 Uhr
Zeile 177:		Zeile 177:
	end;		end;

	Wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt. Damit kann der natürliche Ablauf des Programmes ~~veränder~~ werden. Dies kann schwere Programmfehler verursachen!		Wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt. Damit kann der natürliche Ablauf des Programmes verändert werden. Dies kann schwere Programmfehler verursachen!

Mueller: /* Globale Variable FrmEdit */

2016-08-22T08:22:52Z

Globale Variable FrmEdit

← Nächstältere Version		Version vom 22. August 2016, 09:22 Uhr
Zeile 64:		Zeile 64:

	==Globale Variable FrmEdit==		==Globale Variable FrmEdit==
	Über die Variable FrmEdit kann auf alle Felder und auf die Property des Edit Objekt zugegriffen werden. Folgende Property's stehen zu Verfügung		Über die Variable FrmEdit kann auf alle Felder und auf die Property des Edit Objekt zugegriffen werden. Folgende Property's stehen zu Verfügung:

	{\| class="wikitable"		{\| class="wikitable"

Mueller: /* OBS Anleitung Customize Edit */

2016-08-22T08:19:46Z

OBS Anleitung Customize Edit

← Nächstältere Version		Version vom 22. August 2016, 09:19 Uhr
Zeile 22:		Zeile 22:

	Name des Edit's ist der jeweilige Klassenname.<br />		Name des Edit's ist der jeweilige Klassenname.<br />
	Das Makro ~~Gilt Standardmäßig~~ für alle User (XXX); es kann aber auch ein spezifischer Benutzer angegeben werden. Folgende Aufrufe sind möglich:<br />		Das Makro gilt standardmäßig für alle User (XXX); es kann aber auch ein spezifischer Benutzer angegeben werden. Folgende Aufrufe sind möglich:<br />
	==Edit Formulare==		==Edit Formulare==
	InitScripter wird nach dem Create des Fensters aufgerufen		InitScripter wird nach dem Create des Fensters aufgerufen

Böhrer am 12. November 2012 um 08:57 Uhr

2012-11-12T08:57:21Z

← Nächstältere Version		Version vom 12. November 2012, 09:57 Uhr
Zeile 177:		Zeile 177:
	end;		end;

	Wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt. Damit kann der natürliche Ablauf des Programmes veränder werden. Dies kann schwere ~~Prgrammfehler~~ verursachen!		Wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt. Damit kann der natürliche Ablauf des Programmes veränder werden. Dies kann schwere Programmfehler verursachen!

Böhrer am 18. April 2012 um 08:01 Uhr

2012-04-18T08:01:45Z

← Nächstältere Version		Version vom 18. April 2012, 09:01 Uhr
Zeile 164:		Zeile 164:
	*OnESC		*OnESC

	'''Beispiel:'''~~<br /><div><font face="courier new">~~var oListe : TxFrmListe;~~<div><font face="courier new"><br /><div><font face="courier new">~~procedure InitScripter(oFrm:Tobject);~~<div><font face="courier new">~~var cTable : String;~~<div><font face="courier new">~~begin~~<div><font face="courier new">~~ oListe := oFrm;~~<div><font face="courier new">~~ cTable := oListe.Name;~~<div><font face="courier new">~~ Meldung(cTable);~~<div><font face="courier new">~~ Meldung(oListe.Query.sql.text);~~<div><font face="courier new">~~ Meldung(oListe.Query.A2C('sys_uid'));~~<div><font face="courier new">~~ Meldung(oListe.cTable);~~<div><font face="courier new">~~end;~~<br />wird~~ bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt.Damit kann der natürliche Ablauf des Programmes veränder werden.Dies kann schwere Prgrammfehler verursachen!~~<br /><br /><br /><div><font size="3" face="courier new"><br /><div><font size="3" face="courier new"><br />[[Category:html]]~~		'''Beispiel:'''
	~~----~~		var oListe : TxFrmListe;
	~~[[Benutzer:Auto import\|Auto import]] 15:21, 25. Aug. 2011 (CEST)~~		procedure InitScripter(oFrm:Tobject);
			var cTable : String;
			begin
			oListe := oFrm;
			cTable := oListe.Name;
			Meldung(cTable);
			Meldung(oListe.Query.sql.text);
			Meldung(oListe.Query.A2C('sys_uid'));
			Meldung(oListe.cTable);
			end;

			Wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt. Damit kann der natürliche Ablauf des Programmes veränder werden. Dies kann schwere Prgrammfehler verursachen!

Böhrer am 17. April 2012 um 14:30 Uhr

2012-04-17T14:30:51Z

@@ Zeile 121: / Zeile 121: @@
      FrmEdit.lCheckOk := False;
      Meldung('Bitte Vorname eingtragen');
   end;
@@ Zeile 127: / Zeile 126: @@
 ==Listen Formulare==
-Folgende Funktionen stehen zur Verfügung:<br />InitScripterOnListNewOnResizeOnRefresh<br />Before_Close<br />Before_OnF1Before_OnF2Before_OnF3Before_OnF4Before_OnF5Before_OnF6Before_OnF7Before_OnF8Before_OnF9Before_OnF10Before_OnReturnBefore_OnInsertBefore_OnDeleteBefore_OnESC<br />OnF1OnF2OnF3OnF4OnF5OnF6OnF7OnF8OnF9OnF10OnReturnOnInsertOnDeleteOnESC<br />'''Beispiel:'''<br /><div><font face="courier new">var oListe : TxFrmListe;<div><font face="courier new"><br /><div><font face="courier new">procedure InitScripter(oFrm:Tobject);<div><font face="courier new">var cTable : String;<div><font face="courier new">begin<div><font face="courier new">    oListe := oFrm;<div><font face="courier new">    cTable := oListe.Name;<div><font face="courier new">    Meldung(cTable);<div><font face="courier new">    Meldung(oListe.Query.sql.text);<div><font face="courier new">    Meldung(oListe.Query.A2C('sys_uid'));<div><font face="courier new">    Meldung(oListe.cTable);<div><font face="courier new">end;<br />wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt.Damit kann der natürliche Ablauf des Programmes veränder werden.Dies kann schwere Prgrammfehler verursachen!<br /><br /><br /><div><font size="3" face="courier new"><br /><div><font size="3" face="courier new"><br />[[Category:html]]
+Folgende Funktionen stehen zur Verfügung:
 ----
 [[Benutzer:Auto import|Auto import]] 15:21, 25. Aug. 2011 (CEST)

Böhrer am 17. April 2012 um 14:27 Uhr

2012-04-17T14:27:30Z

@@ Zeile 95: / Zeile 95: @@
   FrmEdit.xSet('a_vorname',"Meier");
-=<font size="2" color="#000000" face="Arial"><font size="3">'''Mögliche Zugriffe auf Komponenten und Werte des Edits'''</font></font>=
+==Mögliche Zugriffe auf Komponenten und Werte des Edits==
-<br /><div><font face="courier new">procedure InitScripter(ofrm:Tobject);<div><font face="courier new">var oSte : TEdit;<div><font face="courier new">begin<div><font face="courier new">   oSte := FrmEdit.FindComponent('stred_db_a_vzusatz');<div><font face="courier new">   Meldung(FrmEdit.stred_db_a_vzusatz.Text);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new"><br /><div><font face="courier new"><br /><div><font face="courier new">function OnEdCheck():string;<div><font face="courier new">var oSte     : TEdit;<div><font face="courier new">    cEdit    : String;<div><font face="courier new">    cVorname : String;<div><font face="courier new">begin<div><font face="courier new"><br /><div><font face="courier new">   if (FrmEdit.lEditMode) then begin<div><font face="courier new">      Meldung('Edit Mode True');<div><font face="courier new">   end else begin<div><font face="courier new">      Meldung('Edit Mode False');<div><font face="courier new">   end;<div><font face="courier new"><br /><div><font face="courier new">   Meldung(FrmEdit.stred_db_a_name.Text);<div><font face="courier new"><br /><div><font face="courier new">   oSte := FrmEdit.FindComponent('stred_db_a_name');<div><font face="courier new">   Meldung(oSte.Text);<div><font face="courier new"><br /><div><font face="courier new">   cVorname:= FrmEdit.xGet('a_vorname');<div><font face="courier new">   Meldung(cVorname);<div><font face="courier new"><br /><div><font face="courier new">   if (Empty(cVorname)) then begin<div><font face="courier new">       FrmEdit.lCheckOk := False;<div><font face="courier new">       Meldung('Bitte Vorname eingtragen');<div><font face="courier new">   end;<div><font face="courier new"><br /><div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">Wenn möglich immer mit </font><font face="courier new">'''xGet'''</font><font face="courier new"> und </font><font face="courier new">'''xSet'''</font><font face="courier new"> auf Komponenten Werte zugreifen.<div><font size="3" face="courier new"><br /><br /><div><font size="5">'''<u>Listen Formulare</u>'''<br />folgende Funktionen stehen zur Verfügung:<br />InitScripterOnListNewOnResizeOnRefresh<br />Before_Close<br />Before_OnF1Before_OnF2Before_OnF3Before_OnF4Before_OnF5Before_OnF6Before_OnF7Before_OnF8Before_OnF9Before_OnF10Before_OnReturnBefore_OnInsertBefore_OnDeleteBefore_OnESC<br />OnF1OnF2OnF3OnF4OnF5OnF6OnF7OnF8OnF9OnF10OnReturnOnInsertOnDeleteOnESC<br />'''Beispiel:'''<br /><div><font face="courier new">var oListe : TxFrmListe;<div><font face="courier new"><br /><div><font face="courier new">procedure InitScripter(oFrm:Tobject);<div><font face="courier new">var cTable : String;<div><font face="courier new">begin<div><font face="courier new">    oListe := oFrm;<div><font face="courier new">    cTable := oListe.Name;<div><font face="courier new">    Meldung(cTable);<div><font face="courier new">    Meldung(oListe.Query.sql.text);<div><font face="courier new">    Meldung(oListe.Query.A2C('sys_uid'));<div><font face="courier new">    Meldung(oListe.cTable);<div><font face="courier new">end;<br />wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt.Damit kann der natürliche Ablauf des Programmes veränder werden.Dies kann schwere Prgrammfehler verursachen!<br /><br /><br /><div><font size="3" face="courier new"><br /><div><font size="3" face="courier new"><br />[[Category:html]]
+ procedure InitScripter(ofrm:Tobject);
 ----
 [[Benutzer:Auto import|Auto import]] 15:21, 25. Aug. 2011 (CEST)

Böhrer am 17. April 2012 um 14:15 Uhr

2012-04-17T14:15:34Z

@@ Zeile 22: / Zeile 22: @@
 Name des Edit's ist der jeweilige Klassenname.<br />
-Das Makro Gilt Standardmäßig für alle User (XXX); es kann aber auch ein spezifischer Benutzer angegeben werden. Folgende Aufrufe sind möglich:
+Das Makro Gilt Standardmäßig für alle User (XXX); es kann aber auch ein spezifischer Benutzer angegeben werden. Folgende Aufrufe sind möglich:<br />
-*'''<u>Edit Formulare</u>''' InitScripter wird nach dem Create des Fensters aufgerufen
+==Edit Formulare==
-{| class="Wikitable"
+{| class="wikitable"
 |-
 !Edit Kontroll Funktionen !! Tastatur Funktionen
@@ Zeile 55: / Zeile 56: @@
 |OnEdReadDirect || OnPGUP
 |-
-| || OnRETURN
+|OnRETURN ||
 |}
-</div><br />Jede Makro Funktion hat 2 Aufrufe <br />1 Bevor die interne Delphi Funktion aufgerufen wird, gibt es einen Makro-Aufruf mit der Erweiterung Before_. Hat die Funktion den Rückgabewert Ready, so wird die interne Delphi-Funktion nicht mehr aufgerufen. Diese Funktion wird unabhängig von der Delphi Funktion aufgerufen.<br />2 Standard Aufruf nach der internen Delphi Funktion. Diese wird nur ausgeführt  wenn es in Delphi eine On... Funktion bestückt wird.<br />
+Jede Makro Funktion hat 2 Aufrufe
-=<font size="2" color="#000000" face="Arial"><font size="3">'''Globale Variable FrmEdit'''</font></font>=
+==Globale Variable FrmEdit==
-<br />Über die Variable FrmEdit kann auf alle Felder und auf die Property des Edit Objekt zugegriffen werden. Folgende Propertys stehen zu Verfügung<br /><div>
+{| class="wikitable"
-{| cellspacing="-1" cellpadding="2"
+Auslesen von Komponenten:
-<table border=1>
+ FrmEdit.xGet('a_vorname');
-</div><br />Auslesen von komponenten </font><font size="3">        </font><font size="3" face="courier new">'''FrmEdit.xGet('a_vorname');'''Setzen von Komponenten</font><font size="3">        </font><font size="3">        </font><font size="3" face="courier new">'''FrmEdit.xSet('a_vorname',Meier);'''<br /><br /><br />
+Setzen von Komponenten:
 =<font size="2" color="#000000" face="Arial"><font size="3">'''Mögliche Zugriffe auf Komponenten und Werte des Edits'''</font></font>=

Böhrer am 17. April 2012 um 14:03 Uhr

2012-04-17T14:03:37Z

← Nächstältere Version		Version vom 17. April 2012, 15:03 Uhr
Zeile 1:		Zeile 1:
	{{Vorlage:System}}~~<font size~~=~~"2" color~~=~~"#000000" face="Arial"> </font>~~		{{Vorlage:System}}
			=OBS Anleitung Customize Edit=
			Bei einem Benutzer kann man über {{F9}} Layout mit Level 5 den Schalter Customize aktivieren.
			Der Firmenbeauftragte kann dann für den Benutzer Anpassungen durchführen. Nach der Anpassung muss Customize deaktiviert werden.

	<div><center><font size="6">OBS Anleitung Customize Edit</font></center></div> <br />Beim Benutzer kann man über {{F9}} Layout mit Level 5 den Schalter Customize aktivieren.<br />Der Firmenbeauftragte kann dann für den Benutzer Anpassungen für den Benutzer durchführen.Nach der Anpassung muss Customize deaktiviert werden.<br /><br /><div>[[Image:FRMEDITCUSTOMIZE_1.jpg]]</div><br />Aufruf über {{Strg}}+{{F12}} kann<br />in der Listeim Edit-Dialogin den Auswahlboxenin den Auswertungen ({{F3}} Formulare/Exports)in der Positionserfassung<br />Mit Rechter Maus Taste und gedrückt {{Strg}} können auch die Weitere Funktionen (in den Listen) bearbeitet werden.<br /><div>[[Image:FRMEDITCUSTOMIZE_2.jpg]]</div><br /><br /><br />die Benutzeraktivitäten eingeschränkt werden:<br /><div>[[Image:FRMEDITCUSTOMIZE_3.jpg]]</div><br />Name des Edit's ist der KlassennameMakro Gilt Standardmäßig für alle User (XXX) es kann aber auch ein spezifischer Benutzer angegeben werden.<br />Folgende Aufrufe sind möglich:<br /><div><font size="5">'''<u>Edit Formulare</u>'''<br />InitScripter wird nach dem Create des Fensters aufgerufen<br /><div>		[[Image:FRMEDITCUSTOMIZE_1.jpg]]

	{~~\| cellspacing="~~-~~1" cellpadding="2"~~		Aufruf über {{Strg}}+{{F12}}:
	<~~table border=1~~>		*in der Liste
	~~\|- valign="top"~~		*im Edit-Dialog
	~~\| width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~'''Edit ~~Kontroll Funktionen'''~~</~~font>~~		*in den Auswahlboxen
	~~\| width="297" valign="top" \| <font size="2" color="#000000" face="Arial"~~>'''~~Tastatur Funktionen'''</font>~~		*in den Auswertungen ({{F3}} Formulare/Exports)
	\|~~- valign~~="~~top~~"		*in der Positionserfassung
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial"><br /></font>~~
	~~\| width="297" valign="top" \| <font size="2" color="#000000" face="Arial"><br /></font>~~		Mit rechter Maustaste und {{Strg}} können auch die Weitere Funktionen (in den Listen) bearbeitet werden.
	\|- ~~valign="top"~~
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~InitScripter~~</font>~~		[[Image:FRMEDITCUSTOMIZE_2.jpg]]
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial"><br /></font>~~
	\|- ~~valign="top"~~		Die Benutzeraktivitäten können ebenfalls eingeschränkt werden:
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~CheckIfChanged~~</font>~~
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF1~~</font>~~		[[Image:FRMEDITCUSTOMIZE_3.jpg]]
	\|- ~~valign="top"~~
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnESC~~</font>~~		Name des Edit's ist der jeweilige Klassenname.<br />
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF2~~</font>~~		Das Makro Gilt Standardmäßig für alle User (XXX); es kann aber auch ein spezifischer Benutzer angegeben werden. Folgende Aufrufe sind möglich:
	\|- ~~valign="top"~~		*'''<u>Edit Formulare</u>''' InitScripter wird nach dem Create des Fensters aufgerufen
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdInit~~</font>~~
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF3~~</font>~~		{\| class="Wikitable"
	\|- ~~valign="top"~~		\|-
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdFormInit~~</font>~~		!Edit Kontroll Funktionen !! Tastatur Funktionen
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF4~~</font>~~		\|-
	\|- ~~valign="top"~~		\|InitScripter \|\|
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdClose~~</font>~~		\|-
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF5~~</font>~~		\|CheckIfChanged \|\| OnF1
	\|- ~~valign="top"~~		\|-
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdRead~~</font>~~		\|OnESC \|\| OnF2
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF6~~</font>~~		\|-
	\|- ~~valign="top"~~		\|OnEdInit \|\| OnF3
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdShow~~</font>~~		\|-
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF7~~</font>~~		\|OnEdFormInit \|\| OnF4
	\|- ~~valign="top"~~		\|-
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdVorb~~</font>~~		\|OnEdClose \|\| OnF5
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF8~~</font>~~		\|-
	\|- ~~valign="top"~~		\|OnEdRead \|\| OnF6
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdCheck~~</font>~~		\|-
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF9~~</font>~~		\|OnEdShow \|\| OnF7
	\|- ~~valign="top"~~		\|-
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdSave~~</font>~~		\|OnEdVorb \|\| OnF8
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnF10~~</font>~~		\|-
	\|- ~~valign="top"~~		\|OnEdCheck \|\| OnF9
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdSaveDirect~~</font>~~		\|-
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnPGDN~~</font>~~		\|OnEdSave \|\| OnF10
	\|- ~~valign="top"~~		\|-
	\| ~~width="297" valign="top" \| <font size="2" color="#000000" face="Arial">~~OnEdReadDirect~~</font>~~		\|OnEdSaveDirect \|\| OnPGDN
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnPGUP~~</font>~~		\|-
	\|- ~~valign="top"~~		\|OnEdReadDirect \|\| OnPGUP
	\| ~~width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial"><br /></font>~~		\|-
	~~\| width="297" valign="top"~~ \| ~~<font size="2" color="#000000" face="Arial">~~OnRETURN~~</font>~~		\| \|\| OnRETURN
	\|}		\|}