AnsiDequotedStr
Moduł: SysUtils
function AnsiDequotedStr(const S: string; AQuote: Char): string;
Funkcja usuwa z łańcucha znaki apostrofu lub cudzysłowia lub jakiekolwiek inne określone w parametrze AQuote. Jeżeli pierwszym znakiem łańcucha S nie jest ten określony w parametrze AQuote, funkcja zwróci niezmieniony łańcuch.
Przykład:
program Foo;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
S : String;
begin
{ dodanie cudzysłowia }
S := AnsiQuotedStr('My mother''s bag', '"');
Writeln(S);
S := AnsiDequotedStr(S, '"');
Writeln(S);
Readln;
end.
Zobacz też: