StrSplitAtCharSetA

function StrSplitAtCharSetA(

  const S: AnsiString;

  const C: ByteCharSet;

  var Left: AnsiString;

  var Right: AnsiString;

  const Optional: Boolean = True

):Boolean;