Cita:
Empezado por roman
2. No funciona bien si las partes tienen espacios:
Hola,soy pepe perez perea
Lo toma como si fuesen cinco partes.
|
Trasteando como mi
Turbo he visto que el objeto TStrings cuenta con la propiedad StrictDelimiter. Cuando esta propiedad esta a TRUE solo se tiene en cuenta el carácter delimitador, ignorando los espacios y demás. Ignoro si existe en versiones anteriores de delphi, en la 7 no la tenia. Parece que los de Borland recapacitaron y acabaron con la sin razón de meter siempre en el mismo saco el carácter delimitador y cualquier otro entre el #1 y el #32.
Código Delphi
[-]
var
i: integer;
begin
with TStringList.Create do
try
Delimiter:= ',';
StrictDelimiter:= TRUE;
DelimitedText:= 'Hola,soy pepe perez perea';
for i:= 0 to Count - 1 do
begin
ShowMessage(Strings[i]);
end;
finally
Free;
end;
end;