TAdvStringGrid - InsertFromCSV

VCL TMS VCL UI Pack
1

Hi

I have an issue with a CSV file and loading the content into an adv. string grid.
I use this function:

MyGrid..InsertFromCSV(OpenDialog1.FileName);

We have one customer, who is using ' (single one) as a text qualifier and not " (double one).
This is because they use this " in the text as well.

I have read the documentation, but I cant find a place, where I can set this text qualifier (I can find the delimiter).

Is this not posible?

Regards Michael

Example
'Model nr.';'Farve str.';'Farve beskrivelse';'Farve nr';'Str.';'Leverand›r';'Model navn';'Produkt';'Pris';'Vejlende pris';'EAN';''
'010276';'Blue Denim,24"';'Dk. Blue Denim';'410';'24'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855152572';''
'010276';'Blue Denim,25"';'Dk. Blue Denim';'410';'25'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855146960';''
'010276';'Blue Denim,26"';'Dk. Blue Denim';'410';'26'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855146977';''
'010276';'Blue Denim,27"';'Dk. Blue Denim';'410';'27'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855146984';''
'010276';'Blue Denim,28"';'Dk. Blue Denim';'410';'28'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855146991';''
'010276';'Blue Denim,29"';'Dk. Blue Denim';'410';'29'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855147004';''
'010276';'Blue Denim,30"';'Dk. Blue Denim';'410';'30'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855147011';''
'010276';'Blue Denim,31"';'Dk. Blue Denim';'410';'31'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855147028';''
'010276';'Blue Denim,32"';'Dk. Blue Denim';'410';'32'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855147035';'0'
'010276';'Blue Denim,33"';'Dk. Blue Denim';'410';'33'';'MOSMOSH';'Victoria 7/8 Silk Touch Jeans';'Jeans';'335,00';'899,00';'5711855147042';'0'

2

You can override the default delimiter by setting it with property
grid.Delimiter: char;

3

Its not the delimiter, thats the problem.
Its the text qualifier.

4

There is currently not a setting for this. Double quotes is what should be used in CSV.

5

Ok.

I am fully aware of what CSV files can do, and how to use them.
Have you ever solved a problem, where a text actually contains double quotes, which is not to be seen as text qualifier?

Example:
Model nr.;Farve str.;Farve beskrivelse;Farve nr;Str.;Leverand›r;Model navn;Produkt;Pris;Vejlende pris;EAN;
010276;Blue Denim,24";Dk. Blue Denim;410;24';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855152572;
010276;Blue Denim,25";Dk. Blue Denim;410;25';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855146960;
010276;Blue Denim,26";Dk. Blue Denim;410;26';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855146977;
010276;Blue Denim,27";Dk. Blue Denim;410;27';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855146984;
010276;Blue Denim,28";Dk. Blue Denim;410;28';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855146991;
010276;Blue Denim,29";Dk. Blue Denim;410;29';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855147004;
010276;Blue Denim,30";Dk. Blue Denim;410;30';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855147011;
010276;Blue Denim,31";Dk. Blue Denim;410;31';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855147028;
010276;Blue Denim,32";Dk. Blue Denim;410;32';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855147035;0
010276;Blue Denim,33";Dk. Blue Denim;410;33';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855147042;0

Try to import these lines, and the double qoute does something and it can't be inserted...

6

Use a 2x double-quote

7

Thx. I'll try.

8

With double double-quote it imports, but displays with double double-qoutes.

Better, but not what I want

9

It should be

010276;Blue Denim,"24""";Dk. Blue Denim;410;24';MOSMOSH;Victoria 7/8 Silk Touch Jeans;Jeans;335,00;899,00;5711855152572;

10

With your suggestion, it does remove starting and ending double-qoutes
But the cell still contains 2 double-qoutes.

11

I cannot reproduce this.

