Clean up capitalize function
This commit is contained in:
parent
ac4cf4849a
commit
be8d070f6d
|
|
@ -111,14 +111,12 @@ Uppercase(String)
|
|||
return String
|
||||
}
|
||||
|
||||
Capitalize(W)
|
||||
Capitalize(String)
|
||||
{
|
||||
;StringUpper, String, String, T
|
||||
;return String
|
||||
Initial := SubStr(W, 1, 1)
|
||||
Initial := SubStr(String, 1, 1)
|
||||
StringUpper, Initial, Initial
|
||||
StringTrimLeft, W, W, 1
|
||||
return Initial . W
|
||||
StringTrimLeft, String, String, 1
|
||||
return Initial . String
|
||||
}
|
||||
|
||||
SafeQuote(string) ; Escape single quotes for sql update. Insert doesn't seem to need it because the DB library handles it.
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user