OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
(Die Seite wurde neu angelegt: „From February 13th through June 7th the Frist Center is exhibiting Medieval Treasures rolling around in its main gallery. The show includes ivories, enamels, m…“)
 
(Die Seite wurde neu angelegt: „{{Makros und Scripting}} Hier finden Sie einige nützliche Befehle/Funktionen, die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen…“)
Zeile 1: Zeile 1:
From February 13th through June 7th the Frist Center is exhibiting Medieval Treasures rolling around in its main gallery. The show includes ivories, enamels, metalwork, sculpture, paintings and illuminated manuscripts of medieval art through the third on the sixteenth century. The collection, among the finest in the nation, is on loan through the Cleveland Museum of Art.<br><br>Therefore, appreciation lets the members understand that you happen to be 'not entirely self-sufficient' (Baker, and O'Malley, 2008), and it also lets followers know you recognize the value of the c's in general. Baker and O'Malley (2008), concedes that gratitude is 'the heart of servant leadership' (p. 54). In 1970, the saying 'servant leadership' originated by Robert K. Greenleaf, and his awesome premises were using the notion; e.g. conjecture, that individuals prefer to serve others, instead of be served. How amazing would it be if all leaders thought and operated with this thought platform.<br><br>An essential preliminary course with regards to the art and craft of jewellery design instigates most programs of jewellery making. Through these Jewelry Making Courses students obtain a general notion of the precepts of perfectly, [http://Www.Newsweek.com/search/site/viaduct viaduct] and outfit jewelry design and learn patterns pr??cised to jewelries, wristbands, rings, earrings, lockets, brooches as well as other whiles. An assignment contains basic gemology, beading, metalworking, color possibility and jewelry manufacturing standards. Moreover furthermore, it may comprise a studio section.<br><br><br>Who will the truth is? Joanne Conant can be an enamellist/silversmith. Jim Degen [http://donpravo.com.ua/donforum/member.php?u=9902-WilsonAubr מסגריה תל אביב] and Richard Hoblitzell both wood turners, discover how each one has designed their studio and works their craft. Bob Keating will probably be showing his metal work. See Peter Kirkiles and Danielle Langford both [http://www.dailymail.co.uk/home/search.html?sel=site&searchPhrase=sculptors sculptors]. Compare and contrast how two artists create their pieces. Elizabeth MacDonald is usually a ceramic artist. Don Metz and Peter Petrochko will highlight how wood artists create. Ceramic artist Alison Palmer will highlight her studio and art.<br><br>Versatile vacation holidays for Gujarat are offered here to fit everyone's expectations. You can choose any tourism package for Gujarat which fits both your expectations and budget. Using these packages, possibilities are your easy vacation on Gujarat with your attractive vacation holidays for Gujarat.
{{Makros und Scripting}}
Hier finden Sie einige nützliche Befehle/Funktionen, die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
 
=Empty=
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'')<br />
Parameter: string/integer/double<br />
Rückgabe: boolean<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cText := '';
    IstLeer := Empty(cText);
    cText := 'Beispiel';
    IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).
 
=Length=
Verwendung: Ermittelt die Länge einer Zeichenkette (string).<br />
Parameter: string<br />
Rückgabe: integer<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cText  := 'Dies ist ein Beispiel.';
    nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.
 
=AllTrim=
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette.<br />
Parameter: string<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cText := ' Dies ist ein Beispiel.       ';
    cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "''  Dies ist ein Beispiel.      ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".
 
=UpperCase/LowerCase=
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben.<br />
Parameter: string<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cText  := 'Beispiel';
    cUpper := UpperCase(cText);
    cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.
 
=ExtractFileName=
Verwendung: Dateinamen aus Dateipfad auslesen.<br />
Parameter: string<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cDatei := 'c:\\Ordner\Datei.txt';
    cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.
 
=StrTran=
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen).<br />
Parameter: string, string, string<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cDatei := 'Datei.txt';
    cName  := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.
 
=LeftStr/RightStr=
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben.<br />
Parameter: string, integer<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cText  := 'Dies ist ein Beispiel';
    cLeft  := LeftStr(cText,2);
    cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}
 
=Token=
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück.<br />
Parameter: string, string, integer<br />
Rückgabe: string<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
    cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.
 
=NumToken=
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird.<br />
Parameter: string, string<br />
Rückgabe: integer<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
    nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.
 
=iVal=
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um.<br />
Parameter: string<br />
Rückgabe: integer<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cZahl := '4';
    nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.
 
=fVal=
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um.<br />
Parameter: string<br />
Rückgabe: double<br />
Beispiel:<br />
<syntaxhighlight lang="Delphi">
    cZahl := '1234,56';
    nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.
 
=Roundy=
Verwendung: Runden eines Dezimalwerts (Typ: Double)<br />
Parameter: double, integer<br />
Rückgabe: double<br />
Aufruf:
<syntaxhighlight lang="Delphi">
    nDezimalwert := 1234.5678;
    nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.
 
=Trunc=
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts<br />
Parameter: double<br />
Rückgabe: integer<br />
Aufruf:
<syntaxhighlight lang="Delphi">
    nDezimalwert := 1234.5678;
    nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.

Version vom 8. April 2019, 16:33 Uhr


Hier finden Sie einige nützliche Befehle/Funktionen, die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.

