Proper


Purpose   Converts a string to proper case, i.e. the first character of
          each word is capitalized.

Decln.    Proper(Str:string):string;

Returns   String

Remarks   Str is the source string.

Example

VAR
  TTT : STRING
BEGIN
    TTT := PROPER('TECHNOJOCK SOFTWARE INC.');
END;

The variable TTT is assigned the value "Technojock Software, Inc.".