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