[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] Reference for unit 'sysutils' (#rtl)

AnsiExtractQuotedStr

Removes the first quoted string from a string.

Declaration

Source position: sysstrh.inc line 111

function AnsiExtractQuotedStr(

  var Src: PChar;

  Quote: Char

):string;

Description

AnsiExtractQuotedStr returns the first quoted string in Src, and deletes the result from Src. The resulting string has with Quote characters removed from the beginning and end of the string (if they are present), and double Quote characters replaced by a single Quote characters. As such, it reverses the action of AnsiQuotedStr.

Errors

None.

See also

AnsiQuotedStr

  

Return a quoted version of a string.

Example

Program Example51;
{ This program demonstrates the AnsiQuotedStr function }
Uses sysutils;

Var 
  S : AnsiString;
  P : PChar;

Begin
 S:='He said "Hello" and walked on';
 P:=Pchar(S);
 S:=AnsiQuotedStr(P,'"');
 Writeln (S);
 P:=Pchar(S);
 Writeln(AnsiExtractQuotedStr(P,'"'));
End.


Documentation generated on: Jun 23 2021