CSV test data
Brand;Model;Hp;Max speed;City;Country;Type;Picture;Year;Price;Cyl.;URL;Stock
BMW;Z8;400;250;Munchen;Germany;cabrio;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/bmw1_96.jpg"">;2000;95000;8;<a href=""https://www.bmw.com"" target=""_blank"">https://www.bmw.com;<input type=""CHECKBOX"" disabled="""">
Lamborghini;Urus;600;250;"Sant""Agata Bolognese";Italy;SUV;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/lam1_96.jpg"">;2017;150000;10;<a href=""https://www.lamborghini.com"" target=""_blank"">https://www.lamborghini.com;<input type=""CHECKBOX"" checked="""" disabled="""">
BMW;i8;228;227;Munchen;Germany;cabrio;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/bmw2_96.jpg"">;2014;142000;3;<a href=""https://www.bmw.com"" target=""_blank"">https://www.bmw.com;<input type=""CHECKBOX"" disabled="""">
BMW;Z4;335;155;Munchen;Germany;cabrio;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/bmw3_96.jpg"">;2003;60000;6;<a href=""https://www.bmw.com"" target=""_blank"">https://www.bmw.com;<input type=""CHECKBOX"" disabled="""">
Ferrari;California T;553;294;Maranello;Italy;cabrio GT;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/fer4_96.jpg"">;2009;250000;8;<a href=""https://www.ferrari.com"" target=""_blank"">https://www.ferrari.com;<input type=""CHECKBOX"" checked="""" disabled="""">
Lamborghini;Aventador;751;350;"Sant""Agata Bolognese";Italy;cabrio;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/lam2_96.jpg"">;2011;475000;12;<a href=""https://www.lamborghini.com"" target=""_blank"">https://www.lamborghini.com;<input type=""CHECKBOX"" disabled="""">
Lamborghini;Gallardo;350;350;"Sant""Agata Bolognese";Italy;cabrio;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/lam3_96.jpg"">;2003;200000;8;<a href=""https://www.lamborghini.com"" target=""_blank"">https://www.lamborghini.com;<input type=""CHECKBOX"" disabled="""">
Mercedes;S63 AMG;525;320;Stuttgart;Germany;coupé;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/merc5_96.jpg"">;2006;220000;8;<a href=""https://www.mercedes-benz.com"" target=""_blank"">https://www.mercedes-benz.com;<input type=""CHECKBOX"" disabled="""">
BMW;X6;306;250;Munchen;Germany;sport coupé;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/bmw4_96.jpg"">;2008;80000;8;<a href=""https://www.bmw.com"" target=""_blank"">https://www.bmw.com;<input type=""CHECKBOX"" disabled="""">
Range Rover;Evoque;240;250;Liverpool;UK;SUV;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/ran1_96.jpg"">;2008;35000;4;<a href=""https://www.landrover.com"" target=""_blank"">https://www.landrover.com;<input type=""CHECKBOX"" checked="""" disabled="""">
Mercedes;AMG GT;476;304;Stuttgart;Germany;coupé;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/merc6_96.jpg"">;2015;120000;8;<a href=""https://www.mercedes-benz.com"" target=""_blank"">https://www.mercedes-benz.com;<input type=""CHECKBOX"" disabled="""">
Mercedes;SLS;571;317;Stuttgart;Germany;coupé;<img src=""https://download.tmssoftware.com/tmsweb/demos/TMSWEB_ResponsiveGrid/img/merc7_96.jpg"">;2012;260000;8;<a href=""https://www.mercedes-benz.com"" target=""_blank"">https://www.mercedes-benz.com;<input type=""CHECKBOX"" disabled="""">

See:
"Sant""Agata Bolognese"

that is imported as expected as

Sant"Agata Bolognese

image
image856×432 21.5 KB

12

Sorry - You are right.
I just did a small test in a program with just advstringgrid.
Worked fine.

So - something in my program must be doing it differently.

I must find out, where it breaks.