Ver Mensaje Individual
  #4  
Antiguo 02-12-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.297
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Si no he entendido mal, en tu memo cada línea es de ésta forma:

00 734 041129 1130 204 00209 0000 0 XXXXXXXXX

de forma que tendrás un memo lleno de líenas de éste estilo:

00 735 445567 1454 204 00209 0000 0 XXXXXXXXX
00 734 046555 1566 204 00209 0000 0 YYYYYYYYY
00 734 041129 1130 204 00209 0000 0 ZZZZZZZZZZ

Para obtener los números debes hacer un bucle:

Código Delphi [-]
for i=0 to (Memo1.Lines.Count - 1) do begin
Str := Memo1.Lines[i];
// Sacar del String el número
.....
end;

Ésto te recorre todas las líneas del Memo, en el ejemplo anterior el bucle se hará tres veces (ya que existen 3 líneas).

Pedona, si no te he entendido bien, y no es ésta la cuestión.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita