|
|
@ -1676,6 +1676,7 @@ const char *TextToPascal(const char *text) |
|
|
|
{ |
|
|
|
// Upper case first character |
|
|
|
if ((text[0] >= 'a') && (text[0] <= 'z')) buffer[0] = text[0] - 32; |
|
|
|
else buffer[0] = text[0]; |
|
|
|
|
|
|
|
// Check for next separator to upper case another character |
|
|
|
for (int i = 1, j = 1; (i < MAX_TEXT_BUFFER_LENGTH - 1) && (text[j] != '\0'); i++, j++) |
|
|
|