[fpc-pascal] @Michael Van Canneyt or others: exporting SQL (issue 19937)

[Michael Van Canneyt]

On Sat, 17 Mar 2012, Reinier Olislagers wrote:

> Good morning Michael & the rest,
>
> Would any of you committers who are familiar with SQL check to see if my
> patch at
> http://bugs.freepascal.org/view.php?id=19937
> is correct and implement it?
>
> Currently, exporting a dataset using TSQLExporter, it generates INSERT
> SQL statements which quote string fields with a single quote: '.
> However, it does not quote memo or blob fields, causing errors when
> running the resulting SQL if any memo or blob fields contains (e.g.) '
>
> I fixed it by changing
>  If (F.DataType in StringFieldTypes+DateFieldTypes) then
>    Result:=''''+QuoteFIeld(Result)+'''';
> to
>  If (F.DataType in
> BlobFieldTypes+StringFieldTypes+MemoFieldTypes+DateFieldTypes) then
>    Result:=''''+QuoteFIeld(Result)+'''';
>

Checked and applied, thank you very much.

Database related bugs are automatically assigned to Joost, that's why I don't 
see them in my list of assigned bugs.

So feel free to bug me if you think I can/should handle them.

Michael.