OBS/System/OBS Anleitung Customize Edit: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
(Importing text file)
 
 
(21 dazwischenliegende Versionen von 3 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
<font face="Arial"><font size="20pt"></font></font>
#REDIRECT [[OBS/Makros_und_Scripting/Anwendungsbereiche/Customize]]
 
<center>OBS Anleitung Customize Edit<br /></center>
 
<font face="Arial"><font size="3"><br /><br /></font></font>Beim Benutzer kann man über F9 Layout mit Level 5 den Schalter Customize aktivieren.<br /><br /> Der Firmenbeauftragte kann dann für den Benutzer Anpassungen für den Benutzer durchführen.<br /> Nach der Anpassung muss Customize deaktiviert werden.<br /><br /><br />[[Image:pict001.jpg]]<br /><font face="Arial"><font size="3"><br /> Aufruf über STRG-F12 kann<br /><br /> in der Liste<br /> im Edit-Dialog<br /> in den Auswahlboxen<br /> in den Auswertungen (F3 Formulare/Exports)<br /> in der Positionserfassung<br /><br /> Mit Rechter Maus Taste und gedrückt CTRL können auch die Weitere Funktionen (in den Listen) bearbeitet werden.<br /><br /></font></font><font face="Arial"><font size="3">[[Image:pict002.jpg]]</font></font><font face="Arial"><font size="3"><br /></font></font><font face="Arial"><font size="3"><br /><br /><br /> die Benutzeraktivitäten eingeschränkt werden:<br /><br /></font></font><font face="Arial"><font size="3">[[Image:pict003.jpg]]</font></font><font face="Arial"><font size="3"><br /></font></font><font face="Arial"><font size="3"><br /> Name des Edit's ist der Klassenname<br /> Makro Gilt Standardmäßig für alle User (XXX) es kann aber auch ein spezifischer Benutzer angegeben werden.<br /><br /> Folgende Aufrufe sind möglich:<br /><br /></font></font><font face="Arial">'''<u><font size="16pt">Edit Formulare<br /></font></u>'''</font><font face="Arial"><font size="3"><br /> InitScripter wird nach dem Create des Fensters aufgerufen<br /><br /></font></font>
 
{| border="2"
| <font face="Arial">'''<font size="3">Edit Kontroll Funktionen</font>'''</font>
| <font face="Arial">'''<font size="3">Tastatur Funktionen</font>'''</font>
|-
| <font face="Arial"><font size="3"></font></font>
| <font face="Arial"><font size="3"></font></font>
|-
| <font face="Arial"><font size="3">InitScripter</font></font>
| <font face="Arial"><font size="3"></font></font>
|-
| <font face="Arial"><font size="3">CheckIfChanged</font></font>
| <font face="Arial"><font size="3">OnF1</font></font>
|-
| <font face="Arial"><font size="3">OnESC</font></font>
| <font face="Arial"><font size="3">OnF2</font></font>
|-
| <font face="Arial"><font size="3">OnEdInit</font></font>
| <font face="Arial"><font size="3">OnF3</font></font>
|-
| <font face="Arial"><font size="3">OnEdFormInit</font></font>
| <font face="Arial"><font size="3">OnF4</font></font>
|-
| <font face="Arial"><font size="3">OnEdClose</font></font>
| <font face="Arial"><font size="3">OnF5</font></font>
|-
| <font face="Arial"><font size="3">OnEdRead</font></font>
| <font face="Arial"><font size="3">OnF6</font></font>
|-
| <font face="Arial"><font size="3">OnEdShow</font></font>
| <font face="Arial"><font size="3">OnF7</font></font>
|-
| <font face="Arial"><font size="3">OnEdVorb</font></font>
| <font face="Arial"><font size="3">OnF8</font></font>
|-
| <font face="Arial"><font size="3">OnEdCheck</font></font>
| <font face="Arial"><font size="3">OnF9</font></font>
|-
| <font face="Arial"><font size="3">OnEdSave</font></font>
| <font face="Arial"><font size="3">OnF10</font></font>
|-
| <font face="Arial"><font size="3">OnEdSaveDirect</font></font>
| <font face="Arial"><font size="3">OnPGDN</font></font>
|-
| <font face="Arial"><font size="3">OnEdReadDirect</font></font>
| <font face="Arial"><font size="3">OnPGUP</font></font>
|-
| <font face="Arial"><font size="3"></font></font>
| <font face="Arial"><font size="3">OnRETURN</font></font>
|-
|
<font face="Arial"><font size="3"><br /> Jede Makro Funktion hat 2 Aufrufe <br /><br /> 1 Bevor die interne Delphi Funktion aufgerufen wird, gibt es einen Makro-Aufruf mit der Erweiterung Before_. <br /> Hat die Funktion den Rückgabewert &amp;lsquor;Ready', so wird die interne Delphi-Funktion nicht mehr aufgerufen. <br /> Diese Funktion wird unabhängig von der Delphi Funktion aufgerufen.<br /><br /></font></font>2 Standard Aufruf nach der internen Delphi Funktion. <br /> Diese wird nur ausgeführt wenn es in Delphi eine On... Funktion bestückt wird.<br />
 
----
 
<br /><font face="Arial">'''<font size="3"></font>'''</font>
 
<center>Globale Variable FrmEdit<br /></center><font face="Arial"><font size="3"><br /> Über die Variable FrmEdit kann auf alle Felder und auf die Property des Edit Objekt zugegriffen werden. <br /> Folgende Property's stehen zu Verfügung<br /><br /></font></font>
|}
 
{| border="2"
| <font face="Arial">'''<font size="3">Property</font>'''</font>
| <font face="Arial">'''<font size="3">Erläuterung</font>'''</font>
|-
| <font face="Arial"><font size="3"></font></font>
| <font face="Arial"><font size="3"></font></font>
|-
| <font face="Arial"><font size="3">'lCheckOK'</font></font>
| <font face="Arial"><font size="3">Kann bei der Überprüfung von F2 benutzt werden ob die Eingabewerte korrekt eingegeben wurden sind.<br /> Bei False wird nicht abgespeichert.</font></font>
|-
| <font face="Arial"><font size="3">'lEditMode'</font></font>
| <font face="Arial"><font size="3">True = Insertmodus<br /> False = Editmodus</font></font>
|-
| <font face="Arial"><font size="3">'lDataUpdate'</font></font>
| <font face="Arial"><font size="3">True = Daten des Edits wurden verändert</font></font>
|-
| <font face="Arial"><font size="3">'lDataChecked'</font></font>
| <font face="Arial"><font size="3">False=Daten werden auf gültigkeit überprüft (lCheckok)</font></font>
|-
| <font face="Arial"><font size="3">'lCloseInsert'</font></font>
| <font face="Arial"><font size="3">Edit-Fenster wird (lEditMode = True) nach F2 geschlossen</font></font>
|-
| <font face="Arial"><font size="3">'lCloseEdit'</font></font>
| <font face="Arial"><font size="3">Edit-Fenster wird (lEditMode = False) nach F2 geschlossen</font></font>
|-
| <font face="Arial"><font size="3">'lDataESC'</font></font>
| <font face="Arial"><font size="3">Soll bei einer Änderung im Edit eine Abfrage beim Verlassen der Maske erscheinen</font></font>
|-
| <font face="Arial"><font size="3">'lCanLock'</font></font>
| <font face="Arial"><font size="3">Ob bei der Eingabe nur eine Person den Datensat editieren darf</font></font>
|-
| <font face="Arial"><font size="3">'lInsert'</font></font>
| <font face="Arial"><font size="3">Edit Felder im Insert/Überschreibemodus (zur zeit keine Funktion)</font></font>
|-
| <font face="Arial"><font size="3"><br /> Auslesen von komponenten         </font></font><font face="Courier New">'''<font size="3">FrmEdit.xGet('a_vorname');<br /></font>'''</font><font face="Arial"><font size="3">Setzen von Komponenten            </font></font><font face="Courier New">'''<font size="3">FrmEdit.xSet('a_vorname','Meier');<br /></font>'''</font><font face="Arial"><font size="3"><br />
 
----
 
<br /><br />
 
</font></font><font face="Arial">'''<font size="3"><center>Mögliche Zugriffe auf Komponenten und Werte des Edits<br /></center></font>'''</font> <font face="Arial"><font size="3"><br /></font></font><font face="Courier New"><font size="2">procedure InitScripter(ofrm:Tobject);<br /> var oSte : TEdit;<br /> begin<br /> oSte := FrmEdit.FindComponent('stred_db_a_vzusatz');<br /> Meldung(FrmEdit.stred_db_a_vzusatz.Text);<br /> end;<br /><br /><br /><br /> function OnEdCheck():string;<br /> var oSte : TEdit;<br /> cEdit : String;<br /> cVorname : String;<br /> begin<br /><br /> if (FrmEdit.lEditMode) then begin<br /> Meldung('Edit Mode True');<br /> end else begin<br /> Meldung('Edit Mode False');<br /> end;<br /><br /> Meldung(FrmEdit.stred_db_a_name.Text);<br /><br /> oSte := FrmEdit.FindComponent('stred_db_a_name');<br /> Meldung(oSte.Text);<br /><br /> cVorname:= FrmEdit.xGet('a_vorname');<br /> Meldung(cVorname);<br /><br /> if (Empty(cVorname)) then begin<br /> FrmEdit.lCheckOk := False;<br /> Meldung('Bitte Vorname eingtragen');<br /> end;<br /><br /> end;<br /><br /></font></font>Wenn möglich immer mit <font face="Courier New">'''<font size="2">xGet</font>'''</font><font face="Courier New"><font size="2"> und </font></font><font face="Courier New">'''<font size="2">xSet</font>'''</font><font face="Courier New"><font size="2"> auf Komponenten Werte zugreifen.<br /></font></font><font face="Courier New"><font size="3"><br /></font></font><font face="Arial"><font size="3"><br /></font></font><font face="Arial">'''<u><font size="16pt">Listen Formulare<br /></font></u>'''</font><font face="Arial"><font size="3"><br /> folgende Funktionen stehen zur Verfügung:<br /><br /> InitScripter<br /> OnListNew<br /> OnResize<br /> OnRefresh<br /><br /> Before_Close<br /><br /> Before_OnF1<br /> Before_OnF2<br /> Before_OnF3<br /> Before_OnF4<br /> Before_OnF5<br /> Before_OnF6<br /> Before_OnF7<br /> Before_OnF8<br /> Before_OnF9<br /> Before_OnF10<br /> Before_OnReturn<br /> Before_OnInsert<br /> Before_OnDelete<br /> Before_OnESC<br /><br /> OnF1<br /> OnF2<br /> OnF3<br /> OnF4<br /> OnF5<br /> OnF6<br /> OnF7<br /> OnF8<br /> OnF9<br /> OnF10<br /> OnReturn<br /> OnInsert<br /> OnDelete<br /> OnESC<br /><br /></font></font><font face="Arial">'''<font size="3">Beispiel:<br /></font>'''</font><font face="Arial"><font size="3"><br /></font></font><font face="Courier New"><font size="2">var oListe : TxFrmListe;<br /><br /> procedure InitScripter(oFrm:Tobject);<br /> var cTable : String;<br /> begin<br /> oListe := oFrm;<br /> cTable := oListe.Name;<br /> Meldung(cTable);<br /> Meldung(oListe.Query.sql.text);<br /> Meldung(oListe.Query.A2C('sys_uid'));<br /> Meldung(oListe.cTable);<br /> end;<br /></font></font><font face="Arial"><font size="3"><br /> wird bei den Before Funktionen "READY" zurückgegeben, so werden die internen Funktionen nicht mehr ausgeführt.<br /> Damit kann der natürliche Ablauf des Programmes veränder werden.<br /> Dies kann schwere Prgrammfehler verursachen!<br /><br /><br /><br /></font></font><font face="Courier New"><font size="3"><br /><br /></font></font>
|}[[Category:hilfe]]
----
[[Spezial:Beiträge/Auto import|Auto import]] 17:46, 4. Jul. 2011 (CEST)

Aktuelle Version vom 9. April 2019, 12:48 Uhr

Weiterleitung nach:

Abgerufen von „http:///index.php?title=OBS/System/OBS_Anleitung_Customize_Edit&oldid=55241“