TDBAdvGrid.SaveToCSV

VCL TMS VCL UI Pack
1

Debo exportar datos desde un grid a formato CSV, lo hace bien creo pero inspeccionando el archivo me queda con salto algunos renglones:

"000046","BERES BRENDA DAIANA","ALVARADO 3085","1","000003","","2","1","1","MAR DEL PLATA","0","5","1","100000","50","0","27-33709628-5","","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000047","ARISTEO S.R.L.","AV. COLON 3073 PISO:1 DPTO:A","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-71405256-6","lacasianaaristeo@hotmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000049","GRIMALDI ARNALDO EZEQUIEL","RODRIGUEZ PEÑA 2493","1","000003","","2","1","1","MAR DEL PLATA","0","5","1","100000","50","0","20-24699392-1","arnaldogrimaldi@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000050","GOURMAND MAR DEL PLATA S. R. L.","HIPOLITO YRIGOYEN 3530 DPTO:C","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-71740349-1","gourmand@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000051","FUNDACION UNTREF","MOSCONI 2736","1","000001","","2","1","1","SAENZ PEÑA","0","2","1","100000","50","0","30-71479510-0","asistenciaproduccion@bienalsur.org","contado","0;0","1","1","A","1674","Argentina","BUENOS AIRES","SAENZ PEÑA","2","0","1000"
"000052","MALDONADO ANALIA SUSANA","INDEPENDENCIA 3705","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","27-20494351-1","analia_maldonado68@hotmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000053","CARABAJAL GUSTAVO DAVID","12 DE OCTUBRE 3742
","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","20-17047491-1","supermercadoslaprovidencia@hotmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000054","VIBO MARINA","ALBERTI 2515","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-71712327-8","","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000055","EN.LE.FE S.A","SAN JUAN 182","1","000002","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-71217051-0","enlefe.sa@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000056","BETTIOL NATALIA","FUNES 3375","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","27-23706296-0","juanascafe@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000057","PARATORRE S A","PASEO JESUS DE GALINDEZ S/N
","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-71228366-8","compras@torreondelmonjemdp.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000058","PEREYRA MARCELA FERNANDA","GUEMES 2919","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","27-20717799-2","Marferper0103@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000059","COLEGIO MUSICAL IDRA SRL","SAN LUIS 3850","1","000003","","2","1","1","MAR DEL PLATA","0","4","1","100000","50","0","30-67677926-0","idra@aamh.com.ar","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"
"000060","GOSSO MARCELA","JACINTO PERALTA RAMOS 1727 PB","1","000003","","2","1","1","MAR DEL PLATA","0","5","1","100000","50","0","27-22980569-5","marcelagosso@gmail.com","contado","0;0","1","1","A","7600","Argentina","BUENOS AIRES","MAR DEL PLATA","2","0","1000"

es un error del componente o de como setear las opciones:?

2

Does your grid cells contain linebreaks? Linebreaks are exported to CSV too

3

Los Datos los obtiene de un Query.... como los limpio... :frowning:

4

Normally CVS readers should be able to handle such linebreaks.
Otherwise, implement grid.OnSaveCell() and remove linebreaks from this event handler.

5

perfecto..... gracias

procedure TFormAxum.dbgClientesSaveCell(Sender: TObject; ACol, ARow: Integer;
var Value: string);
begin
inherited;
Value:=AnsiReplaceStr(Value,#13,'');
end;