***  Beispiele für Aufrufe mit Parametern

***  Eigene Funktion mit Parametern

  Meldung  "[Funktion.Testfunktion(Hallo;Welt)]" (Titel: 'Funktionsaufruf', OK, Abbrechen)

***  Aufruf mit Parametern (Pro)

  Aufruf  'Test1' (Parameter: 'Hallo!')

***  Objekteigenschaft (Premium)

  Setze  in [ParameterListe]:  '2;4;9'

  Meldung  "Parameter [ParameterListe]¶Summe: [Testobjekt.Summe([ParameterListe])]¶" (Titel: 'Testobjekt', Info, OK, Abbrechen)

  Beende  Skript

***  Test eines Unterprogramms mit Parametern

::  Test1(Param)

  Meldung  "Param: [Param]¶Parameter 1: [Parameter(Test1).Wert(1)]¶... ohne ID: [Parameter.Wert(1)]" (Titel: 'Test1-Parameter', Info, OK, Abbrechen)

Zurück  

***  Eigene Funktion (Pro)

::  Funktion.Testfunktion(Para1)

Zurück   (Ergebnis: 'Anzahl Parameter: [Parameter(Testfunktion).Anzahl]¶Parameter1: [Parameter(Testfunktion).1]¶Para1: [Para1]')

***  Objekt "Testobjekt" ****************************************************************************************************

::  Objekt(Testobjekt)_Start

::  Testobjekt_Summe_Lesen

***  [Testobjekt.Summe(x,y,z)] liefert Summe der Werte

  Setze  in [Ergebnis]:  '0'

  ***  Anzahl Parameter in [Parameter(Summe).Anzahl]

  ***  Einzelne Parameter in [Parameter(Summe).Wert(n)] oder [Parameter(Summe).n]

  ***  In diesem Beispiel werden die Parameter aufaddiert

  Schleife Ab   ([ParameterIndex]  von 1  bis [Parameter(Summe).Anzahl])

    Setze  in [Ergebnis]:  '[Parameter(Summe).[ParameterIndex]]' (Addieren, berechnen)

  Schleife Bis

Zurück   (Ergebnis: '[Ergebnis]')

::  Objekt(Testobjekt)_Ende

**cX402964 54B1D3S214 1CMQkwCQkg QmVpc3BpZW xlIGb8ciBB dWZydWZlIG

1pdCBQYXJh bWV0ZXJuDQ owCTAJDQox CTAJCSBFaW dlbmUgRnVu a3Rpb24gbW

l0IFBhcmFt ZXRlcm4NCj MJMAkJTTAJ QjEJVEZ1bm t0aW9uc2F1 ZnJ1ZgkgW0

Z1bmt0aW9u LlRlc3RmdW 5rdGlvbihI YWxsbztXZW x0KV0NCjAJ MAkNCjEJMA

kJIEF1ZnJ1 ZiBtaXQgUG FyYW1ldGVy biAoUHJvKQ 0KNDQJMAkJ IFRlc3QxCa

4JQUhhbGxv IQ0KMAkwCQ 0KMQkwCQkg T2JqZWt0ZW lnZW5zY2hh ZnQgKFByZW

1pdW0pDQoy MgkwCQk9UG FyYW1ldGVy TGlzdGUJID I7NDs5DQoz CTAJCU02NA

lCMQlUVGVz dG9iamVrdA kgUGFyYW1l dGVyIFtQYX JhbWV0ZXJM aXN0ZV22U3

VtbWU6IFtU ZXN0b2JqZW t0LlN1bW1l KFtQYXJhbW V0ZXJMaXN0 ZV0pXbYNCj

AJMAkNCjUJ MAkJQw0KMA kwCQ0KMAkw CQ0KMQkwCQ kgVGVzdCBl aW5lcyBVbn

RlcnByb2dy YW1tcyBtaX QgUGFyYW1l dGVybg0KMT kJMAkJIFRl c3QxKFBhcm

FtKQ0KMwkw CQlNNjQJQj EJVFRlc3Qx LVBhcmFtZX RlcgkgUGFy YW06IFtQYX

JhbV22UGFy YW1ldGVyID E6IFtQYXJh bWV0ZXIoVG VzdDEpLldl cnQoMSldti

4uLiBvaG5l IElEOiBbUG FyYW1ldGVy LldlcnQoMS ldDQo0NQkw CQkgDQowCT

AJDQowCTAJ DQoxCTAJCS BFaWdlbmUg RnVua3Rpb2 4gKFBybykN CjE5CTAJCS

BGdW5rdGlv bi5UZXN0Zn Vua3Rpb24o UGFyYTEpDQ o0NQkwCQkg CUFBbnphaG

wgUGFyYW1l dGVyOiBbUG FyYW1ldGVy KFRlc3RmdW 5rdGlvbiku QW56YWhsXb

ZQYXJhbWV0 ZXIxOiBbUG FyYW1ldGVy KFRlc3RmdW 5rdGlvbiku MV22UGFyYT

E6IFtQYXJh MV0NCjAJMA kNCjAJMAkN CjEJMAkJIE 9iamVrdCAi VGVzdG9iam

VrdCIgCUYq DQoxOQkwCQ kgT2JqZWt0 KFRlc3RvYm pla3QpX1N0 YXJ0DQowCT

AJDQoxOQkw CQkgVGVzdG 9iamVrdF9T dW1tZV9MZX Nlbg0KMQkw CQkgW1Rlc3

RvYmpla3Qu U3VtbWUoeC x5LHopXSBs aWVmZXJ0IF N1bW1lIGRl ciBXZXJ0ZQ

0KMjIJMAkJ IDAJPUVyZ2 VibmlzDQox CTAJCSBBbn phaGwgUGFy YW1ldGVyIG

luIFtQYXJh bWV0ZXIoU3 VtbWUpLkFu emFobF0NCj EJMAkJIEVp bnplbG5lIF

BhcmFtZXRl ciBpbiBbUG FyYW1ldGVy KFN1bW1lKS 5XZXJ0KG4p XSBvZGVyIF

tQYXJhbWV0 ZXIoU3VtbW UpLm5dDQox CTAJCSBJbi BkaWVzZW0g QmVpc3BpZW

wgd2VyZGVu IGRpZSBQYX JhbWV0ZXIg YXVmYWRkaW VydA0KMzMJ MAkJWlBhcm

FtZXRlcklu ZGV4CVMxCU VbUGFyYW1l dGVyKFN1bW 1lKS5Bbnph aGxdDQoyMg

kwCQkgW1Bh cmFtZXRlci hTdW1tZSku W1BhcmFtZX RlckluZGV4 XV0JPUVyZ2

VibmlzCUMJ RA0KMzQJMA kNCjQ1CTAJ CSAJQVtFcm dlYm5pc10N CjAJMAkNCj

E5CTAJCSBP Ympla3QoVG VzdG9iamVr dClfRW5kZQ 0K=*