ler arquivo texto com espaço como delimitador e valor de coluna também
Boa tarde, pessoal!
To fazendo importação de arquivos txt para uma base, beleza quando o delimitador é ;.
Mas, alguns tem espaços como delimitadores, então usei um stringlist com delimiter...
O problema é que alguns campos deste arquivo também tem espaço e a rotina separa como outro campo.
Segue trcho do codigo:
AssignFile(x,nm_arq);
Reset(x);
k:= TStringList.Create();
k.Delimiter:= ' ';
while not Eof(x) do
begin
Readln(x,texto);
if texto <> '' then
begin
deli.DelimitedText:= texto;
ShowMessage(k[0]);
ShowMessage(k[1]);
ShowMessage(k[2]);
ShowMessage(k[3]);
ShowMessage(k[4]);
ShowMessage(k[5]);
ShowMessage(k[6]);
ShowMessage(k[7]);
ShowMessage(k[8]);
ShowMessage(k[9]);
ShowMessage(k[10]);
ShowMessage(k[11]);
ShowMessage(k[12]);
ShowMessage(k[13]);
end;
Alguém sabe me dizer como fazer para a rotina identificar quando o espaço faz parte do conteudo do campo, exemplo: Joao da Silva.
desde já agradeço!
Discussão (3)
Carregando comentários...