Clean up capitalize function
This commit is contained in:
+4
-6
@@ -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.
|
||||
|
||||
Reference in New Issue
Block a user