Pascal Scripting: SameStr

Prototype:

function SameStr(const S1, S2: string): Boolan;

Description:

Compares S1 to S2, with case-sensitivity. The return value is True if they are equal.