UserInitials: Unterschied zwischen den Versionen

Aus Thomas Wiki
Zur Navigation springen Zur Suche springen
KKeine Bearbeitungszusammenfassung
(Weiterleitung auf Initials erstellt)
 
(Eine dazwischenliegende Version desselben Benutzers wird nicht angezeigt)
Zeile 1: Zeile 1:
 
#REDIRECT [[Initials]]
== Gambas ==
 
Funktion zum Bestimmen der Anfangsbuchstaben (Initialien) der Wörter eines Textes, z.B. Username. Ein initialie ist wird dadurch bestimmt, dass sie am Anfang der Zeichenkette oder nach einem Leerzeichen steht. Sollen Sonderzeichen als Initialien ausgeschlossen werden, sind zusätzliche Prüfungen erforderlich.
 
 
FUNCTION Initials( Value AS String ) AS String
  DIM result AS String
  DIM nc AS Boolean
  DIM i AS Integer
  result = ""
  IF uname THEN
   
    nc = TRUE
    FOR i = 1 TO Len(uname)
 
      IF Mid(uname, i, 1) = " " THEN
        nc = TRUE
      ELSE
        IF nc THEN
          result = result & Mid(uname, i, 1)
          nc = FALSE
        END IF
      END IF
   
  NEXT
 
  END IF
  RETURN result
 
END FUNCTION
 
 
[[Kategorie:Basic]]
[[Kategorie:Gambas]]

Aktuelle Version vom 11. Januar 2012, 18:52 Uhr

Weiterleitung nach:

Abgerufen von „https://wiki.byggvir.de/index.php?title=UserInitials&oldid=59“