[Resolvido] Substituir caracter de arquivo txt

[FFernando]

Boa tarde galera,

Estou com um programinha e que tenho que ler um arquivo TXT:

LOAD DATA INFILE "C:\X.UAS"

INTO TABLE Teste.TMP_BASE_DADOS
 SINGLEROW
  TRUNCATE

  (TIPO_REGISTRO     POSITION(1:1),  
   FONTE_PAGADORA    POSITION(2:15),
   IDENTIFICACAO     POSITION(16:29),
   CODIGO_TRIBUTO    POSITION(30:33),
   SIGLA_SISTEMA     POSITION(34:36))

O programa deve substituir o que esta entre aspas quando o usuario digitar o novo caminho e arquivo no edit1.text eu fiz assim:

sBufferOrig := StringReplace(sBufferOrig, 'X', Edit1.text, [rfReplaceAll, rfIgnoreCase]);

Ele substitui direitinho, mas tem um problema.

Caso altere a letra X o programa não irá mais funcionar, então como q faço p substituir de outra forma? independentemente de ser X, a, B... :wacko:

Editado Setembro 4, 2008 por FFernando

[Jhonas]

Veja este exemplo:

LOAD DATA INFILE "CAMINHO"

INTO TABLE Teste.TMP_BASE_DADOS

SINGLEROW

TRUNCATE

(TIPO_REGISTRO POSITION(1:1),

FONTE_PAGADORA POSITION(2:15),

IDENTIFICACAO POSITION(16:29),

CODIGO_TRIBUTO POSITION(30:33),

SIGLA_SISTEMA POSITION(34:36))

e voce quer modificar sempre o que está entre aspas "CAMINHO" pelo caminho e o nome do arquivo, sem que o usuario tenha que digitar.

então voce pode fazer desta maneira:

IF OpenDialog1.Execute then
      sBufferOrig := StringReplace(sBufferOrig, 'CAMINHO', OpenDialog1.FileName, [rfReplaceAll, rfIgnoreCase]);

OBS : Use o componente OpenDialog da paleta Dialogs

abraço

[FFernando]

Oi Jonas,

Obrigado, estou usando o openDialog.

mas o problema persiste..

Pois ele deve ler o arquivo

LOAD DATA INFILE "CAMINHO"

INTO TABLE Teste.TMP_BASE_DADOS
SINGLEROW
TRUNCATE

(TIPO_REGISTRO POSITION(1:1),
FONTE_PAGADORA POSITION(2:15),
IDENTIFICACAO POSITION(16:29),
CODIGO_TRIBUTO POSITION(30:33),
SIGLA_SISTEMA POSITION(34:36))

E alterar o CAMINHO, mas ele ira gravar no MESMO arquivo, então ficara

LOAD DATA INFILE "C:\teste.txt"

e caso eu queira gravar novamente outro arquivo, ele não terá mais o "CAMINHO" e sim o "C:\teste.txt" :huh:

[Jhonas]

e caso eu queira gravar novamente outro arquivo, ele não terá mais o "CAMINHO" e sim o "C:\teste.txt"

então use um arquivo modelo padrão, e quando alterar o CAMINHO, voce não ira gravar no MESMO arquivo, mas em outro

abraço

[FFernando]

Oi Jhonas..

O usuário gostaria que gravasse no MESMO arquivo, mas com muito jeito convenci de gravar em outro rs...

funcionou perfeitamente, obrigado!