Dies ist die alte 4D Dokumentations-Website. Die neue und aktualisierte Dokumentation finden Sie unter developer.4d.com
Count parameters
| Count parameters -> Funktionsergebnis | ||||||||
| Parameter | Typ | Beschreibung | ||||||
| Funktionsergebnis | Lange Ganzzahl |
|
Anzahl der aktuell übergebenen Parameter | |||||
Die Funktion Count parameters gibt die Anzahl der Parameter zurück, die einer Projektmethode übergeben wurde.
Warnung: Count parameters ist nur in einer Projektmethode von Bedeutung, die von einer anderen Methode aufgerufen wird. Ist die Projektmethode, die diese Funktion aufruft, einem Menü zugeordnet, gibt sie den Wert 0 (Null) zurück.
Projektmethoden von 4D akzeptieren optionale Parameter.
Sie können zum Beispiel die Methode MyMethod(a;b;c;d) auf folgende Arten aufrufen:
MyMethod(a;b;c;d) ` Alle Parameter wurden übergeben
MyMethod(a;b;c) ` Der letzte Parameter wurde nicht übergeben
MyMethod(a;b) ` Die letzten beiden Parameter wurden nicht übergeben
MyMethod(a) ` Nur der erste Parameter wurde übergeben
MyMethod ` Kein Parameter wurde übergebenMit Count parameters innerhalb MyMethod stellen Sie die aktuelle Anzahl der Parameter fest und führen je nach Ergebnis verschiedene Operationen aus. Folgendes Beispiel zeigt eine Textmeldung und kann diese in einen 4D Write Bereich einfügen bzw. an ein Dokument auf der Festplatte senden:
` Projektmethode APPEND TEXT
` APPEND TEXT ( Text { ; Lang { ; Zeit } } )
` APPEND TEXT ( Text { ; 4D Write Bereich { ; DocRef } } )
C_TEXT($1)
C_TIME($2)
C_LONGINT($3)
MESSAGE($1)
If(Count parameters>=3)
SEND PACKET($3;$1)
Else
If(Count parameters>=2)
WR INSERT TEXT($2;$1)
End if
End ifMit dieser Projektmethode in Ihrer Anwendung können Sie schreiben:
APPEND TEXT(vtSomeText) ` Zeigt nur die Textmeldung an
APPEND TEXT(vtSomeText;$wrArea) ` Zeigt die Textmeldung an und fügt sie dem Bereich $wr an
APPEND TEXT(vtSomeText;0;$vhDocRef) ` Zeigt die Textmeldung an und schreibt sie in $vhDocRefProjektmethoden von 4D akzeptieren verschiedene Anzahlen von Parametern desselben Typs. Dazu verwenden Sie einen Compilerbefehl, in dem Sie ${N} als eine Variable übergeben. N gibt dabei den ersten Parameter an. Mit Count parameters haben Sie über eine For Schleife und die Parameter Indirektion Syntax Zugriff auf diese Parameter. Dieses Beispiel ist eine Funktion, die die größte Nummer zurückgibt, die als Parameter empfangen wird:
` Projektmethode Max of
` Max of ( Zahl { ; Zahl2... ; ZahlN } ) -> Zahl
` Max of ( Wert { ; Wert2... ; WertN } ) -> Größter Wert
C_REAL($0;${1}) ` Alle Parameter sowie Funktionsergebnis sind vom Typ ZAHL
$0:=${1}
For($vlParam;2;Count parameters)
If(${$vlParam}>$0)
$0:=${$vlParam}
End if
End forMit dieser Projektmethode in Ihrer Anwendung können Sie schreiben:
vrResult:=Max of(Records in set("Operation A");Records in set("Operation B"))oder:
vrResult:=Max of(r1;r2;r3;r4;r5;r6)
Produkt: 4D
Thema: Programmiersprache
Nummer:
259
Erstellt: < 4D v6
4D Programmiersprache ( 4D v20 R7)
