AddQuotes

Declaration

Function AddQuotes( const aValue : string; aChar : Char) : string

Example

procedure OnMapEvent(var Value:Variant);
begin
  Value := AddQuotes('abc','"'); //returns '"abc"'
  Value := AddQuotes('ab"c','"'); //returns '"ab""c"'
end;

Description

Enquotes aValue with the character given by aChar. If aValue is already enquoted then nothing happens and aValue is returned without change. if aValue contains the aChar character then it will be escaped.