Empty

Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (string) und Zahlen (integer und double)
Parameter: string/integer/double
Rückgabe: boolean
Beispiel:

    cText := '';
    IstLeer := Empty(cText);
    cText := 'Beispiel';
    IstLeer := Empty(cText);

Erklärung: Der String-Variable cText wird ein leerer Text zugewiesen. Mit Empty wird der Wert nun geprüft. Die boolsche Variable IstLeer ist dann true (wahr). Als nächstes wird cText der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit Empty durchgeführt. Da cText jetzt einen Text enthält, ist der Wert der Variablen IstLeer nun false (falsch).

Length

Verwendung: Ermittelt die Länge einer Zeichenkette (string).
Parameter: string
Rückgabe: integer
Beispiel:

    cText   := 'Dies ist ein Beispiel.';
    nLaenge := Length(cText);

Erklärung: Der String-Variable cText wird der Wert Dies ist ein Beispiel. zugewiesen. Mit Length wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. nLaenge hat also den Wert 22.

AllTrim

Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette.
Parameter: string
Rückgabe: string
Beispiel:

    cText := '  Dies ist ein Beispiel.       ';
    cText := AllTrim(cText);

Erklärung: Der String-Variable cText wird der Wert " Dies ist ein Beispiel. " zugewiesen. Mit AllTrim werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable cText entspricht also dem Wert "Dies ist ein Beispiel.".

UpperCase/LowerCase

Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben.
Parameter: string
Rückgabe: string
Beispiel:

    cText  := 'Beispiel';
    cUpper := UpperCase(cText);
    cLower := LowerCase(cText);

Erklärung: Der String-Variable cText wird der Wert Beispiel zugewiesen. Mit UpperCase und LowerCase wird die Zeichenkette umgewandelt. cUpper enthält danach den Wert BEISPIEL und cLower den Wert beispiel.

ExtractFileName

Verwendung: Dateinamen aus Dateipfad auslesen.
Parameter: string
Rückgabe: string
Beispiel:

    cDatei := 'c:\\Ordner\Datei.txt';
    cDatei := ExtractFileName(cDatei);

Erklärung: Der String-Variable cDatei wird der Wert c:\\Ordner\Datei.txt zugewiesen. Mit ExtractFileName wird der Dateiname herausgesucht und zurückgegeben. Danach enthält cDatei nur noch den Wert Datei.txt.

StrTran

Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen).
Parameter: string, string, string
Rückgabe: string
Beispiel:

    cDatei := 'Datei.txt';
    cName  := StrTran(cDatei ,'.txt','');

Erklärung: Der String-Variable cDatei wird der Wert Datei.txt zugewiesen. Mit StrTran wird im Text der Variable cDatei nach .txt gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält cDatei nur noch den Wert Datei.

LeftStr/RightStr

Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben.
Parameter: string, integer
Rückgabe: string
Beispiel:

    cText  := 'Dies ist ein Beispiel';
    cLeft  := LeftStr(cText,2);
    cRight := RightStr(cText,5);

Erklärung: Der String-Variable cText wird der Wert Dies ist ein Beispiel zugewiesen. Mit LeftStr und RightStr werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. cLeft enthält danach den Wert Di und cRight den Wert spiel.

HINWEIS: Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls Dies ist ein Beispiel enthält.

Token

Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück.
Parameter: string, string, integer
Rückgabe: string
Beispiel:

    cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
    cTeil  := Token(cDatei,'_',2);

Erklärung: Der String-Variable cDatei wird der Wert Datei_Name_Mit_Unterstrichen.txt zugewiesen. Mit Token wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: Datei, Name, Mit und Unterstrichen.txt. Es wird der zweite Teil gefordert. Die Variable cTeil enthält demnach den Wert Name.

NumToken

Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird.
Parameter: string, string
Rückgabe: integer
Beispiel:

    cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
    nTeile := NumToken('_',cDatei);

Erklärung: Der String-Variable cDatei wird der Wert Datei_Name_Mit_Unterstrichen.txt zugewiesen. Mit NumToken wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: Datei, Name, Mit und Unterstrichen.txt. Die Variable nTeile entspricht also dem Wert 4.

iVal

Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um.
Parameter: string
Rückgabe: integer
Beispiel:

    cZahl := '4';
    nZahl := iVal(cZahl);

Erklärung: Der String-Variable cZahl wird der Wert 4 zugewiesen. Mit iVal wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable nZahl entspricht also dem Wert 4.

fVal

Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um.
Parameter: string
Rückgabe: double
Beispiel:

    cZahl := '1234,56';
    nZahl := fVal(cZahl);

Erklärung: Der String-Variable cZahl wird der Wert 1234,56 zugewiesen. Mit fVal wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable nZahl entspricht also dem Wert 1234,56.

Roundy

Verwendung: Runden eines Dezimalwerts (Typ: Double)
Parameter: double, integer
Rückgabe: double
Aufruf: 

    nDezimalwert := 1234.5678;
    nGerundeterWert := Roundy(nDezimalwert,2);

Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable nDezimalwert wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable nGerundeterWert entspricht also 1234,57.

Trunc

Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts
Parameter: double
Rückgabe: integer
Aufruf: 

    nDezimalwert := 1234.5678;
    nWert := Trunc(nDezimalwert);

Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable nDezimalwert wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable nWert entspricht also 1234.

Abgerufen von „http:///index.php?title=OBS/Makros_und_Scripting/Allgemeines/Übersicht_Funktionen&oldid=55213“