Pegar linhas de um TXT e gravar em BD

Salve mentes ricas de conhecimento.

Venho eu novamente perdir-lhes ajuda com um problema.

preciso desevolver um sistema onde preciso baixar uma lista em TXT de um site na net e então cadastrar todos os produtos na lista caso nao existam ou atualizar seu valor, caso exista.

a lista está na seguinte forma:

012345678901234567890123456789012345678901234567890123456789012345678901234567890123| 1 2 3 4 5 6 7 8Código | Descrição | Valor U$ 207 | (CD) CD-R Dr. Hank 700MB Verde (Tubo/OEM) | 26.00 9654 | Acces Kit MiniI Mouse/HUB4P/RJ45/RJ11 P/NB | 24.00 9974 | Aces Kit MTEK NB-Mouse/HUB2P/RJ45/MIC. | 17.00 145 | Adaptador para Teclado de AT para PS2 | 1.50 9603 | Adaptador USB Security Key Jetz | 23.00

Usei o seguinte comando:

lbDat.Caption:=copy(RichEdit1.Lines.GetText[2],48,57);

porém não está pegando o valor (continua td em branco)

alguém pode me dar uma luz?

Grato!

Abraço!!!