[Overview][Constants][Types][Classes][Procedures and functions][Variables] |
Removes the first quoted string from a string.
Source position: sysstrh.inc line 97
function AnsiExtractQuotedStr( |
var Src: PChar; |
Quote: Char |
):String; |
AnsiExtractQuotedStrreturns the first quoted string in Src, and deletes the result from Src. The resulting string has with Quotecharacters removed from the beginning and end of the string (if they are present), and double Quotecharacters replaced by a single Quotecharacters. As such, it revereses the action of AnsiQuotedStr.
None.
|
Return a quoted version of a string. |
Program Example51; { This program demonstrates the AnsiQuotedStr function } Uses sysutils; Var S : AnsiString; Begin S:='He said "Hello" and walked on'; S:=AnsiQuotedStr(Pchar(S),'"'); Writeln (S); Writeln(AnsiExtractQuotedStr(Pchar(S),'"')); End.