Pascal Scripting: AddQuotes

Prototype:

function AddQuotes(const S: String): String;

Description:

Adds a quote (") character to the left and right sides of the string if the string contains a space and it didn't have quotes already. This is primarily used when spawning another process with a long filename as one of the parameters.