OverType


Purpose   Combines two overlapping strings.

Decln.    OverType(N:byte;Source,Target:string):string;

Returns   String

Remarks   N is the character position that string Source will be overlayed
          on string Target.

          Any characters after the Nth position in string Target will be
          overwritten by the characters in string Source.

Example

VAR
   TTT:STRING
BEGIN
    TTT := OVERTYPE(5,'TECHNOJOCK','BOB AINSBURY');
END;

The string TTT is assigned the value "Bob TechnoJock".