base:CapitaliseFirst()

[djrikki]

Returns a string with the first letter capitalised.

Code: Select all

Global base
base = {}

;; Capitalise first letter of a string
Function base:CapitaliseFirst(string$)
    string$ = UpperStr(MidStr(string$,0,1)) .. MidStr(string$,1,StrLen(string$))

	Return (string$)
EndFunction