DZone Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

Stephen has posted 20 posts at DZone. View Full User Profile

Delphi - Remove Extra Quotes From Fields

11.12.2008
| 4132 views |
  • submit to reddit
        Remove extra quotes (') from entered fields

function FixQuote(FixString : string) : string;
begin
   Result := AnsiReplaceStr(FixString, '''' , '''''' );
end;