diff options
Diffstat (limited to 'UCoreUtils.pas')
| -rw-r--r-- | UCoreUtils.pas | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/UCoreUtils.pas b/UCoreUtils.pas index b18c2f2..b095db1 100644 --- a/UCoreUtils.pas +++ b/UCoreUtils.pas @@ -80,7 +80,6 @@ procedure TrimCRLFESC(var s: string); procedure TrimQuotes(var s: string); function QuoteStr(const Str: string): string; function QuoteMarkupStr(const Str: string; MarkupUnderscore: boolean = False): string; -function QuotePercentStr(const Str: string): string; function RemoveQuotation(const Str: string): string; function GetStrSize(s: string): Int64; procedure DebugMsg(Params: array of const); @@ -893,18 +892,6 @@ begin end; (********************************************************************************************************************************) -function QuotePercentStr(const Str: string): string; -var i: integer; -begin - Result := ''; - if Length(Str) > 0 then - for i := 1 to Length(Str) do begin - if Str[i] = '%' then Result := Result + '%'; - Result := Result + Str[i]; - end; -end; - -(********************************************************************************************************************************) function QuoteMarkupStr(const Str: string; MarkupUnderscore: boolean = False): string; var i: integer; begin |