UserInitials - Versionsgeschichte

Root: Weiterleitung auf Initials erstellt

2012-01-11T18:52:28Z

Weiterleitung auf Initials erstellt

← Nächstältere Version		Version vom 11. Januar 2012, 18:52 Uhr
Zeile 1:		Zeile 1:
	#REDIRECT [Initials]]		#REDIRECT [[Initials]]

	~~Die Initialien eines Nutzers, z.B. aus UserName, können mit der Funktion Initials ermittelt werden.~~

Root am 11. Januar 2012 um 18:52 Uhr

2012-01-11T18:52:06Z

← Nächstältere Version		Version vom 11. Januar 2012, 18:52 Uhr
Zeile 1:		Zeile 1:
			#REDIRECT [Initials]]

	~~== Gambas ==~~		Die Initialien eines Nutzers, z.B. aus UserName, können mit der Funktion Initials ermittelt werden.

	~~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]]~~

Root am 11. Januar 2012 um 18:42 Uhr

2012-01-11T18:42:13Z

← Nächstältere Version		Version vom 11. Januar 2012, 18:42 Uhr
Zeile 34:		Zeile 34:

	END FUNCTION		END FUNCTION


			[[Kategorie:Basic]]
			[[Kategorie:Gambas]]

Root: /* Gambas */

2012-01-11T18:41:09Z

Gambas

← Nächstältere Version		Version vom 11. Januar 2012, 18:41 Uhr
Zeile 15:		Zeile 15:

	nc = TRUE		nc = TRUE

	FOR i = 1 TO Len(uname)		FOR i = 1 TO Len(uname)

Zeile 30:		Zeile 30:

	END IF		END IF

	RETURN result		RETURN result

	END FUNCTION		END FUNCTION

Root: /* Gambas */

2012-01-11T18:40:26Z

Gambas

← Nächstältere Version		Version vom 11. Januar 2012, 18:40 Uhr
Zeile 2:		Zeile 2:
	== Gambas ==		== Gambas ==

	Bestimmen der Anfangsbuchstaben der Wörter eines Textes, z.B. Username.		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		FUNCTION Initials( Value AS String ) AS String

Root: Die Seite wurde neu angelegt: „ == Gambas == Bestimmen der Anfangsbuchstaben der Wörter eines Textes, z.B. Username. FUNCTION Initials( Value AS String ) AS String DIM result AS Str…“

2012-01-11T16:49:05Z

Die Seite wurde neu angelegt: „ == Gambas == Bestimmen der Anfangsbuchstaben der Wörter eines Textes, z.B. Username. FUNCTION Initials( Value AS String ) AS String DIM result AS Str…“

Neue Seite

== Gambas ==

Bestimmen der Anfangsbuchstaben der Wörter eines Textes, z.B. Username.

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